Project Euler Problem 018 in Clojure