(in-package :user)

;;  This loads the parser and lexicon for Section 9.6

(enableSem)

(loadf "Grammars/Chapter9")

(Make-lexicon (append *lexicon9-2* 
                        (append *lexicon-auxs* *lexicon-additions*)))
(make-grammar *grammar9-3*)
(augment-grammar *grammar9-13*)
(Format t "~%Words defined are ~S " (defined-words))

