5 lines
106 B
Text
5 lines
106 B
Text
(defun integer-sequence-from (x)
|
|
(print x)
|
|
(integer-sequence-from (+ x 1)) )
|
|
|
|
(integer-sequence-from 1)
|