RosettaCodeData/Task/Fibonacci-sequence/Hy/fibonacci-sequence.hy

5 lines
82 B
Hy

(defn fib [n]
(if (< n 2)
n
(+ (fib (- n 2)) (fib (- n 1)))))