6 lines
99 B
Text
6 lines
99 B
Text
|
let fib n =
|
||
|
|
let rec aux i a b =
|
||
|
|
if i = 0 then a else aux (pred i) b (a + b)
|
||
|
|
in
|
||
|
|
aux n 0 1
|