lambda f. lambda p.
  let (x, y) = p in
  f x y