problem 13 in clojure