let uncurry f = fun (x,y) -> f x y