RosettaCodeData/Task/Fibonacci-sequence/Elm/fibonacci-sequence-2.elm

7 lines
100 B
Elm

fib : Int -> number
fib n =
case n of
0 -> 0
1 -> 1
_ -> fib (n-1) + fib (n-2)