RosettaCodeData/Task/Fibonacci-sequence/Hy/fibonacci-sequence.hy
2016-12-05 23:44:36 +01:00

4 lines
82 B
Hy

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