8 lines
127 B
Text
8 lines
127 B
Text
|
(let addN (fun (n)
|
||
|
|
(fun (x &n)
|
||
|
|
(+ x n))))
|
||
|
|
|
||
|
|
(let add2 (addN 2))
|
||
|
|
(print (type add2))
|
||
|
|
(assert (= 7 (add2 5)) "add2 5 is 7")
|