Update p007.clj