[@@@uncurried ]
let foo [arity:2]x y = x + y
let z = foo 3 4
let bar [arity:2]x y = x + y
let b = bar 3 4
let w = 3 -> (foo 4)
let a = 3 -> (foo 4)