(def (fib n)
  (if (< n 2)
    n
    (+ (fib (- n 1))
       (fib (- n 2)))))

(def (main _)
  (let [result (fib 10)]
    (io.print (text/encode result))
    0))