;;; -*- Mode: tdl; Coding: utf-8; -*- ;;; ;;; Copyright (c) 1994-2018 ;;; Dan Flickinger, Rob Malouf, Emily M. Bender ;;; see LICENSE for conditions ;;; ;;; lexrinst.tdl ;;; ;;; Instances of lexical rules defined in lexrules.tdl ;;; ;;; Created: Ann Copestake, 30-Sept-97 ;;; ;;; $Id: lexrinst.tdl 7043 2009-09-03 18:26:55Z oe $ v_aux-sb-inv_dlr := sai_nonell_lexrule & """ Subject-auxiliary inversion Did they arrive? """ [ RNAME lsai ]. v_aux-sb-inv-ell_dlr := sai_ell_lexrule & """ Subject-auxiliary inversion with elided verbs Did they? """ [ RNAME lsaie ]. v_cond-inv_dlr := cond_sai & """ Conditional inversion Had he left, we'd have left. """ [ RNAME csai ]. v_aux-advadd_dlr := adv_addition & """ Addition of adverb as complement They did not arrive. """ [ RNAME ladv ]. v_aux-neg-ell_dlr := adv_add_neg_ellipt & """ Elided VP with negation They would not. """ [ RNAME lnav ]. v_aux-neg-gap_dlr := adv_add_neg_gap & """ VP with negation and extracted complement A hero he is not. """ [ RNAME lnavx ]. v_aux-ell-ref_dlr := vp_ellipsis_ref & """ Elided VP compl, referentl subj He did. """ [ RNAME lver ]. v_aux-ell-xpl_dlr := vp_ellipsis_expl & """ Elided VP compl, expletive subj It did. """ [ RNAME lvex ]. v_aux-cx-noinv_dlr := contracted_aux_noninv_lexrule & """ Contracted auxiliary, no subject-auxiliary inversion Kim'll arrive. Kim'll. """ [ RNAME lcx ]. v_nger-intr_dlr := intrans_nominal_gerund & """ Nominal gerund of intrans verb Leaving was easy. """ [ RNAME lngi ]. v_nger-pp_dlr := intrans_pp_nominal_gerund & """ Nominal gerund of PP-comp verb Relying on Kim was wrong. """ [ RNAME lngp ]. v_nger-tr_dlr := trans_nominal_gerund & """ Nominal gerund of trans verb The hiring of Kim was OK. """ [ RNAME lngt ]. n_det-mnth_dlr := month_det_lexrule & """ Month name as determiner July tenth arrived. """ [ RNAME lmd ]. n_det-wkdy_dlr := weekday_det_lexrule & """ Weekday name as determiner We arrived Sunday morning. """ [ RNAME lwd ]. n_dom-ppof_dlr := dom_ppof_lexrule & """ Weekday name as determiner We arrived Sunday morning. """ [ RNAME ldp ]. j_att_dlr := attr_adj_lexrule & """ Attrib adj from trans pred adj A similar cat arrived. """ [ RNAME lja ]. v_j-nb-intr_dlr := attr_verb_part_lexrule & """ Attrib adj from intrans verb The sleeping cat stirred. """ [ RNAME ljv ]. v_j-nb-prp-tr_dlr := attr_verb_part_tr_lexrule & """ Attr adj from trans prp verb The admiring crowd ran. """ [ RNAME ljvt ]. v_j-nb-pas-tr_dlr := attr_verb_part_psv_lexrule & """ Attr adj from trans passive verb The hired consultant left. """ [ RNAME ljvp ]. v_j-nb-pas-ptcl_dlr := attr_verb_part_ptcl_psv_lexrule & """ Attr adj from passive verb+selPP The hoped for consultant left. """ [ RNAME ljvr ]. v_j-nme-intr_dlr := attr_verb_part_intr_namemod_lexrule & """ Attr adj from intr verb, nme mod, passive participle The respected Abrams won. """ [ RNAME ljvn ]. v_j-nme-intr-prp_dlr := attr_verb_part_intr_namemod_prp_lexrule & """ Attr adj from intr verb, sing. nme mod, pres participle The smiling Abrams won. """ [ RNAME ljvnp ]. #| v_j-nme-intr-pl-prp_dlr := attr_verb_part_intr_namemod_pl_prp_lexrule & """ Attr adj from intr verb, plur nme mod, pres participle We admire sparkling Ds. """ [ RNAME ljvnpp ]. |# v_j-nme-tr_dlr := attr_verb_part_tr_namemod_lexrule & """ Attr adj from trns verb, nme mod, passive participle Our admired Abrams smiled. """ [ RNAME ljnt ]. v_j-nme-tr-prp_dlr := attr_verb_part_tr_namemod_prp_lexrule & """ Attr adj from trns verb, sing. nme mod, pres participle Our winning Abrams smiled. """ [ RNAME ljntp ]. #| v_j-nme-tr-pl-prp_dlr := attr_verb_part_tr_namemod_pl_prp_lexrule & """ Attr adj from trns verb, plur. nme mod, pres participle We admire winning Ds. """ [ RNAME ljntpp ]. |# det_prt-of-agr_dlr := part_ppof_agr_constr & """ Partitive NP, PP-of, num agrmt Some of us are ready. """ [ RNAME lpca ]. det_prt-of-nagr_dlr := part_ppof_noagr_constr & """ Partitive NP, PP-of, no agrmt Each of us is ready """ [ RNAME lpcn ]. det_prt-nocmp_dlr := part_nocomp_constr & """ Partitive NP, no PP complement Most arrived. part_nocomp """ [ RNAME lpn ]. v_np-prtcl_dlr := NP_particle_lexrule & """ Particle-NP reordering He looked the answer up. """ [ RNAME lnpp ]. v_dat_dlr := dative_shift_lexrule & """ Dative shift alternation They gave the book to him. """ [ RNAME ldat ]. v_it-cp-vp_dlr := verb_it_cp_vp_lexrule & """ it-subj Verb+NP to CP or VP comp It annoyed B that we left. """ [ RNAME lvcv ]. j_n-minut_dlr := minute_noprep_lexrule & """ Integer as minute name Ten sixteen is too late. """ [ RNAME lmin ]. j_n-minut-p_dlr := minute_prep_lexrule & """ Integer as minute name with PP comp Sixteen to ten is too late. """ [ RNAME lminp ]. n_n-hour_dlr := hour_np_lexrule & """ hour plus NP complement Ten sixteen is too late. """ [ RNAME lhour ]. j_n-yofc_dlr := year_np_lexrule & """ one-or-two-digit year plus year the year nineteen sixty-nine """ [ RNAME lyear ]. v_aux-tag_dlr := tag & """ Tag question auxiliary He arrived, didn't he? """ [ RNAME ltag ]. j_enough_dlr := enough_addition_nocomps & """ Adj no-comps plus enough-compl A big enough cat arrived. """ [ RNAME leno ]. j_enough-wc_dlr := enough_addition_wcomp & """ Adj w/comps plus enough-compl, gap in VP. The window is clear enough to see through. """ [ RNAME lenc ]. j_enough-wc-nogap_dlr := enough_addition_wcomp_nogap & """ Adj w/comps plus enough-compl, no gap in VP complement The child was tired enough to fall asleep. """ [ RNAME lencn ]. j_tough_dlr := tough_adj_lexrule & """ Tough-adj alternation B is tough to admire. """ [ RNAME ltgh ]. j_tough-compar_dlr := tough_adj_compar_lexrule & """ Tough-adj alternation for comparatives B is tougher to admire than C. """ [ RNAME ltghc ]. ;; DPF 2017-06-30 - This rule now works right for parsing, but still have to ;; figure out how to block overgeneration such as *tallly* or *uglily* #| j_r-i_odlr := %suffix (* ly) (!ty !tily) """ Adjective to adverb, intersective ; Kim arrived slowly. """ adj_to_adv_int_lexrule & [ ND-AFF +, RNAME ljri ]. |# ;; DPF 2021-04-07 - Constrain to exclude inverted subject "it" ;; v_inv-quot_dlr := inverted_quote_lexrule & """ Main verb inversion for quoting He left, said Kim. """ [ SYNSEM.LOCAL.CAT.VAL.COMPS.FIRST.--SIND.PNG.GEN animate, RNAME linq ]. v_cp-frag_dlr := cp_frag_lexrule & """ Verbs of saying with fragment substituted for CP complement Yes, said Kim. """ [ RNAME lcpf ]. n_n-ed_odlr := %suffix (* ed) (!ty !tied) (e ed) (!t!v!c !t!v!c!ced) """ Noun with *-ed* suffix as adj Long-eared sheep slept. """ noun_adj_lexrule & [ ND-AFF +, RNAME lnj ]. j_n-pre_odlr := %prefix (* pre) (* pre-) """ pre- prefix on common nouns with or without hyphen The pre-war period endured. """ pre_noun_adj_lexrule & [ ND-AFF +, RNAME ljnp ]. j_n-pre-pn_odlr := %prefix (* pre-) """ pre- prefix on proper nouns, hyphen only, and capitalized noun The pre-Reagan period endured. """ pre_propn_adj_lexrule & [ ND-AFF +, RNAME ljnp ]. v_v-re_dlr := %prefix (* re) (* re-) """ Verb with *re-* prefix He re-tied his shoe. """ v_v-re_rule & [ RNAME lre ]. v_v-pre_dlr := %prefix (* pre) (* pre-) """ Verb with *pre-* prefix He pre-signed the check. """ v_v-pre_rule & [ RNAME lpre ]. v_v-mis_dlr := %prefix (* mis) (* mis-) """ Verb with *mis-* prefix He mis-tied his shoe. """ v_v-mis_rule & [ RNAME lmis ]. ;;; ;;; _fix_me_ ;;; to make this rule functional, token mapping would have to not separate off ;;; *co-* (in `derivational_prefix_tmr'). however, doing that would then mean ;;; that either (a) we provide a prefixation rule for other parts of speech too ;;; (`co-author', maybe `co-educational') or minimally adjust existing lexical ;;; entries (currently MWEs); or (b) that we create a token-level ambiguity; i ;;; hesitate doing the latter. but maybe it would not be so bad, in the end? ;;; the same problem applies to other derivational rules, of course. ;;; (13-mar-09; oe) v_v-co_dlr := %prefix (* co-) (* co) """ Verb with *co-* prefix He co-wrote the paper. """ v_v-co_rule & [ ND-AFF + ]. v_v-un_dlr := %prefix (* un) (* un-) """ Verb with *un-* prefix He untied his shoe. """ v_v-un_rule & [ RNAME lunv ]. v_v-counter_dlr := %prefix (* counter) (* counter-) """ Verb with *counter-* prefix He counter-signed the bill. """ v_v-counter_rule & [ RNAME lctv ] . v_v-over_dlr := %prefix (* over) (* over-) """ Verb with *over-* prefix He over-built the porch. """ v_v-over_rule & [ RNAME lovtv ]. v_v-out_dlr := %prefix (* out) (* out-) """ Verb with *out-* prefix He out-played his opponent. """ v_v-out_rule & [ RNAME lotv ]. v_v-self_dlr := %prefix (* self) (* self-) """ Verb with *self-* prefix He was self-insured. """ v_v-self_rule & [ RNAME lsfv ]. v_v-cross_dlr := %prefix (* cross) (* cross-) """ Verb with *cross-* prefix He cross-examined the witness. """ v_v-cross_rule & [ RNAME lcsv ]. v_v-under_dlr := %prefix (* under) (* under-) """ Verb with *under-* prefix The area is under-developed """ v_v-under_rule & [ RNAME luvtv ]. n_n-co_dlr := %prefix (* co) (* co-) """ Noun with *co-* prefix Our co-teacher arrived. """ n_n-co_rule & [ RNAME lnco ]. n_n-co-ni_dlr := %prefix (* co) (* co-) """ Noun with *co-* prefix, non-inflecting Our co-derivatives group arrived. """ n_n-co-ni_rule & [ RNAME lncon ]. n_n-counter_dlr := %prefix (* counter) (* counter-) """ Noun with *counter-* prefix The counter-proposal arrived. """ n_n-counter_rule & [ RNAME lctn ]. n_n-counter-ni_dlr := %prefix (* counter) (* counter-) """ Noun with *counter-* prefix, non-inflecting The counter-narcotics team arrived. """ n_n-counter-ni_rule & [ RNAME lctnn ]. n_n-mini_dlr := %prefix (* mini) (* mini-) """ Noun with *mini-* prefix The mini-car arrived. """ n_n-mini_rule & [ RNAME lctn ]. n_n-mini-ni_dlr := %prefix (* mini) (* mini-) """ Noun with *mini-* prefix, non-inflecting The mini-car transporter arrived. """ n_n-mini-ni_rule & [ RNAME lctnn ]. j_j-co_dlr := %prefix (* co-) (* co) """ Adjective with *co-* prefix The co-educational hall opened. """ j_j-co_rule & [ RNAME ljco ]. j_j-un_dlr := %prefix (* un-) (* un) """ Adjective with *un-* prefix The unhappy cat arose. """ j_j-un_rule & [ RNAME lunj ]. j_j-non_dlr := %prefix (* non) """ Adjective with *non* prefix The nonlinear solution failed. """ j_j-non_rule & [ RNAME lnnj ]. j_j-over_dlr := %prefix (* over-) (* over) """ Adjective with *over-* prefix The over-optimistic player arrived. """ j_j-over_rule & [ RNAME ljco ]. w_period_plr := %suffix (!. !..) """ Period affixed to end of word, utterance-medially We left. They arrived. He said "Freeze. Don't move!". 2. Buy diamands. """ punctuation_period_rule & [ RNAME lpp ]. w_qmark_plr := %suffix (!p !p\?) """ Question mark affixed to word, now used only in generation cat? """ punctuation_qmark_rule & [ RNAME lpq ]. ; ; ; w_comma_plr := %suffix (* ,) """ Comma affixed to word, now used only in generation cat, """ punctuation_comma_rule & [ RNAME lpcm ]. ;; DPF 22-12-31 - Allowed for cluster of italics with parentheses nested inside ;; FIX someday with more general solution for such clusters. ;; w_italleft_plr := %prefix (!f ⌊/!f) (!f ❲!f) (!f ⌊/\(!f) """ Italics mark *⌊/* prefixed ⌊/cat """ punctuation_italleft_rule & [ RNAME lpil ]. w_italright_plr := %suffix (!r !r/⌋) (!r !r❳) (!r !r\)/⌋) """ Italics mark */⌋* affixed cat/⌋ """ punctuation_italright_rule & [ RNAME lpir ]. w_drop-ileft_plr := %prefix (!f ⌊/!f) """ Ignored italics mark prefixed ⌊/cats See ErgGml page in DELPH-IN wiki for documentation """ punct_drop_italleft_rule & [ RNAME lpxdl ]. w_drop-iright_plr := %suffix (!r !r/⌋) """ Ignored italics mark suffixed cats/⌋ See ErgGml page in DELPH-IN wiki for documentation """ punct_drop_italright_rule & [ RNAME lpxdr ]. w_rparen_plr := %suffix (!p !p\)) """ Right parenthesis affixed for clusters where tokenizing does not separate paren (DTD)-based LR (LR(1)) parser """ w_rparen_rule & [ RNAME lprp ].