x (fun (y : A) => y) & x (fun (z : A) => z)