More than 5 years have passed since last update.

condpを利用したFizzBuzz

Posted at 2014-07-05

(defn fizzbuzz [x]
  (condp #(= (mod %2 %1) 0) x
    15 "FizzBuzz"
    3 "Fizz"
    5 "Buzz"
    x))

condの各条件の中で使用する変数が共通の場合、condpが便利。
'%1'には引数x、'%2'には場合分けの15,3,5がそれぞれ対応する。