;;; -*- Mode: tdl; Coding: utf-8; -*- tnt_default_tmr := one_one_tmt & [ +INPUT < [ +FORM #form, +TRAIT #trait, +CLASS #class, +PRED #pred, +CARG #carg, +TNT [ +TAGS < anti_string, ... > ], +STAG #stag ] >, +OUTPUT < [ +FORM #form, +TRAIT #trait, +CLASS #class, +PRED #pred, +CARG #carg, +TNT null_tnt, +STAG #stag ] > ]. stag_default_tmr := one_one_tmt & [ +INPUT < [ +FORM #form, +TRAIT #trait, +CLASS #class, +PRED #pred, +CARG #carg, +TNT #tnt, +STAG [ +TAGS < anti_string, ... > ] ] >, +OUTPUT < [ +FORM #form, +TRAIT #trait, +CLASS #class, +PRED #pred, +CARG #carg, +TNT #tnt, +STAG null_tnt ] > ]. #| tnt_stag_copy_tmr := token_mapping_rule & [ +CONTEXT < [ +FORM #form, +TRAIT anti_trait, +CLASS #class, +PRED #pred, +CARG #carg, +ID #id, +FROM #from, +TO #to, +STAG null_tnt, +TNT [ +TAGS #tags & *cons* , +PRBS #prbs & *cons* ] ] > , +OUTPUT < [ +FORM #form, +CLASS #class, +PRED #pred, +CARG #carg, +ID #id, +FROM #from, +TO #to, +TNT null_tnt, +STAG [ +TAGS #tags, +PRBS #prbs ] ] > , +POSITION "O1@C1" ]. |#