RosettaCodeData/Task/Loop-over-multiple-arrays-s.../Common-Lisp/loop-over-multiple-arrays-s...

5 lines
124 B
Common Lisp

(loop for x in '("a" "b" "c")
for y in '(a b c)
for z in '(1 2 3)
do (format t "~a~a~a~%" x y z))