undar-lang/bench/fib.lisp

6 lines
115 B
Common Lisp

(lambda fib (n)
(if (n < 2)
(return n))
(return (+ (fib (- n 2)) (fib (- n 1)))))
(print (fib 35))