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

6 lines
115 B
Common Lisp

(mapc (lambda (&rest args)
(format t "~{~A~}~%" args))
'(|a| |b| |c|)
'(a b c)
'(1 2 3))