ronin/examples/arrays.lisp
2019-07-13 21:15:03 +02:00

19 lines
276 B
Common Lisp

(print (map (lambda (a) (add a 1)) (1 2 3)))
(
(print (first (1 2 3)))
(print (rest (1 2 3)))
)
(print
(filter
(lambda (a) (eq 0 (mod a 2)))
(1 2 3 4 5))
)
(
(clear)
(map (lambda (a)
(stroke (rect (mul a 30) 20 50 50) 1 "red"))
(5 10 15 20))
)