FizzBuzz in Clojure

(ns tom
  (:require
    [clojure.pprint :as pprint]
    )
  (:import [tom IFizzBuzz])
  (:gen-class)
  )


(defn FizzBuzz
  "fizz to the buzz"
  []
  (reify
    IFizzBuzz
    (count [this COUNT]
      (loop [x COUNT]
        (when (> x 0)
          (cond (= (mod x 3) 0) (println "Fizz")
                (= (mod x 5) 0) (println "Buzz")
                :else (println x))
          (recur (- x 1)))
        )
      )
    )
  )