4 lines
90 B
Text
4 lines
90 B
Text
|
fib = fib' 0 1
|
||
|
|
where fib' a b 0 = a
|
||
|
|
fib' a b n = fib' b (a + b) (n - 1)
|