;;; -*- Mode: TDL; Coding: utf-8 -*- ;;; HAG (Hausa Grammar) ;;; Author: Berthold Crysmann ;;; 2009 ;;; Non-inflectional lexical rules ;;; Valency alternation ;;;supra-reent_lr := supra-reent-lex-rule. canon_comps_lr := canon-do-lex-rule. ; non-canon_comps_lr := non-canon-do-lex-rule. ; canon_subj_lr := canon-subj-lex-rule. ; non-canon_subj_lr := non-canon-subj-lex-rule. ; null-pron-subj_lr := ; null-pron-subj-lex-rule. null-pron-comp_lr := null-pron-do-lex-rule. ; #| ; opt-comp2_B-C_lr := null-pron-do2-lex-rule & ; [SYNSEM.LOCAL.CAT.VAL.COMPS frame-B-C-val-cons, ; DTR.SYNSEM.LOCAL.CAT.VAL.COMPS frame-B-C-val-cons ]. ; opt-comp2_D_lr := null-pron-do2-lex-rule & ; [SYNSEM.LOCAL.CAT.VAL.COMPS frame-D-val-cons, ; DTR.SYNSEM.LOCAL.CAT.VAL.COMPS frame-D-val-cons ]. ; |# ; comp-extra_lr := comp-extra-lex-rule. ; comp2-extra_lr := comp2-extra-lex-rule. ; gr5-da-particle_lr := ; gr5-da-particle-lex-rule. ; applic-tr-0_lr := applic-tr-lex-rule & ; [SYNSEM.LOCAL.CAT.VAL.COMPS <[LOCAL.CAT.VAL.COMPS <>] . #comps>, ; DTR.SYNSEM.LOCAL.CAT.VAL.COMPS #comps]. ; applic-tr-1_lr := applic-tr-lex-rule & ; [SYNSEM.LOCAL.CAT.VAL.COMPS <[LOCAL.CAT.VAL.COMPS <#c & canonical-synsem>], #c . #comps>, ; DTR.SYNSEM.LOCAL.CAT.VAL.COMPS #comps]. ; ; applic-tr-2_lr := applic-tr-lex-rule & ; ; [SYNSEM.LOCAL.CAT.VAL.COMPS <[LOCAL.CAT.VAL.COMPS <#c>], [BOUND +], #c . #comps>, ; ; DTR.SYNSEM.LOCAL.CAT.VAL.COMPS #comps]. ; mod-to-prd_lr := mod-to-prd-tr-lex-rule. poss-tr-lr := noun-poss-tr-lex-rule. ; adj-tr-lr := adj-tr-lex-rule. ; ;;; Demonstrative type raising rules dem-prox-high_lr := noun-dem-proximate-tr-lex-rule & [SUPRA [TONE #tone, LEN [LIST #llist, LAST #llast]], DTR [SUPRA [TONE #tone & [LIST ], LEN [LIST #llist, LAST #llast] ]]]. dem-prox-low_lr := noun-dem-proximate-tr-lex-rule & [SUPRA [TONE #tone, LEN [LIST #llist, LAST #llast]], DTR [SUPRA [TONE #tone & [LIST ], LEN [LIST #llist, LAST #llast] ]]]. dem-rem-high_lr := noun-dem-remote-tr-lex-rule & [SUPRA [TONE [LIST , LAST #tlast], LEN [LIST #llist, LAST #llast] ], DTR [SUPRA [TONE [LIST , LAST #tlast], LEN [LIST #llist, LAST #llast] ]]]. dem-rem-low_lr := noun-dem-remote-tr-lex-rule & [SUPRA [TONE #tone, LEN [LIST #llist, LAST #llast]], DTR [SUPRA [TONE #tone & [LIST ], LEN [LIST #llist, LAST #llast] ]]].