Problem 2 in Clojure