RosettaCodeData/Task/Loops-Foreach/Ol/loops-foreach.ol
2020-02-17 23:21:07 -08:00

6 lines
128 B
Text

(for-each print '(1 3 4 2))
(print)
(for-each (lambda (a b c) (print a "-" b "/" c))
'(1 2 3 4)
'(5 6 7 8)
'(a b x z))