Use reduce.
More idomatic clojure