RosettaCodeData/Task/Fibonacci-sequence/Wart/fibonacci-sequence-2.wart

6 lines
69 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
def (fib n)
(+ (fib n-1) (fib n-2))
def (fib n) :case (n < 2)
n