;;; Hey, emacs(1), this is -*- Mode: Common-Lisp; Package: LKB; -*- got it?

;;;
;;; first, load a number of LKB-specific settings; typically no need to look
;;; too closely here.  most of these are simplified from the Transfer MatriX.
;;;
(lkb-load-lisp (this-directory) "Version.lsp" t)
(lkb-load-lisp (this-directory) "globals.lsp")
(lkb-load-lisp (this-directory) "user-fns.lsp")

;;;
;;; among others things, we require the ERG SEM-I to convert from EDS to MRS;
;;; while there are a handful of predicats that occur as both types and strings
;;; (which should not be the case), we use a modified copy of the 1214 SEM-I,
;;; where 52 string variants are removed (which could in principle cost a little
;;; bit of coverage, as corresponding lexical entries will not be activated, but
;;; we conjecture that the symbol variants are the primary ones).
;;;
(mt:read-semi (lkb-pathname (this-directory) "erg.smi"))

;;;
;;; and a few more LKB-specific settings, this time for MRS post-processing,
;;; generation, and transfer.
;;;
(lkb-load-lisp (this-directory) "mrsglobals.lsp" t)
(lkb-load-lisp (this-directory) "mt.lsp")

;;;
;;; next load the common transfer type hierarchy (from the Transfer MatriX).
;;;
(read-tdl-type-files-aux
  (list 
   (lkb-pathname (this-directory) "mrs.tdl")
   (lkb-pathname (this-directory) "predicates.tdl")
   (lkb-pathname (this-directory) "mtr.tdl")))

;;;
;;; for robust generation from EDSs, there is only one set of transfer rules.
;;;
(mt:read-transfer-rules 
 (list
  (lkb-pathname (this-directory) "mark.mtr")
  (lkb-pathname (this-directory) "scope.mtr")
  (lkb-pathname (this-directory) "purge.mtr"))
 "Robust Generation from Elementary Dependency Structures"
 :filter nil :task :scope)