project euler problem 5 in clojure