RosettaCodeData/Task/Fibonacci-sequence/Clojure/fibonacci-sequence-8.clj

7 lines
85 B
Clojure

(defn fib [n]
(case n
0 0
1 1
(+ (fib (- n 1))
(fib (- n 2)))))