;;; -*- Mode: TDL; Coding: utf-8 -*- decade_ersatz := generic-count-noun-le & [ MORPH.LIST.FIRST.STEM < "decadeersatz" >, SYNSEM [LKEYS [ --SUBJOPT -, KEYAGR c-p-n, MCLASS nclass-2_-u, KEYTAG #carg, KEYREL "_decade_n_rel", KEYSORT anything ], LOC.CONT.KEY.CARG #carg & *top*]]. finden-mental-r-np-var := ditrans-nerg-verb-le & [ MORPH.LIST.FIRST.STEM < "find" >, SYNSEM [ LKEYS [ MCLASS vclass-irr, --COMPOPT -, --COMPSORT abstract, --OCOMPAGR a-n-g, --OCOMPOPT -, --OCOMPSORT anything, --SUBJOPT -, --SUBJSORT human, KEYREL "_finden_v_haben_rel", KEYSORT mental_sit ], LOC.CAT.SUBCAT.LIST.FIRST.LOC.CONT.KEY pron_rel ] ]. wuerde-hv-vmfin := intrans-nerg-verb-le & [ MORPH [ LAST #1, LIST [ FIRST [ HEAD vmorph-fin-head & [ FIN.e pst-sbj ], STEM < "werd" > ], REST #1 ] ], SYNSEM.LKEYS [ MCLASS vclass-irr, --SUBJOPT -, --SUBJSORT human, KEYFORM haben-auxf, KEYREL "_wollen_v_rel", KEYSORT mental_sit ] ]. haben-t := trans-nerg-str-verb-le & [ MORPH.LIST.FIRST.STEM < "hab" >, SYNSEM [ LKEYS [ MCLASS vclass-irr, --COMPOPT -, --COMPSORT anything, --SUBJOPT -, --SUBJSORT anything, KEYFORM haben-auxf, KEYREL "_haben_v_haben_rel", KEYSORT anything ], LOC.CAT.HEAD.PASSIVE - ] ]. schreiben-var := trans-nerg-str-verb-le & [ MORPH.LIST.FIRST.STEM < "schreib" >, SYNSEM [ LKEYS [ MCLASS vclass-irr, --COMPOPT -, --COMPSORT anything, --SUBJOPT -, --SUBJSORT human, KEYFORM haben-auxf, KEYREL "_schreiben_v_haben_rel", KEYSORT situation ], LOC.CAT.SUBCAT.LIST.FIRST.LOC.CONT.HOOK.INDEX non_refl_ind ] ]. schreiben_sich-var := ditrans-nerg-verb-le & [ MORPH.LIST.FIRST.STEM < "schreib" >, SYNSEM [ LKEYS [ MCLASS vclass-irr, --COMPOPT -, --COMPSORT symbol, --OCOMPAGR a-n-g, --OCOMPOPT -, --OCOMPSORT anything, --SUBJOPT -, --SUBJSORT anything, KEYREL "_schreiben_v_refl-haben_rel", KEYSORT situation ], LOC.CAT.SUBCAT.LIST.FIRST.LOC.CONT.KEY pron_rel & [ VTYPE refl ] ] ].