6 lines
98 B
Haskell
6 lines
98 B
Haskell
|
fib n = go n 0 1
|
||
|
|
where
|
||
|
|
go n a b
|
||
|
|
| n == 0 = a
|
||
|
|
| otherwise = go (n - 1) b (a + b)
|