RosettaCodeData/Task/Loops-For/Common-Lisp/loops-for-4.lisp

8 lines
120 B
Common Lisp
Raw Permalink Normal View History

2020-02-17 23:21:07 -08:00
(use-package :iterate)
(iter
(for i from 1 to 5)
(iter
(for j from 1 to i)
(princ #\*))
(terpri))