Files
kraken/fib-interp.kp

6 lines
189 B
Plaintext
Raw Normal View History

2020-05-12 16:22:41 -04:00
(def! fib (fn* (n) (cond (= 0 n) 0
(= 1 n) 1
true (+ (fib (- n 1)) (fib (- n 2))))))
(let* (n 27)
(println "Fib(" n "): " (fib n)))