RosettaCodeData/Task/Integer-sequence/Ol/integer-sequence-1.ol
2023-07-01 13:44:08 -04:00

3 lines
50 B
Text

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