元は， @plaster による `memoize` を使ったメモ化再帰 (memotest.clj). オリジナルで atom を使っていたところを var に置きかえてみました (m-fib.clj)．

m-fib.clj

(def ^:dynamic *m-fib*)

(defn fib
  [n]
  (let [fib* (memoize (fn
                        [x]
                        (if (< 1 x)
                          (+ (*m-fib* (dec x))
                             (*m-fib* (- x 2)))
                          1)))]
    (binding [*m-fib* fib*]
      (fib* n))))

memotest.clj

(defn fib [n]
  (let [a-fib (atom false)]
    (reset! a-fib (memoize (fn [n] (if (< 1 n) (+ (@a-fib (- n 1)) (@a-fib (- n 2))) 1))))
    (@a-fib n)
    ))

memotest.txt

plaster@chloe:~/src/clojure-1.5.0-RC1> java -cp clojure-1.5.0-RC1.jar clojure.main
Clojure 1.5.0-RC1
user=> (defn fib [n]
  (let [a-fib (atom false)]
    (reset! a-fib (memoize (fn [n] (if (< 1 n) (+ (@a-fib (- n 1)) (@a-fib (- n 2))) 1))))
    (@a-fib n)
    ))
#'user/fib
user=> (fib 60)
2504730781961