RosettaCodeData/Task/Fibonacci-sequence/Wart/fibonacci-sequence-2.wart
2016-12-05 23:44:36 +01:00

5 lines
69 B
Text

def (fib n)
(+ (fib n-1) (fib n-2))
def (fib n) :case (n < 2)
n