RosettaCodeData/Task/Anonymous-recursion/Wart/anonymous-recursion.wart
2023-07-01 13:44:08 -04:00

7 lines
210 B
Text

def (fib n)
if (n >= 0)
(transform n :thru (afn (n)
(if (n < 2)
n
(+ (self n-1)
(self n-2)))))