add P26.lisp