;; THIS GRAMMAR IS BROKEN

(lkb-load-lisp (this-directory) "globals.lsp")
#+mrs(lkb-load-lisp (this-directory) "mrs-globals-ygg.lisp")
(lkb-load-lisp (this-directory) "user-fns.lsp")
(load-lkb-preferences (this-directory) "user-prefs.lsp")
(lkb-load-lisp (this-directory) "checkpaths.lsp" t)
(read-tdl-type-files-aux
     (list 
	(lkb-pathname (this-directory) "common.types.tdl")
	(lkb-pathname (this-directory) "linking.types.tdl")
	(lkb-pathname (this-directory) "mrs.types.tdl")
	(lkb-pathname (this-directory) "main.types.tdl")))
(read-tdl-lex-file-aux 
     (lkb-pathname (this-directory) "lexicon.tdl"))
(read-tdl-grammar-file-aux 
     (lkb-pathname (this-directory) "grules.tdl"))
(read-morph-file-aux (lkb-pathname (this-directory) "infl-lrules.tdl"))
(read-tdl-lex-rule-file-aux (lkb-pathname (this-directory) "lrules.tdl"))
(load-irregular-spellings (lkb-pathname (this-directory) "irregs.txt"))
(read-tdl-psort-file-aux 
          (lkb-pathname (this-directory) "roots.tdl"))
(read-tdl-parse-node-file-aux 
          (lkb-pathname (this-directory) "parse-nodes.tdl"))