improved 131's clojure solution