RosettaCodeData/Task/Loops-Foreach/Ol/loops-foreach.ol
2023-07-01 13:44:08 -04: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))