Clojure FizzBuzz from http://codingkata.org/katas/

gistfile1.clj

(defn- fizz-buzz-step [n]
  (let [fizzing? (= 0 (mod n 3))
        buzzing? (= 0 (mod n 5))]
    (if fizzing? (println "Fizz"))
    (if buzzing? (println "Buzz"))
    (if (not (or fizzing? buzzing?))
      (println n))))

(defn fizz-buzz []
  (doall (map fizz-buzz-step (range 0 100))))

(fizz-buzz)