gistfile1.txt

(defn problem26-fibs [x]
  (let [fibs
         ((fn fibs [so-far]
            (lazy-seq
                (fibs
                    (cons (+ (first so-far) (second so-far)) so-far)
                    )))
            '(1 1))]
          (take x fibs)))
          
(user=> (problem26-fibs 1)
ArithmeticException integer overflow  clojure.lang.Numbers.throwIntOverflow (Num
bers.java:1501)