clojure solution to p25 in place