fizzbuzz.clj

(defn fizzbuzz 
  "If div by 3, fizz; if by div by 5, buzz;
   if div by both, fizzbuzz"
  [num]
  (if (zero? (mod num 3))
    (if (zero? (mod num 5))
	  "fizzbuzz"
	  "fizz")
	(when (zero? (mod num 5))
	  "buzz")))
	
(map #(println % ":"(fizzbuzz %)) (range 50))