testing clojure

myfirst_clojure_program.clj

(defn fizzbuzz [max_value]
    (fizzbuzz_acc max_value 1))

(defn fizzbuzz_acc [max_value acc]
    (if (<= acc max_value)
        (do (if (is_fizzbuzz acc)
                (println "fizzbuzz")
                (if (is_fizz acc)
                    (println "fizz")
                    (if (is_buzz acc)
                        (println "buzz")
                        (println acc))))
            (recur max_value (+ 1 acc)))))

(defn is_fizzbuzz [value]
    (and (is_fizz value) (is_buzz value)))

(defn is_fizz [value]
    (= (mod value 3) 0))

(defn is_buzz [value]
  (= (mod value 5) 0))