(in-package :user)

;;  This loads the grammar and lexicon for Section 9.3

(enableSem)

(loadf "Grammars/Chapter9")

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