clisp/README.md
2024-09-02 19:15:21 +09:00

2 lines
69 B
Markdown

(define fac (lambda (n) (if ((eq n 0) 1) (1 (* n (fac (+ n -1)))))))