9 lines
172 B
Text
9 lines
172 B
Text
fib_aux = { x, next, result |
|
|
true? x == 0,
|
|
result,
|
|
{ fib_aux x - 1, next + result, next }
|
|
}
|
|
|
|
fibonacci = { x |
|
|
fib_aux x, 1, 0
|
|
}
|