(define fib0
(lambda (n a b)
(match n (0 a)
(1 b)
(_ (fib0 (- n 1)
b
(+ a b))))))
(define fib (lambda (n)
(fib0 n 0 1)))
(= (fib 10) 55)