better p2 clojure