test.clj

(defn fizzbuzz
  [from to]
  (map
    #(let [ fb [(zero? (mod % 3)) (zero? (mod % 5))]]
      (condp = fb
             [true true] "FizzBuzz"
             [true false] "Fizz"
             [false true] "Buzz"
             %))
  (range from to)))

(println (fizzbuzz 1 101))