Improving day 1 exercise 2 of clojure using cond