RosettaCodeData/Task/Fibonacci-sequence/Fe/fibonacci-sequence-1.fe

4 lines
70 B
Plaintext

(= fib (fn (n)
(if (< n 2) n
(+ (fib (- n 1)) (fib (- n 2))))))