Worked on another 4clojure problem