Beginnings of an euler22 in clojure -- sorted names score