User:Icarot

<source lang="clojure"> (defn ack [m n]

 (cond (zero? m) (inc n)
              (zero? n) (ack (dec m) 1)
  :else (ackermann (dec m) (ack m (dec n)))))</source>

yummmmm.