Started problem 4 in clojure