Project euler in clojure