RosettaCodeData/Task/Higher-order-functions/NewLISP/higher-order-functions.newlisp
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

6 lines
150 B
Text

> (define (my-multiply a b) (* a b))
(lambda (a b) (* a b))
> (define (call-it f x y) (f x y))
(lambda (f x y) (f x y))
> (call-it my-multiply 2 3)
6