fun (x : ~A -> B) => x