Project Euler 1 in Clojure