RosettaCodeData/Task/Currying/LFE/currying-1.lfe
2016-12-05 23:44:36 +01:00

4 lines
70 B
Text

(defun curry (f arg)
(lambda (x)
(apply f
(list arg x))))