added p23.clj