RosettaCodeData/Task/Fibonacci-sequence/Haskell/fibonacci-sequence-2.hs

2 lines
74 B
Haskell

fib x = if x < 1 then 0 else if x < 2 then 1 else fib(x - 1) + fib(x - 2)