RosettaCodeData/Task/Integer-sequence/Ol/integer-sequence-1.ol
2019-09-12 10:33:56 -07:00

3 lines
50 B
Text

(let loop ((n 1))
(print n)
(loop (+ 1 n)))