added p22.clj