RosettaCodeData/Task/Fibonacci-sequence/FunL/fibonacci-sequence-2.funl

8 lines
167 B
Plaintext

def fib( n ) =
def
_fib( 0, prev, _ ) = prev
_fib( 1, _, next ) = next
_fib( n, prev, next ) = _fib( n - 1, next, next + prev )
_fib( n, 0, 1 )