add bok.lisp