;;;-*- Mode: TDL; Package: LKB; Coding: euc-jp; -*-
; Experimental rule types for Ja-En MT system -- eric-n 2006/8/30

noun_adj_mtr := monotonic_mtr &
[ INPUT.RELS < [ LBL #h, ARG0 #x ] >,
  OUTPUT.RELS < [ LBL #h, 
		  ARG0 e & [ TENSE UNTENSED, MOOD INDICATIVE ],
		  ARG1 #x ] > ].

noun_adj+time_n_rel-mtr := monotonic_mtr &
[ INPUT.RELS < [ LBL #h, ARG0 #x ] >,
  OUTPUT.RELS < [ LBL #h, 
		  ARG0 e & [ TENSE UNTENSED, MOOD INDICATIVE ],
		  ARG1 #x ],
		[ PRED time_n_rel, LBL #h, ARG0 #x ] > ].

;;; don't use the vn mtr type for sahen. without messages we still need to check ARG0
;;; and this breaks compound noun handling -- eric 2008/06/15

; vn_mtr := monotonic_mtr &
; [ CONTEXT.RELS < [ PRED udef_rel, ARG0 #x0, RSTR #h2 ] >,
;   INPUT [ RELS < [ LBL #h0, ARG0 #x0 ],
; 		 [ PRED proposition_m_rel,  LBL #h4, ARG0 #x0, MARG #h5 ],
;                  [ PRED "noun-relation", LBL #h6, ARG0 #x0, ARG1 #h4 ] >,
;           HCONS < qeq & [ HARG #h5, LARG #h0 ],
;                   qeq & [ HARG #h2, LARG #h6 ] > ],
;   OUTPUT [ RELS < [ LBL #h0, ARG0 #x0 ] >,
;            HCONS < qeq & [ HARG #h2, LARG #h0 ] > ] ].

; vn_omtr := vn_mtr & optional_mtr.

pn_mtr := noun_mtr &
[ INPUT.RELS < [ PRED named_rel ]>,
  OUTPUT.RELS < [ PRED named_rel ] > ].

pn_omtr := proper_noun_mtr & optional_mtr.