reorganized lisp