;; token type:
(defparameter *token-type* 'token)
;; paths in token fs:
(defparameter *token-form-path* '(+FORM))
(defparameter *token-id-path* '(+ID))
(defparameter *token-from-path* '(+FROM))
(defparameter *token-to-path* '(+TO))
(defparameter *token-postags-path* '(+TNT +TAGS))
(defparameter *token-posprobs-path* '(+TNT +PRBS))
;; path to token feature structures in lexical items:
(defparameter *lexicon-tokens-path* '(TOKENS +LIST))
(defparameter *lexicon-last-token-path* '(TOKENS +LAST))
;; paths in chart mapping rules:
(defparameter *chart-mapping-context-path* '(+CONTEXT))
(defparameter *chart-mapping-input-path* '(+INPUT))
(defparameter *chart-mapping-output-path* '(+OUTPUT))
(defparameter *chart-mapping-position-path* '(+POSITION))
(defparameter *chart-mapping-jump-path* '(+JUMP))

(pprint "TM loaded.")