Update p001.clj

update comment.