mirror of
https://github.com/MartinThoma/LaTeX-examples.git
synced 2025-04-26 06:48:04 +02:00
5 lines
122 B
Haskell
5 lines
122 B
Haskell
fibAkk n n1 n2
|
|
| (n == 0) = n1
|
|
| (n == 1) = n2
|
|
| otherwise = fibAkk (n - 1) n2 (n1 + n2)
|
|
fib n = fibAkk n 0 1
|