11 lines
144 B
Text
11 lines
144 B
Text
|
val curry =
|
||
|
|
\(f) => \(x) => \(y) => f (x, y)
|
||
|
|
|
||
|
|
val add = \(x, y) => x + y
|
||
|
|
|
||
|
|
val g = curry (add)
|
||
|
|
|
||
|
|
val h = g (1)
|
||
|
|
|
||
|
|
val main = print_int (h (41))
|