;;; Globals file

;;; Types

(def-lkb-parameter *toptype* '*top*)

(def-lkb-parameter *string-type* 'string
   "a special type name - any lisp strings are subtypes of it")

(def-lkb-parameter *orth-path* '(orth))

(def-lkb-parameter *list-tail* '(rest))

(def-lkb-parameter *list-head* '(first))

(def-lkb-parameter *diff-list-type* '*dlist*)

(def-lkb-parameter *diff-list-list* 'list)

(def-lkb-parameter *diff-list-last* 'last)

;;;

(def-lkb-parameter *display-type-hierarchy-on-load* nil)

(def-lkb-parameter *simple-tree-display* t)

;;; Parsing

(def-lkb-parameter *mother-feature* NIL
   "The feature giving the mother in a grammar rule")

(def-lkb-parameter *start-symbol* '(start)
   "specifing valid parses")