RosettaCodeData/Task/Integer-sequence/Ol/integer-sequence-1.ol

4 lines
50 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(let loop ((n 1))
(print n)
(loop (+ 1 n)))