Exercise 1.32 in Clojure