(in-package :mt) (defparameter *transfer-interlingua-predicates* '(lkb::named_rel lkb::compound_rel lkb::pron_rel)) ;;; Target Language Model ;;;(setf *transfer-tm* ;;; (namestring (make-pathname ;;; :directory (namestring ;;; (dir-append ;;; (get-sources-dir "mt") '(:relative "mt"))) ;;; :name "mrs.blm")))