let foo = fun x -> x

let foo x () = 1

let foo () = 6

let bar y = 7 in 
 let foo = function x -> x