RosettaCodeData/Task/Fibonacci-sequence/SequenceL/fibonacci-sequence-2.sequencel
2023-07-01 13:44:08 -04:00

8 lines
172 B
Text

fibonacci(n) := fibonacciHelper(0, 1, n);
fibonacciHelper(prev, next, n) :=
prev when n < 1
else
next when n = 1
else
fibonacciHelper(next, next + prev, n - 1);