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

7 lines
85 B
Clojure
Raw Permalink Normal View History

2019-09-12 10:33:56 -07:00
(defn fib [n]
(case n
0 0
1 1
(+ (fib (- n 1))
(fib (- n 2)))))