mirror of
https://github.com/zoriya/HAL.git
synced 2026-06-11 16:56:13 +00:00
Zoe Roux
4 lines
103 B
Common Lisp
4 lines
103 B
Common Lisp
(define (fib x)
|
|
(cond ((eq? x 0) 0)
|
|
((eq? x 1) 1)
|
|
(#t (+ (fib (- x 1)) (fib (- x 2)))))) |