p3 clojure work, needs more work