p2 in clojure