problem 9 in clojure