gscheme/examples/deep-recursion.scm

12 lines
85 B
Scheme

(define r
(lambda (n)
(if (= n 0) '()
(r (- n 1)))))
(r 10)
(r -10)