(define fib
  0 -> 0
  1 -> 1
  N -> (+ (fib (- N 1)) (fib (- N 2))))

(define run
  -> (output "Fibonacci of 10: ~A~%" (fib 10)))