A 3-lisp interpreter implemented in Common Lisp