RosettaCodeData/Task/Integer-sequence/XLISP/integer-sequence.l
2023-07-01 13:44:08 -04:00

5 lines
106 B
Common Lisp

(defun integer-sequence-from (x)
(print x)
(integer-sequence-from (+ x 1)) )
(integer-sequence-from 1)