Entries from 2011-09-08 to 1 day

FIZZBUZZのテストを書き直し

(ns test.fizzbuzz (:use clojure.test)) (defn whole-numbers [] (iterate inc 1)) (defn fizzbuzz [num] (cond (= (rem num 15) 0) "FIZZBUZZ" (= (rem num 3) 0) "FIZZ" (= (rem num 5) 0) "BUZZ" :else (str num))) (deftest fizzbuzz-test (are [expect…