wl/test.lisp
2026-01-11 13:26:02 -03:00

3 lines
83 B
Common Lisp

(defn fib (n)
(if (< n 2) n (+ (fib (- n 1)) (fib (- n 2)))))
(println (fib 10))