RosettaCodeData/Task/Loops-For/Common-Lisp/loops-for-4.lisp
2023-07-01 13:44:08 -04:00

7 lines
120 B
Common Lisp

(use-package :iterate)
(iter
(for i from 1 to 5)
(iter
(for j from 1 to i)
(princ #\*))
(terpri))