RosettaCodeData/Task/Metaprogramming/Common-Lisp/metaprogramming-5.lisp
2014-04-02 16:56:35 +00:00

2 lines
71 B
Common Lisp

(identity-comp (list x y z) (x 1) (y (* 3 x)) (z (+ x y)))
-> (1 3 4)