added p15.clj