add example to README

This commit is contained in:
Hojun Choi 2024-09-02 19:18:10 +09:00
parent a740c9af25
commit bb623c9c20

View File

@ -1 +1,3 @@
(define fac (lambda (n) (if ((eq n 0) 1) (1 (* n (fac (+ n -1))))))) * (define fac (lambda (n) (if ((eq n 0) 1) (1 (* n (fac (+ n -1)))))))
* (if ((eq 0 1) 0) ((eq 1 1) 1))
* (if ((eq 0 1) 0) ((eq 0 2) 0) (1 (+ 1 2 3 4)))