;;; Nouns

;;; Some dynamic nouns


aikìi_n := n_-_m_le & 
	    [ STEM < "aiki" >,
        SYNSEM.LKEYS [SYLS _short_long_,
                      --MCLASS n-pl-none,
                      --TONE h*-l-list,
                      KEYREL.PRED "_aikìi_n_work_rel" ]].

aikìi_an := an_np_m_le & 
            [ STEM < "aiki" >,
              SYNSEM.LKEYS [SYLS _short_long_,
                            --MCLASS n-pl-none,
                            --TONE h*-l-list,
			    KEYREL.PRED "_aikìi_n_work_rel" ]].


tsàmmaanìi_an := an_cp_m_le & 
                 [ STEM < "tsammani" >,
                   SYNSEM.LKEYS [SYLS _short_long_long_,
                                 --MCLASS n-pl-none,
                                 --TONE l*-h-l-list,
                                 KEYREL.PRED "_tsàmmaanìi_n_thinking_rel" ]].

zàtoo_an := an_cp_m_le & 
	    [ STEM < "zato" >,
        SYNSEM.LKEYS [SYLS _short_long_,
                      --MCLASS n-pl-none,
                      --TONE l*-h-list,
                      KEYREL.PRED "_zàtoo_n_think_rel" ]].

; muhimmanci_an := an_expl_cp_m_le & 
; 	    [ STEM < "muhimmanci" >,
; 	      SYNSEM.LKEYS [SYLS _short_short_short_long_,
; 			    --MCLASS n-pl-none,
; 			    --TONE h*-list,
; 			    KEYREL.PRED "_muhimmancii_n_important_rel" ]].

;;; Some mass nouns

kyâu_n := n_-_m_le &
	  [ STEM < "kyau" >,
      SYNSEM.LKEYS [SYLS _short_,
                    --MCLASS n-pl-none,
                    --TONE h*-hl-list,
                    KEYREL.PRED "_kyâu_n_beauty_rel" ]].

girmaa_n := n_-_m_le &
            [ STEM < "girma" >,
              SYNSEM.LKEYS [SYLS _short_long_,
                            --MCLASS n-pl-none,
                            --TONE h*-list,
                            KEYREL.PRED "_girmaa_n_bigness_rel" ]].

tsaawoo_n := n_-_m_le &
             [ STEM < "tsawo" >,
               SYNSEM.LKEYS [SYLS _long_long_,
                             --MCLASS n-pl-none,
                             --TONE h*-list,
                             KEYREL.PRED "_tsawoo_n_height_rel" ]].


àbincii_n := n_-_m_le &
             [ STEM < "abinci" >,
               SYNSEM.LKEYS [SYLS _short_short_long_,
                             --MCLASS n-pl-none,
                             --TONE l*-h-h-list,
                             KEYREL.PRED "_àbincii_n_food_rel" ]].


tabàa_n := n_-_f_le &
           [ STEM < "taba" >,
             SYNSEM.LKEYS [SYLS _long_long_,
                           --MCLASS n-pl-none,
                           --TONE h*-l-list,
                           KEYREL.PRED "_tabàa_n_tobacco_rel" ]].

giyàa_n := n_-_f_le &
	  [ STEM < "giya" >,
      SYNSEM.LKEYS [SYLS _short_long_,
                    --MCLASS n-pl-none,
                    --TONE h*-l-list,
                    KEYREL.PRED "_giyàa_n_beer_rel" ]].

naamàa_n := n_-_m_le &
	  [ STEM < "nama" >,
	    SYNSEM.LKEYS [SYLS _long_long_,
			  --MCLASS n-pl-none,
			  --TONE h*-l-list,
			  KEYREL.PRED "_namàa_n_meat-flesh_rel" ]].


;;; CLASS I (H* oCi)


kàasuwaa_n := n_-_f_le &
	  [ STEM < "kasuwa" >,
	    SYNSEM.LKEYS [SYLS _long_short_long_,
			  --MCLASS n-pl-1,
			  --TONE l*-h-h-list,
			  KEYREL.PRED "_kàasuwaa_n_market_rel" ]].


ƙoofàa_n := n_-_f_le &
	  [ STEM < "ƙofa" >,
	    SYNSEM.LKEYS [SYLS _long_long_,
			  --MCLASS n-pl-1,
			  --TONE h*-l-list,
			  KEYREL.PRED "_ƙoofàa_n_door_rel" ]].

fensir_n := n_-_m_le &
	  [ STEM < "fensir" >,
	    SYNSEM.LKEYS [SYLS _short_short_,
			  --MCLASS n-pl-1,
			  --TONE h*-l-list,
			  KEYREL.PRED "_fensìr_n_pencil_rel" ]].

taagàa_n := n_-_f_le &
	  [ STEM < "taga" >,
	    SYNSEM.LKEYS [SYLS _long_long_,
			  --MCLASS n-pl-1,
			  --TONE h*-l-list,
			  KEYREL.PRED "_taagàa_n_window_rel" ]].



ƙaagùwaa_n := n_-_f_le &
	  [ STEM < "ƙaguwa" >,
	    SYNSEM.LKEYS [SYLS _long_short_long_,
			  --MCLASS n-pl-1,
			  --TONE h*-list,
			  KEYREL.PRED "_ƙaagùwaa_n_crab-tongs-pincers_rel" ]].

bindigàa_n := n_-_f_le &
	  [ STEM < "bindiga" >,
	    SYNSEM.LKEYS [SYLS _short_short_long_,
			  --MCLASS n-pl-1,
			  --TONE h*-l-list,
			  KEYREL.PRED "_bindigàa_n_gun_rel" ]].

tàmbayàa_n := n_-_f_le &
	  [ STEM < "tambaya" >,
	    SYNSEM.LKEYS [SYLS _short_short_long_,
			  --MCLASS n-pl-1,
			  --TONE l*-h-l-list,
			  KEYREL.PRED "_tàmbayàa_n_question_rel" ]].

kwàmìtîi_n := n_-_f_le &
	  [ STEM < "kwamiti" >,
	    SYNSEM.LKEYS [SYLS _short_short_long_,
			  --MCLASS n-pl-1,
			  --TONE l*-hl-list,
			  KEYREL.PRED "_kwàmìtîi_n_committee_rel" ]].

dàamisàa_n := n_-_f_le &
	  [ STEM < "damisa" >,
	    SYNSEM.LKEYS [SYLS _long_short_long_,
			  --MCLASS n-pl-1,
			  --TONE l*-h-l-list,
			  KEYREL.PRED "_dàamisàa_n_leopard_rel" ]].

oofìs_n := n_-_f_le &
	  [ STEM < "ofis" >,
	    SYNSEM.LKEYS [SYLS _long_short_,
			  --MCLASS n-pl-1,
			  --TONE h*-l-list,
			  KEYREL.PRED "_oofìs_n_office_rel" ]].


;;; CLASS II (L*-H -ai)

;;; Regular
àlmàbazzàrii_n := n_-_m_le &
	  [ STEM < "almubazzari" >,
	    SYNSEM.LKEYS [SYLS _short_short_short_short_long_,
			  --MCLASS n-pl-2_reg,
			  --TONE l*-h-l-h-list,
			  KEYREL.PRED "_àlmàbazzàrii_n_spendthrift_rel" ]].


ɗaalìbii_n := n_-_m_le &
  [ STEM < "ɗalibi" >,
    SYNSEM.LKEYS [SYLS  _long_short_long_,
		  --MCLASS n-pl-2_reg,
		  --TONE h*-l-h-list,
		  KEYREL.PRED "_ɗaalìbii_n_student_rel" ]].



maalàmii_n := n_-_m_le &
	  [ STEM < "malami" >,
	    SYNSEM.LKEYS [SYLS _long_short_long_,
			  --MCLASS n-pl-2_reg,
			  --TONE h*-l-h-list,
			  KEYREL.PRED "_maalàm_n_teacher_rel" ]].


;;; Irregular singular variant
maalàm_n := n_-_m_le &
	  [ STEM < "malam" >,
	    SYNSEM.LKEYS [SYLS _long_short_,
			  --MCLASS n-pl-none,
			  --TONE h*-l-list,
			  KEYREL.PRED "_maalàm_n_teacher_rel" ]].


;;; Geminated

ɗamìi_n := n_-_m_le &
  [ STEM < "ɗami" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_damìi_n_bundle_rel" ]].

;;; Now generalised to II or V
; gaɓàa_n := n_-_f_le &
;   [ STEM < "gaɓa" >,
;     SYNSEM.LKEYS [SYLS  _short_long_,
; 		  --MCLASS n-pl-2_gem,
; 		  --TONE h*-l-list,
; 		  KEYREL.PRED "_gaɓàa_n_joint-limb_rel" ]].


ƙyamìi_n := n_-_m_le &
  [ STEM < "ƙyami" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_ƙyamìi_n_fan+palm+beam_rel" ]].

kwabòo_n := n_-_m_le &
  [ STEM < "kwabo" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_kwabòo_n_kobo_rel" ]].

tabòo_n := n_-_m_le &
  [ STEM < "tabo" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_tabòo_n_scar_rel" ]].

ràboo_n := n_-_m_le &
  [ STEM < "rabo" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE l*-h-list,
		  KEYREL.PRED "_ràboo_n_share+division_rel" ]].

tudùu_n := n_-_m_le &
  [ STEM < "tudu" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_tudùu_n_hill_rel" ]].

rabìi_n := n_-_m_le &
  [ STEM < "rabi" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_rabìi_n_half_rel" ]].

samà_n := n_-_f_le &
  [ STEM < "sama" >,
    SYNSEM.LKEYS [SYLS  _short_short_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_samà_n_sky+heavens_rel" ]].

tsiròo_n := n_-_f_le &
  [ STEM < "tsiro" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_gem,
		  --TONE h*-l-list,
		  KEYREL.PRED "_tsiròo_n_sprout+shoot_rel" ]].



;;; Reduplicated nouns

faifai_n := n_-_m_le &
  [ STEM < "faifai" >,
    SYNSEM.LKEYS [SYLS  _short_short_,
		  --MCLASS n-pl-2_redup,
		  --TONE h*-list,
		  KEYREL.PRED "_faifai_n_round+mat-record_rel" ]].

littaafìi_n := n_-_m_le &
  [ STEM < "littafi" >,
    SYNSEM.LKEYS [SYLS  _short_long_long_,
		  --MCLASS n-pl-2_redup,
		  --TONE h*-l-list,
		  KEYREL.PRED "_littaafìi_n_book_rel" ]].

;;; Monosyllabic reduplicated nouns (closed class); 

bâl_n := n_-_m_le &
  [ STEM < "bal" >,
    SYNSEM.LKEYS [SYLS  _short_,
		  --MCLASS n-pl-2_redup,
		  --TONE h*-hl-list,
		  KEYREL.PRED "_bâl_n_ball_rel" ]].

bâm_n := n_-_m_le &
  [ STEM < "bam" >,
    SYNSEM.LKEYS [SYLS  _short_,
		  --MCLASS n-pl-2_redup,
		  --TONE h*-hl-list,
		  KEYREL.PRED "_bâm_n_bomb_rel" ]].

fâm_n := n_-_m_le &
  [ STEM < "fam" >,
    SYNSEM.LKEYS [SYLS  _short_,
		  --MCLASS n-pl-2_redup,
		  --TONE h*-hl-list,
		  KEYREL.PRED "_fâm_n_pound+sterling_rel" ]].

kwâs_n := n_-_m_le &
  [ STEM < "kwas" >,
    SYNSEM.LKEYS [SYLS  _short_,
		  --MCLASS n-pl-2_redup,
		  --TONE h*-hl-list,
		  KEYREL.PRED "_kwâs_n_course_rel" ]].

fîm_n := n_-_m_le &
  [ STEM < "fim" >,
    SYNSEM.LKEYS [SYLS  _short_,
		  --MCLASS n-pl-2_redup,
		  --TONE h*-hl-list,
		  KEYREL.PRED "_fîm_n_film_rel" ]].




;;; Class III

ƙasaa_n := n_-_f_le &
	   [ STEM < "ƙasa" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-3_CaCe,
		  --TONE h*-list,
		  KEYREL.PRED "_ƙasaa_n_country_rel" ]].

gidaa_n := n_-_m_le &
	   [ STEM < "gida" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-3_CaCe,
		  --TONE h*-list,
		  KEYREL.PRED "_gidaa_n_house_rel" ]].

bìkaa_n := n_-_m_le &
	   [ STEM < "bika" >,
	     SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-3_CaCe,
			   --TONE l*-h-list,
			   KEYREL.PRED "_bìkaa_n_baboon_rel" ]].

ùngùlu_n := n_-_f_le &
	   [ STEM < "ungulu" >,
	     SYNSEM.LKEYS [SYLS  _short_short_short_,
			   --MCLASS n-pl-3_aye,
			   --TONE l*-h-list,
			   KEYREL.PRED "_ùngùlu_n_vulture_rel" ]].

kiifii_n := n_-_m_le &
	   [ STEM < "kifi" >,
	     SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-3_aye,
			   --TONE h*-list,
			   KEYREL.PRED "_kiifii_n_fish_rel" ]].

#|
ƙwai_n := n_-_m_le &
	   [ STEM < "ƙwai" >,
	     SYNSEM.LKEYS [SYLS  _short_,
			   --MCLASS n-pl-3_aye,
			   --TONE h*-list,
			   KEYREL.PRED "_ƙwai_n_egg_rel" ]].
|#

askàa_n := n_-_m_le &
	   [ STEM < "aska" >,
	     SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-3_C2aC3e,
			   --TONE h*-l-list,
			   KEYREL.PRED "_askà_n_razor_rel" ]].

birnii_n := n_-_m_le &
	   [ STEM < "birni" >,
	     SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-3_C2aC3e,
			   --TONE h*-list,
			   KEYREL.PRED "_birnii_n_town_rel" ]].

;;; Class III (-aXa)

goorò_n := n_-_m_le &
	   [ STEM < "goro" >,
	     SYNSEM.LKEYS [SYLS  _long_short_,
			   --MCLASS n-pl-4,
			   --TONE h*-l-list,
			   KEYREL.PRED "_goorò_n_cola+nut_rel" ]].

ƙuurù_n := n_-_m_le &
	   [ STEM < "ƙuru" >,
	     SYNSEM.LKEYS [SYLS  _long_short_,
			   --MCLASS n-pl-4,
			   --TONE h*-l-list,
			   KEYREL.PRED "_ƙuurù_n_pony_rel" ]].

giiɓìi_n := n_-_m_le &
	    [ STEM < "giɓi" >,
	      SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-4,
			   --TONE h*-l-list,
			   KEYREL.PRED "_giiɓìi_n_tooth+gap_rel" ]].

reeshèe_n := n_-_m_le &
	    [ STEM < "reshe" >,
	      SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-4,
			   --TONE h*-l-list,
			   KEYREL.PRED "_reeshèe_n_branch_rel" ]].


;;; Class V (a-u HLH)

gurbìi_n := n_-_m_le &
	    [ STEM < "gurbi" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_gurbìi_n_hollow+place_rel" ]].

gurgùu_n := n_-_m_le &
	    [ STEM < "gurgu" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_gurgùu_n_lame_rel" ]].

kurmìi_n := n_-_m_le &
	    [ STEM < "kurmi" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_kurmìi_n_corpse_rel" ]].

kùrfii_n := n_-_m_le &
	    [ STEM < "kurfi" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-5,
			   --TONE l*-h-list,
			   KEYREL.PRED "_kùrfii_n_lair_rel" ]].


duutsèe_n := n_-_m_le &
	    [ STEM < "dutse" >,
	      SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_duutsèe_n_stone-rock_rel" ]].


miikìi_n := n_-_m_le &
	    [ STEM < "miki" >,
	      SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_miikìi_n_ulcer_rel" ]].




;;; Class V reduplicative (3 of 4)

tsuwèe_n := n_-_m_le &
	    [ STEM < "tsuwee" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_tsuwèe_n_testicle_rel" ]].

ƙafàa_n := n_-_m_le &
	    [ STEM < "ƙafa" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_ƙafàa_n_foot_rel" ]].

gaɓàa_n := n_-_m_le &
	    [ STEM < "gaɓa" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-2_gem+5,
			   --TONE h*-l-list,
			   KEYREL.PRED "_gaɓàa_n_joint-limb_rel" ]].


;;; Class VI 
;;; -una

rìigaa_n := n_-_f_le &
	    [ STEM < "riga" >,
	      SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-6_una_reg,
			   --TONE l*-h-list,
			   KEYREL.PRED "_rìigaa_n_gown_rel" ]].


kwàndoo_n := n_-_m_le &
	    [ STEM < "kwando" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_una_reg,
			   --TONE l*-h-list,
			   KEYREL.PRED "_kwàndoo_n_basket_rel" ]].

àkwàatì_n := n_-_m_le &
	    [ STEM < "akwati" >,
	      SYNSEM.LKEYS [SYLS  _short_long_short_,
			   --MCLASS n-pl-6_una_reg,
			   --TONE l*-list,
			   KEYREL.PRED "_àkwàatì_n_box_rel" ]].


cikìi_n := n_-_m_le &
	    [ STEM < "ciki" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_una_red+gem,
			   --TONE h*-l-list,
			    KEYREL.PRED "_cikìi_n_belly_rel" ]].

jìkii_n := n_-_m_le &
	    [ STEM < "jiki" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_una_reg+red,
			   --TONE l*-h-list,
			    KEYREL.PRED "_jìkii_n_body_rel" ]].

bàkaa_n := n_-_m_le &
	    [ STEM < "baka" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_una_red,
			   --TONE l*-h-list,
			    KEYREL.PRED "_bàkaa_n_bow_rel" ]].


kwabòo_n_2 := n_-_m_le &
	    [ STEM < "kwabo" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_una_gem,
			   --TONE h*-l-list,
			    KEYREL.PRED "_kwabòo_n_penny_rel" ]].
;;; Class VI
;;; -uka

ƙauyèe_n := n_-_m_le &
	    [ STEM < "ƙauye" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_uka_reg,
			   --TONE h*-l-list,
			    KEYREL.PRED "_ƙauyèe_n_village_rel" ]].

daajìi_n := n_-_m_le &
	    [ STEM < "daji" >,
	      SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-6_uka_red,
			   --TONE h*-l-list,
			    KEYREL.PRED "_daajìi_n_bush_rel" ]].

baashìi_n := n_-_m_le &
	    [ STEM < "bashi" >,
	      SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-6_uka_red,
			   --TONE h*-l-list,
			    KEYREL.PRED "_bashìi_n_loan_rel" ]].


ƙàshii_n := n_-_m_le &
	    [ STEM < "ƙashi" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_uwa_red,
			   --TONE l*-h-list,
			    KEYREL.PRED "_ƙàshii_n_bone_rel" ]].


hannuu_n := n_-_m_le &
	    [ STEM < "hannu" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_uwa_irr,
			   --TONE h*-list,
			    KEYREL.PRED "_hannuu_n_hand_rel" ]].

kûnnee_n := n_-_m_le &
	    [ STEM < "kunne" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_uwa_irr,
			   --TONE h*-hl-h-list,
			    KEYREL.PRED "_kûnnee_n_ear_rel" ]].

cookàlii_n := n_-_m_le &
	    [ STEM < "cokali" >,
	      SYNSEM.LKEYS [SYLS  _long_short_long_,
			   --MCLASS n-pl-6_u-a_reg,
			   --TONE h*-l-h-list,
			    KEYREL.PRED "_cookàlii_n_spoon_rel" ]].

kabàrii_n := n_-_m_le &
	    [ STEM < "kabari" >,
	      SYNSEM.LKEYS [SYLS  _short_short_long_,
			   --MCLASS n-pl-6_u-a_red,
			   --TONE h*-l-h-list,
			    KEYREL.PRED "_kabàrii_n_grave_rel" ]].

garkèe_n := n_-_m_le &
	    [ STEM < "garke" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_u-a_gem,
			   --TONE h*-l-list,
			    KEYREL.PRED "_garkèe_n_herd_rel" ]].


;;; Class VI -uCCa

àbù_n := n_-_m_le &
	    [ STEM < "abu" >,
	      SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-6_uCCa,
			   --TONE l*-list,
			    KEYREL.PRED "_àbù_n_thing_rel" ]].


;;; Class VI -a

tuubàlii_n := n_-_m_le &
	    [ STEM < "tubali" >,
	      SYNSEM.LKEYS [SYLS  _long_short_long_,
			   --MCLASS n-pl-6_a,
			   --TONE h*-l-h-list,
			    KEYREL.PRED "_tuubàlii_n_brick_rel" ]].

luudàyii_n := n_-_m_le &
	    [ STEM < "ludayi" >,
	      SYNSEM.LKEYS [SYLS  _long_short_long_,
			   --MCLASS n-pl-6_a,
			   --TONE h*-l-h-list,
			    KEYREL.PRED "_luudàyii_n_ladle_rel" ]].

tàaakàlmii_n := n_-_m_le &
	    [ STEM < "takalmi" >,
	      SYNSEM.LKEYS [SYLS  _long_short_long_,
			   --MCLASS n-pl-6_a,
			   --TONE l*-h-list,
			    KEYREL.PRED "_tàakàlmii_n_shoe_rel" ]].

;;; Class VII
;;; -anni



baffà_n := n_-_m_le &
  [ STEM < "baffa" >,
    SYNSEM.LKEYS [SYLS  _short_short_,
		  --MCLASS n-pl-7_anni,
		  --TONE h*-l-list,
		  KEYREL.PRED "_baffà_n_paternal-uncle_rel" ]].

kàakaa_n := n_-_mf_le &
  [ STEM < "kaka" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-7_anni,
		  --TONE l*-h-list,
		  KEYREL.PRED "_kàakaa_n_grandparent_rel" ]].

dòodoo_n := n_-_m_le &
  [ STEM < "dodo" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-7_anni,
		  --TONE l*-h-list,
		  KEYREL.PRED "_dòodoo_n_monster+goblin_rel" ]].

tsoohoo_a := a_-_le &
	     [ STEM < "tsoho" >,
	       SYNSEM.LKEYS [SYLS  _long_long_,
			     --MCLASS n-pl-7_anni,
			     --TONE h*-list,
			     KEYREL.PRED "_tsoohoo_a_old_rel" ]].

sàaboo_a := a_-_le &
	     [ STEM < "sabo" >,
	       SYNSEM.LKEYS [SYLS  _long_long_,
			     --MCLASS n-pl-7_anni,
			     --TONE l*-h-list,
			     KEYREL.PRED "_sàaboo_a_new_rel" ]].

;;; -aiku/-aiki


raanaa_n := n_-_f_le &
	     [ STEM < "rana" >,
	       SYNSEM.LKEYS [SYLS  _long_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_raanaa_n_day_rel" ]].


zaanaa_n := n_-_f_le &
	     [ STEM < "zana" >,
	       SYNSEM.LKEYS [SYLS  _long_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_zaanaa_n_reed+mat_rel" ]].

zaazaa_n := n_-_f_le &
	     [ STEM < "zana" >,
	       SYNSEM.LKEYS [SYLS  _long_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_zaazaa_n_low+grass+land_rel" ]].

ceeɗiyaa_n := n_-_f_le &
	     [ STEM < "ceɗiya" >,
	       SYNSEM.LKEYS [SYLS  _long_short_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_ceeɗiyaa_n_fig+tree_rel" ]].

raariyaa_n := n_-_f_le &
	     [ STEM < "rariya" >,
	       SYNSEM.LKEYS [SYLS  _long_short_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_raariyaa_n_drainage+hole-sieve_rel" ]].

tsaamiyaa_n := n_-_f_le &
	     [ STEM < "tsamiya" >,
	       SYNSEM.LKEYS [SYLS  _long_short_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_tsaamiyaa_n_tamarind_rel" ]].
goonaa_n := n_-_m_le &
	     [ STEM < "gona" >,
	       SYNSEM.LKEYS [SYLS  _long_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_goonaa_n_farm_rel" ]].

kwaanaa_n := n_-_m_le &
	     [ STEM < "kwana" >,
	       SYNSEM.LKEYS [SYLS  _long_long_,
			     --MCLASS n-pl-7_aiku,
			     --TONE h*-list,
			     KEYREL.PRED "_kwaanaa_n_24-hours_rel" ]].

saurayii_n := n_-_m_le &
	     [ STEM < "saurayi" >,
	       SYNSEM.LKEYS [SYLS  _long_short_long_,
			     --MCLASS n-pl-7_irr,
			     --TONE h*-l-h-list,
			     KEYREL.PRED "_saurayii_n_youth_rel" ]].



;;; Class VIII
;;; n-pl-8_eCani (10 items, karma(a) missing)

farcèe_n := n_-_m_le &
  [ STEM < "farce" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE h*-l-list,
		  KEYREL.PRED "_farcèe_n_fingernail_rel" ]].

jarkàa_n := n_-_f_le &
  [ STEM < "jarka" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE h*-l-list,
		  KEYREL.PRED "_jarkàa_n_jerry+can_rel" ]].

garkaa_n := n_-_f_le &
  [ STEM < "garka" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE h*-list,
		  KEYREL.PRED "_garkaa_n_garden_rel" ]].

farsaa_n := n_-_f_le &
  [ STEM < "farsa" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE h*-list,
		  KEYREL.PRED "_farsaa_n_split+colanut_rel" ]].

garwaa_n := n_-_f_le &
  [ STEM < "garwa" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE h*-list,
		  KEYREL.PRED "_garwa_n_four+gallon+can_rel" ]].

gàrmaa_n := n_-_f_le &
  [ STEM < "garma" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE l*-h-list,
		  KEYREL.PRED "_gàrmaa_n_large+hoe_rel" ]].

fàrkaa_n := noun-lex &
  [ STEM < "farka" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE l*-h-list,
		  KEYREL.PRED "_fàrkaa_n_illicit+sexual+partner_rel" ]].

kwàrgaa_n := n_-_f_le &
  [ STEM < "kwarga" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE l*-h-list,
		  KEYREL.PRED "_kwàrgaa_n_hole+in+rock_rel" ]].

sàlkaa_n := n_-_f_le &
  [ STEM < "salka" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE l*-h-list,
		  KEYREL.PRED "_sàlkaa_n_hide+water+bag_rel" ]].

màlàfaa_n := n_-_f_le &
  [ STEM < "malafa" >,
    SYNSEM.LKEYS [SYLS  _short_short_long_,
		  --MCLASS n-pl-8_eCani,
		  --TONE l*-h-list,
		  KEYREL.PRED "_màlàfaa_n_straw+hat_rel" ]].


;;; n-pl-8_CaCCaki (exhaustive list)


auree_n := n_-_m_le &
  [ STEM < "aure" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_auree_n_marriage_rel" ]].

ƁEERAA_N := n_-_m_le &
  [ STEM < "ɓera" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_ɓeeraa_n_mouse_rel" ]].

ganyee_n := n_-_m_le &
  [ STEM < "ganye" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_ganyee_n_leaf_rel" ]].

gaawaa_n := n_-_f_le &
  [ STEM < "gawa" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_gaawaa_n_corpse_rel" ]].

gooyoo_n := n_-_m_le &
  [ STEM < "goyo" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_gooyoo_n_baby+on+the+back_rel" ]].

guntuu_n := n_-_m_le &
  [ STEM < "guntu" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_guntuu_n_stub-fragment_rel" ]].

kaayaa_n := n_-_m_le &
  [ STEM < "kaya" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_kaayaa_n_goods-thing_rel" ]].

kurcìyaa_n := n_-_f_le &
  [ STEM < "kurciya" >,
    SYNSEM.LKEYS [SYLS  _short_short_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_kurciyaa_n_dove_rel" ]].

ƙaaraa_n := n_-_f_le &
  [ STEM < "ƙara" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_ƙaaraa_n_screaming-complaint-law+suit_rel" ]].

maaraa_n := n_-_f_le &
  [ STEM < "mara" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-7_aiku+8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_maaraa_n_calabash+scoop_rel" ]].

suunaa_n := n_-_m_le &
  [ STEM < "suna" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_suunaa_n_name_rel" ]].

jàriidàa_n := n_-_f_le &
	   [ STEM < "jarida" >,
	     SYNSEM.LKEYS [SYLS  _short_long_long_,
			   --MCLASS n-pl-9u,
			   --TONE l*-h-l-list,
			   KEYREL.PRED "_jàriidàa_n_newspaper_rel" ]].


tsaaraa_n := n_-_m_le &
  [ STEM < "tsara" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-7_aiku+8_CaCCaki,
		  --TONE h*-list,
		  KEYREL.PRED "_tsaaraa_n_age+mate_rel" ]].

;;; CLASS IX (L*-H -i)
ɓàraawòo_n := n_-_m_le &
  [ STEM < "ɓarawo" >,
    SYNSEM.LKEYS [SYLS  _short_long_long_,
		  --MCLASS n-pl-9i,
		  --TONE l*-h-l-list,
		  KEYREL.PRED "_ɓàraawòo_n_thief_rel" ]].

;;; Class X (closed)
birìi_n := n_-_m_le &
  [ STEM < "biri" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_reg+10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_birìi_n_monkey_rel" ]].

cinyàa_n := n_-_f_le &
  [ STEM < "cinya" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-1+10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_cinyàa_n_thigh_rel" ]].

wutsiyàa_n := n_-_f_le &
  [ STEM < "wutsiya" >,
    SYNSEM.LKEYS [SYLS  _short_short_long_,
		  --MCLASS n-pl-1+10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_wutsiyàa_n_tail_rel" ]].

zumùu_n := n_-_m_le &
  [ STEM < "zumu" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-2_reg+10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_zumùu_n_friend+relation_rel" ]].

arnèe_n := n_-_m_le &
  [ STEM < "arne" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_arnèe_n_pagan_rel" ]].

kuusùu_n := n_-_m_le &
  [ STEM < "kusu" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_kuusùu_n_rat_rel" ]].

mijìi_n := n_-_m_le &
  [ STEM < "miji" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_mijìi_n_husband_rel" ]].

màataa_n := n_-_f_le &
  [ STEM < "mata" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE l*-h-list,
		  KEYREL.PRED "_màataa_n_wife_rel" ]].

ɗìyaa_n := n_-_f_le &
  [ STEM < "ɗiya" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-10,
		  --TONE l*-h-list,
		  KEYREL.PRED "_ɗìyaa_n_daughter_rel" ]].

faatàa_n := n_-_f_le &
  [ STEM < "fata" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_faatàa_n_skin-hide_rel" ]].

maashìi_n := n_-_m_le &
  [ STEM < "mashi" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_maashìi_n_spear_rel" ]].

naamàa_n_animal := n_-_m_le &
  [ STEM < "nama" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_naamàa_n_animal_rel" ]].

saayèe_n := n_-_m_le &
  [ STEM < "saye" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_saayèe_n_root_rel" ]].

yaayà_n := n_-_mf_le &
  [ STEM < "yaya" >,
    SYNSEM.LKEYS [SYLS  _long_short_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_yaayà_n_older+sibling_rel" ]].

laayàa_n := n_-_f_le &
  [ STEM < "laya" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_laayàa_n_amulet_rel" ]].

maayèe_n := n_-_m_le &
  [ STEM < "maye" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_maayèe_n_witch_rel" ]].

raamìi_n := n_-_m_le &
  [ STEM < "rami" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_raamìi_n_hole_rel" ]].

yatsàa_n := n_-_m_le &
  [ STEM < "yatsa" >,
    SYNSEM.LKEYS [SYLS  _long_long_,
		  --MCLASS n-pl-10,
		  --TONE h*-l-list,
		  KEYREL.PRED "_yatsàa_n_finger_rel" ]].

;;; Class XI 


;;; CLASS XII (total reduplication)

joojì_n := n_-_m_le &
  [ STEM < "joji" >,
    SYNSEM.LKEYS [SYLS  _long_short_,
		  --MCLASS n-pl-12,
		  --TONE h*-l-list,
		  KEYREL.PRED "_joojì_n_judge_rel" ]].

coocì_n := n_-_m_le &
  [ STEM < "coci" >,
    SYNSEM.LKEYS [SYLS  _long_short_,
		  --MCLASS n-pl-12,
		  --TONE h*-l-list,
		  KEYREL.PRED "_coocì_n_church_rel" ]].

bòoyi_n := n_-_m_le &
  [ STEM < "boyi" >,
    SYNSEM.LKEYS [SYLS  _long_short_,
		  --MCLASS n-pl-12,
		  --TONE l*-h-list,
		  KEYREL.PRED "_bòoyi_n_houseboy_rel" ]].

nâs_n := n_-_f_le &
  [ STEM < "nas" >,
    SYNSEM.LKEYS [SYLS  _short_,
		  --MCLASS n-pl-12,
		  --TONE h*-hl-list,
		  KEYREL.PRED "_nâs_n_nurse_rel" ]].

sìkêt_n := noun-lex &
  [ STEM < "siket" >,
    SYNSEM.LKEYS [SYLS  _short_long_,
		  --MCLASS n-pl-12,
		  --TONE l*-hl-list,
		  KEYREL.PRED "_sìkêt_n_skirt_rel" ]].

en?èe_n := noun-lex &
  [ STEM < "en\'e" >,
    SYNSEM.LKEYS [SYLS  _short_long_,;
		  --MCLASS n-pl-12,
		  --TONE h*-l-list,
		  KEYREL.PRED "_en?èe_n_native+authority_rel" ]].

kanàr_n := noun-lex &
  [ STEM < "kanar" >,
    SYNSEM.LKEYS [SYLS  _short_short_,
		  --MCLASS n-pl-12,
		  --TONE h*-l-list,
		  KEYREL.PRED "_kanar_n_colonel_rel" ]].




;;;;;;;;;;;;;;;;;;
;;; Adjectives ;;;
;;;;;;;;;;;;;;;;;;

farii_a := a_-_le &
	   [ STEM < "fari" >,
	     SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-3_CaCe,
			   --TONE h*-list,
			   KEYREL.PRED "_farii_a_white_rel" ]].

baƙii_a := a_-_le &
	   [ STEM < "baƙi" >,
	     SYNSEM.LKEYS [SYLS  _short_long_,
			   --MCLASS n-pl-3_CaCe,
			   --TONE h*-list,
			   KEYREL.PRED "_baƙii_a_black_rel" ]].

doogoo_a := a_-_le &
	   [ STEM < "dogo" >,
	     SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-3_aye,
			   --TONE h*-list,
			   KEYREL.PRED "_dogo_a_tall_rel" ]].

ƙàzaamii_a := a_-_le &
	   [ STEM < "ƙazami" >,
	     SYNSEM.LKEYS [SYLS  _short_long_long_,
			   --MCLASS n-pl-2_reg,
			   --TONE l*-h-h-list,
			   KEYREL.PRED "_ƙàzaamii_a_dirty_rel" ]].

gàjeeree_a := a_-_le &
	   [ STEM < "gajere" >,
	     SYNSEM.LKEYS [SYLS  _short_long_long_,
			   --MCLASS n-pl-9u,
			   --TONE l*-h-h-list,
			   KEYREL.PRED "_gàjeeree_a_short_rel" ]].


màshàhuurìi_a := a_-_le &
	   [ STEM < "mashahuri" >,
	     SYNSEM.LKEYS [SYLS  _short_short_long_long_,
			   --MCLASS n-pl-2_reg,
			   --TONE l*-h-l-list,
			   KEYREL.PRED "_màshàhuurìi_a_famous_rel" ]].

beebee_a := a_-_le &
	   [ STEM < "bebe" >,
	     SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-3_aye,
			   --TONE h*-list,
			   KEYREL.PRED "_bebe_a_mute_rel" ]].

sheegèe_a := a_-_le &
	   [ STEM < "shege" >,
	     SYNSEM.LKEYS [SYLS  _long_long_,
			   --MCLASS n-pl-9u,
			   --TONE h*-l-list,
			   KEYREL.PRED "_shege_a_bastardly_rel" ]].

;;; TAM Auxiliaries

;;; Abs completive

naa_aux := 1-sg-abs-cmpl-aux-lex &
	   [ STEM < "na" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-list]].

kaa_aux := 2-sg-m-abs-cmpl-aux-lex &
	   [ STEM < "ka" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-list ]].

kin_aux := 2-sg-f-abs-cmpl-aux-lex &
	   [ STEM < "kin" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].


yaa_aux := 3-sg-m-abs-cmpl-aux-lex &
	   [ STEM < "ya" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-list ]].

taa_aux := 3-sg-f-abs-cmpl-aux-lex &
	   [ STEM < "ta" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-list ]].

an_aux := 4-abs-cmpl-aux-lex &
	   [ STEM < "an" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].

mun_aux := 1-pl-abs-cmpl-aux-lex &
	   [ STEM < "mun" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].

kun_aux := 2-pl-abs-cmpl-aux-lex &
	   [ STEM < "kun" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].
sun_aux := 3-pl-abs-cmpl-aux-lex &
	   [ STEM < "sun" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].


;;; Rel completive

na_aux := 1-sg-rel-cmpl-aux-lex &
	   [ STEM < "na" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].

ka_aux := 2-sg-m-rel-cmpl-aux-lex &
	   [ STEM < "ka" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].

kikà_aux := 2-sg-f-rel-cmpl-aux-lex &
	   [ STEM < "kika" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].


ya_aux := 3-sg-m-rel-cmpl-aux-lex &
	   [ STEM < "ya" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].

ta_aux := 3-sg-f-rel-cmpl-aux-lex &
	   [ STEM < "ta" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].

akà_aux := 4-rel-cmpl-aux-lex &
	   [ STEM < "aka" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

mukà_aux := 1-pl-rel-cmpl-aux-lex &
	   [ STEM < "muka" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

kukà_aux := 2-pl-rel-cmpl-aux-lex &
	   [ STEM < "kuka" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].
sukà_aux := 3-pl-rel-cmpl-aux-lex &
	   [ STEM < "suka" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

;;; Negative completive

ba_part := neg-particle-lex &
	   [ STEM < "ba" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-list ]].

baa_cont_neg := neg-cont-aux-lex &
	  [ STEM < "ba" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-list ]].


bà_cmpl_neg := neg-cmpl-aux-lex &
	  [ STEM < "ba" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

bà_reg_neg := neg-reg-aux-lex &
	      [ STEM < "ba" >,
		SYNSEM.LKEYS [SYLS _short_,
			      --TONE l*-list ]].

bàn_aux := 1-sg-neg-cmpl-aux-lex &
	   [ STEM < "ban" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

bài_aux := 3-sg-m-neg-cmpl-aux-lex &
	   [ STEM < "bai" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

zân_aux := 1-sg-fut-aux-lex &
	   [ STEM < "zan" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-hl-list ]].

zâi_aux := 3-sg-m-fut-aux-lex &
	   [ STEM < "zai" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE h*-hl-list]].


kadà_aux := neg-sbj-aux-lex &
	   [ STEM < "kada" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].


zaa_aux := reg-fut-aux-lex &
	   [ STEM < "za" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-list ]].

nì_wsp := 1-sg-wsp-lex &
	   [ STEM < "ni" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

kà_wsp := 2-sg-m-wsp-lex &
	   [ STEM < "ka" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

kì_wsp := 2-sg-f-wsp-lex &
	   [ STEM < "ki" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].


yà_wsp := 3-sg-m-wsp-lex &
	   [ STEM < "ya" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

tà_wsp := 3-sg-f-wsp-lex &
	   [ STEM < "ta" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

à_wsp := 4-wsp-lex &
	   [ STEM < "a" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

mù_wsp := 1-pl-wsp-lex &
	   [ STEM < "mu" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

kù_wsp := 2-pl-wsp-lex &
	   [ STEM < "ku" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].
sù_wsp := 3-pl-wsp-lex &
	   [ STEM < "su" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].


nàa_wsp := 1-sg-cont-wsp-lex &
	   [ STEM < "na" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

kàa_wsp := 2-sg-m-cont-wsp-lex &
	   [ STEM < "ka" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

kyàa_wsp := 2-sg-f-cont-wsp-lex &
	   [ STEM < "kya" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].


yàa_wsp := 3-sg-m-cont-wsp-lex &
	   [ STEM < "ya" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

tàa_wsp := 3-sg-f-cont-wsp-lex &
	   [ STEM < "ta" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

àa_wsp := 4-cont-wsp-lex &
	   [ STEM < "a" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

màa_wsp := 1-pl-cont-wsp-lex &
	   [ STEM < "ma" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

mwàa_wsp := 1-pl-cont-wsp-lex &
	   [ STEM < "mwa" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

kwàa_wsp := 2-pl-cont-wsp-lex &
	   [ STEM < "kwa" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].
swàa_wsp := 3-pl-cont-wsp-lex &
	   [ STEM < "swa" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

sàa_wsp := 3-pl-cont-wsp-lex &
	   [ STEM < "sa" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].


;;; Subjunctive
ìn_sbj := 1-sg-sbj-lex &
	   [ STEM < "in" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

nà_sbj := 1-sg-sbj-lex &
	   [ STEM < "na" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

kà_sbj := 2-sg-m-sbj-lex &
	   [ STEM < "ka" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

kì_sbj := 2-sg-f-sbj-lex &
	   [ STEM < "ki" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].


yà_sbj := 3-sg-m-sbj-lex &
	   [ STEM < "ya" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

tà_sbj := 3-sg-f-sbj-lex &
	   [ STEM < "ta" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

à_sbj := 4-sbj-lex &
	   [ STEM < "a" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

mù_sbj := 1-pl-sbj-lex &
	   [ STEM < "mu" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].

kù_sbj := 2-pl-sbj-lex &
	   [ STEM < "ku" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].
sù_sbj := 3-pl-sbj-lex &
	   [ STEM < "su" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].


;;; Potential

nâa_aux := 1-sg-abs-pot-aux-lex &
	   [ STEM < "na" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list]].

kâa_aux := 2-sg-m-abs-pot-aux-lex &
	   [ STEM < "ka" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list ]].

kyâa_aux := 2-sg-f-abs-pot-aux-lex &
	   [ STEM < "kya" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list ]].


yâa_aux := 3-sg-m-abs-pot-aux-lex &
	   [ STEM < "ya" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list]].

tâa_aux := 3-sg-f-abs-pot-aux-lex &
	   [ STEM < "ta" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list ]].

âa_aux := 4-abs-pot-aux-lex &
	   [ STEM < "a" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list]].

mâa_aux := 1-pl-abs-pot-aux-lex &
	   [ STEM < "ma" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list ]].

kwâa_aux := 2-pl-abs-pot-aux-lex &
	   [ STEM < "kwa" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list ]].
sâa_aux := 3-pl-abs-pot-aux-lex &
	   [ STEM < "sa" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE h*-hl-list]].

nikàa_aux := 1-sg-rel-pot-aux-lex &
	   [ STEM < "nika" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list]].

kakàa_aux := 2-sg-m-rel-pot-aux-lex &
	   [ STEM < "kaka" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kikàa_aux := 2-sg-f-rel-pot-aux-lex &
	   [ STEM < "kika" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].


yakàa_aux := 3-sg-m-rel-pot-aux-lex &
	   [ STEM < "yaka" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

takàa_aux := 3-sg-f-rel-pot-aux-lex &
	   [ STEM < "taka" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

akàa_aux := 4-rel-pot-aux-lex &
	   [ STEM < "aka" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

mukàa_aux := 1-pl-rel-pot-aux-lex &
	   [ STEM < "muka" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kukàa_aux := 2-pl-rel-pot-aux-lex &
	   [ STEM < "kuka" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].
sukàa_aux := 3-pl-rel-pot-aux-lex &
	   [ STEM < "suka" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kàa_aux := short-rel-pot-aux-lex &
	   [ STEM < "ka" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].


;;; Habitual 
nakàn_aux := 1-sg-hab-aux-lex &
	   [ STEM < "nakan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list]].

nikàn_aux := 1-sg-hab-aux-lex &
	   [ STEM < "nikan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list]].

kakàn_aux := 2-sg-m-hab-aux-lex &
	   [ STEM < "kakan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

kikàn_aux := 2-sg-f-hab-aux-lex &
	   [ STEM < "kikan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].


yakàn_aux := 3-sg-m-hab-aux-lex &
	   [ STEM < "yakan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

takàn_aux := 3-sg-f-hab-aux-lex &
	   [ STEM < "takan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

akàn_aux := 4-hab-aux-lex &
	   [ STEM < "akan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

mukàn_aux := 1-pl-hab-aux-lex &
	   [ STEM < "mukan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

kukàn_aux := 2-pl-hab-aux-lex &
	   [ STEM < "kukan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].
sukàn_aux := 3-pl-hab-aux-lex &
	   [ STEM < "sukan" >,
	     SYNSEM.LKEYS [SYLS _short_short_,
			   --TONE h*-l-list ]].

kàn_aux := short-hab-aux-lex &
	   [ STEM < "kan" >,
	     SYNSEM.LKEYS [SYLS _short_,
			   --TONE l*-list ]].


;;; Continuative

;;; Abs completive

inàa_aux := 1-sg-abs-cont-aux-lex &
	   [ STEM < "ina" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list]].

kanàa_aux := 2-sg-m-abs-cont-aux-lex &
	   [ STEM < "kana" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kinàa_aux := 2-sg-f-abs-cont-aux-lex &
	   [ STEM < "kina" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].


yanàa_aux := 3-sg-m-abs-cont-aux-lex &
	   [ STEM < "yana" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

nàa_aux := short-abs-cont-aux-lex &
	   [ STEM < "na" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].

tanàa_aux := 3-sg-f-abs-cont-aux-lex &
	   [ STEM < "tana" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

anàa_aux := 4-abs-cont-aux-lex &
	   [ STEM < "ana" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

munàa_aux := 1-pl-abs-cont-aux-lex &
	   [ STEM < "muna" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kunàa_aux := 2-pl-abs-cont-aux-lex &
	   [ STEM < "kuna" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].
sunàa_aux := 3-pl-abs-cont-aux-lex &
	   [ STEM < "suna" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

;;; Rel completive

nakèe_aux := 1-sg-rel-cont-aux-lex &
	   [ STEM < "nake" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list]].

kakèe_aux := 2-sg-m-rel-cont-aux-lex &
	   [ STEM < "kake" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kikèe_aux := 2-sg-f-rel-cont-aux-lex &
	   [ STEM < "kike" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].


yakèe_aux := 3-sg-m-rel-cont-aux-lex &
	   [ STEM < "yake" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kèe_aux := short-rel-cont-aux-lex &
	   [ STEM < "ke" >,
	     SYNSEM.LKEYS [SYLS _long_,
			   --TONE l*-list ]].


takèe_aux := 3-sg-f-rel-cont-aux-lex &
	   [ STEM < "take" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

akèe_aux := 4-rel-cont-aux-lex &
	   [ STEM < "ake" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

mukèe_aux := 1-pl-rel-cont-aux-lex &
	   [ STEM < "muke" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].

kukèe_aux := 2-pl-rel-cont-aux-lex &
	   [ STEM < "kuke" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].
sukèe_aux := 3-pl-rel-cont-aux-lex &
	   [ STEM < "suke" >,
	     SYNSEM.LKEYS [SYLS _short_long_,
			   --TONE h*-l-list ]].


;;;;;;;;;;;;;
;;; Verbs ;;;
;;;;;;;;;;;;;



zoo_irr_v := v_-_le &
	    [ STEM < "zo" >,
	      SYNSEM.LKEYS [--MCLASS v-vn-irr-gr6,
			    SYLS _long_,
			    --TONE h*-list,
			    KEYREL.PRED "_zoo_v_come_rel" ]].

ce_irr_h_v := v_cp_le &
	    [ STEM < "ce" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.E non-cont-tam,
		      LKEYS [--MCLASS v-vn-irr-gr4,
			    SYLS _long_,
			    --TONE l*-list,
			    KEYREL.PRED "_ce_v_say_rel" ]]].
#|
ce_irr_v := v_np_le &
	    [ STEM < "ce" >,
	      SYNSEM.LKEYS [--MCLASS v-vn-irr-gr4,
			    SYLS _long_,
			    --TONE l*-list,
			    KEYREL.PRED "_ce_v_say_rel" ]].
|#

zuwàa_irr_v := v_-_le &
	    [ STEM < "zuwa" >,
	      SYNSEM.LKEYS [--MCLASS v-vn-irr-m-gr,
			    SYLS _short_long_,
			    --TONE h*-l-list,
			    KEYREL.PRED "_zoo_v_come_rel" ]].

ce_irr_h_vn := v_cp_le &
	    [ STEM < "ce" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.E continuative,
		      LKEYS [--MCLASS v-vn-gr4,
			     SYLS _long_,
			     --TONE h*-list,
			     KEYREL.PRED "_ce_v_say_rel" ]]].
#|
ce_irr_vn := v_np_le &
	    [ STEM < "ce" >,
	      SYNSEM.LKEYS [--MCLASS v-vn-gr4,
			    SYLS _long_,
			    --TONE h*-list,
			    KEYREL.PRED "_ce_v_say_rel" ]].
|#

tsayàa_gr1_v_h := v_cp_le &
	      [ STEM < "tsaya" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_tsayàa_v_gr1-insist_rel" ]].

gayàa_gr1_v_h := v_cp_le &
	      [ STEM < "gaya" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_gayàa_v_gr1-tell_rel" ]].

musàa_gr1_v_h := v_cp_le &
	      [ STEM < "musa" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_musàa_v_gr1-deny_rel" ]].

gamàa_gr1_v := v_np_le &
	      [ STEM < "gama" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_gamàa_v_gr1-finish_rel" ]].

gàrgaɗàa_gr2_v_h := v_np_cp_le &
	      [ STEM < "gargaɗa" >,
		SYNSEM.LKEYS [--MCLASS v-gr2,
			      SYLS _short_short_long_,
			      --TONE l*-h-l-list,
			      KEYREL.PRED "_gàrgaɗàa_v_gr2-admonish_rel" ]].

sàataa_gr2_v := v_np_le &
	      [ STEM < "sata" >,
		SYNSEM.LKEYS [--MCLASS v-gr2,
			      SYLS _long_long_,
			      --TONE l*-h-list,
			      KEYREL.PRED "_sàataa_v_gr2-steal_rel" ]].

saatàa_gr2_vn := v_np_le &
	      [ STEM < "sata" >,
		SYNSEM.LKEYS [--MCLASS v-vn-irr-f-gr,
			      SYLS _long_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_sàataa_v_gr2-steal_rel" ]].

sàayaa_gr2_v := v_np_le &
	      [ STEM < "saya" >,
		SYNSEM.LKEYS [--MCLASS v-gr2,
			      SYLS _long_long_,
			      --TONE l*-h-list,
			      KEYREL.PRED "_sàayaa_v_gr2-buy_rel" ]].

hàrbaa_gr2_v := v_np_le &
	      [ STEM < "harba" >,
		SYNSEM.LKEYS [--MCLASS v-gr2,
			      SYLS _short_long_,
			      --TONE l*-h-list,
			      KEYREL.PRED "_hàrbaa_v_gr4-shoot+at_rel" ]].


sàayee_gr2_vn := v_np_le &
	      [ STEM < "saye" >,
		SYNSEM.LKEYS [--MCLASS v-vn-irr-gr,
			      SYLS _long_long_,
			      --TONE l*-h-list,
			      KEYREL.PRED "_sàayaa_v_gr2-buy_rel" ]].

GAAFÀRTAA_GR1_V := v_np_le &
	      [ STEM < "gafarta" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _long_short_long_,
			      --TONE h*-l-h-list,
			      KEYREL.PRED "_gaafàrtaa_v_gr1-forgive_rel" ]].

càncantà_gr3_v_h := v_expl_cp_le &
		     [ STEM < "cancanta" >,
		       SYNSEM.LKEYS [--MCLASS v-gr3,
				     SYLS _short_short_short_,
				     --TONE l*-h-l-list,
				     KEYREL.PRED "_càncantàa_v_gr3-appropriate_rel" ]].

hàramtà_gr3_v_h := v_expl_cp_le &
		     [ STEM < "haramta" >,
		       SYNSEM.LKEYS [--MCLASS v-gr3,
				     SYLS _short_short_short_,
				     --TONE l*-h-l-list,
				     KEYREL.PRED "_hàramtà_v_gr3-unlawful_rel" ]].

hàlattà_gr3_v_h := v_expl_cp_le &
		     [ STEM < "halatta" >,
		       SYNSEM.LKEYS [--MCLASS v-gr3,
				     SYLS _short_short_short_,
				     --TONE l*-h-l-list,
				     KEYREL.PRED "_hàlattà_v_gr3-lawful_rel" ]].

fàskarà_gr3_v_h := v_expl_cp_le &
		     [ STEM < "faskara" >,
		       SYNSEM.LKEYS [--MCLASS v-gr3,
				     SYLS _short_short_short_,
				     --TONE l*-h-l-list,
				     KEYREL.PRED "_fàskarà_v_gr3-difficult_rel" ]].

kàmaatà_gr3_v_h := v_expl_cp_le &
		     [ STEM < "kamata" >,
		       SYNSEM.LKEYS [--MCLASS v-gr3,
				     SYLS _short_long_short_,
				     --TONE l*-h-l-list,
				     KEYREL.PRED "_kàmaatà_v_gr3-fitting_rel" ]].

kyàutu_gr3_v_h := v_expl_cp_le &
		     [ STEM < "kyautu" >,
		       SYNSEM.LKEYS [--MCLASS v-gr7,
				     SYLS _short_short_,
				     --TONE l*-h-list,
				     KEYREL.PRED "_kyàutu_v_gr7-nice_rel" ]].

daacèe_gr4_v_h := v_expl_cp_le &
		     [ STEM < "dace" >,
		       SYNSEM.LKEYS [--MCLASS v-gr4,
				     SYLS _long_long_,
				     --TONE h*-l-list,
				     KEYREL.PRED "_daacèe_v_gr4-suitable_rel" ]].

		     

ɗinkàa_gr1_v := v_np_le &
	      [ STEM < "ɗinka" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_ɗinkàa_v_gr1-sew_rel" ]].


karàntaa_gr1_v := v_np_le &
	      [ STEM < "karanta" >,
		SYNSEM.LKEYS [--MCLASS v-vn-reg-gr1,
			      SYLS _short_short_long_,
			      --TONE h*-l-h-list,
			      KEYREL.PRED "_karàntaa_v_gr1-read_rel" ]].

naɗàa_gr1_v := v_np_np_le &
	      [ STEM < "naɗa" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_naɗàa_v_gr1-appoint_rel" ]].

ɗaràa_gr1_v := v_np_np_le &
	      [ STEM < "ɗara" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_ɗaràa_v_gr1-slightly+exceed_rel" ]].


kaamàa_gr1_v := v_wa-np_np_le &
	      [ STEM < "kama" >,
		SYNSEM.LKEYS [--MCLASS v-vn-reg-gr1,
			      SYLS _long_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_kaamàa_v_gr1-catch_rel" ]].

amsàa_gr1_v := v_wa-np_np_le &
	      [ STEM < "amsa" >,
		SYNSEM.LKEYS [--MCLASS v-vn-reg-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_amsàa_v_gr1-answer_rel" ]].

amsàa_gr1_h_v := v_cp_le &
	      [ STEM < "amsa" >,
		SYNSEM.LKEYS [--MCLASS v-gr1,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_amsàa_v_gr1-answer_rel" ]].


kaawoo_gr6_v := v_wa-np_np_le &
	      [ STEM < "kawo" >,
		SYNSEM.LKEYS [--MCLASS v-gr6,
			      SYLS _long_long_,
			      --TONE h*-list,
			      KEYREL.PRED "_kaawoo_v_gr6-bring_rel" ]].

kiraa_gr0_v := v_np_le &
	      [ STEM < "kira" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_long_,
			      --TONE h*-list,
			      KEYREL.PRED "_kiraa_v_gr0-call_rel" ]].

jiraa_gr0_v := v_np_le &
	      [ STEM < "jira" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_long_,
			      --TONE h*-list,
			      KEYREL.PRED "_jiraa_v_gr0-wait+for_rel" ]].

ci_gr0_v := v_np_le &
	      [ STEM < "ci" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_,
			      --TONE h*-list,
			      KEYREL.PRED "_ci_v_gr0-eat_rel" ]].

fi_gr0_v := v_np_np_le &
	      [ STEM < "fi" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_,
			      --TONE h*-list,
			      KEYREL.PRED "_fi_v_gr0-exceed_rel" ]].


bi_gr0_v := v_np_le &
	      [ STEM < "bi" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_,
			      --TONE h*-list,
			      KEYREL.PRED "_bi_v_gr0-follow_rel" ]].

ji_gr0_v := v_np_le &
	      [ STEM < "ji" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_,
			      --TONE h*-list,
			      KEYREL.PRED "_ji_v_gr0-hear_rel" ]].

yi_gr0_v := v_np_le &
	      [ STEM < "yi" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_,
			      --TONE h*-list,
			      KEYREL.PRED "_yi_v_gr0-do_rel" ]].

ƙi_gr0_v := v_np_le &
	      [ STEM < "ƙi" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _short_,
			      --TONE h*-list,
			      KEYREL.PRED "_ƙi_v_gr0-hate_rel" ]].

shaa_gr0_v := v_np_le &
	      [ STEM < "sha" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _long_,
			      --TONE h*-list,
			      KEYREL.PRED "_shaa_v_gr0-drink_rel" ]].

soo_gr0_v := v_np_le &
	      [ STEM < "so" >,
		SYNSEM.LKEYS [--MCLASS v-gr0,
			      SYLS _long_,
			      --TONE h*-list,
			      KEYREL.PRED "_soo_v_gr0-want_rel" ]].

rufèe_gr4_v := v_np_le &
	      [ STEM < "rufe" >,
		SYNSEM.LKEYS [--MCLASS v-gr4,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_rufèe_v_gr4-shut_rel" ]].

kashèe_gr4_v := v_np_le &
	      [ STEM < "kashe" >,
		SYNSEM.LKEYS [--MCLASS v-gr4,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_kashèe_v_gr4-kill_rel" ]].

harbèe_gr4_v := v_np_le &
	      [ STEM < "harbe" >,
		SYNSEM.LKEYS [--MCLASS v-gr4,
			      SYLS _short_long_,
			      --TONE h*-l-list,
			      KEYREL.PRED "_harbèe_v_gr4-shoot+dead_rel" ]].





;;; Proper nouns

ado+bayero_pn := 
	    proper-noun-lex &
	    [ STEM < "Ado", "Bayero" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.PNG [PN 3s,
						 GEND m],
		      LKEYS [KEYREL.CARG "Ado Bayero" ]]].


allàh_pn := 
	    proper-noun-lex &
	    [ STEM < "Allah" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.PNG [PN 3s,
						 GEND m],
		      LKEYS [SYLS _short_short_,
			     --TONE h*-l-list,
			     KEYREL.CARG "Allàh" ]]].

audù_pn := 
	    proper-noun-lex &
	    [ STEM < "Audu" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.PNG [PN 3s,
						 GEND m],
		      LKEYS [SYLS _short_short_,
			     --TONE h*-l-list,
			     KEYREL.CARG "Audù" ]]].

sheehù_pn := 
	    proper-noun-lex &
	    [ STEM < "Shehu" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.PNG [PN 3s,
						 GEND m],
		      LKEYS [SYLS _long_short_,
			     --TONE h*-l-list,
			     KEYREL.CARG "Sheehù" ]]].

hàliimà_pn := 
	    proper-noun-lex &
	    [ STEM < "Halima" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.PNG [PN 3s,
						 GEND f],
		      LKEYS [SYLS _short_long_short_,
			     --TONE l*-h-l-list,
			     KEYREL.CARG "Hàliimà" ]]].

jàs_pn := 
	    proper-noun-lex &
	    [ STEM < "Jas" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.PNG [PN 3s,
						 GEND m],
		      LKEYS [SYLS _short_,
			     --TONE l*-list,
			     KEYREL.CARG "Jàs" ]]].

kanòo_pn := 
	    proper-noun-lex &
	    [ STEM < "Kano" >,
	      SYNSEM [LOCAL.CONT.HOOK.INDEX.PNG [PN 3s,
						 GEND m],
		      LKEYS [SYLS _short_long_,
			     --TONE h*-l-list,
			     KEYREL.CARG "Kanòo" ]]].


;;;;;;;;;;;;;;;;
;;; Pronouns ;;;
;;;;;;;;;;;;;;;;

;;; Strong pronouns 

nii_pron := 
	     1-s-strong-pron-lex &
	     [STEM <"ni" >,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

kai_pron := 
	     2-s-m-strong-pron-lex &
	     [STEM <"kai">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

kee_pron := 
	     2-s-f-strong-pron-lex &
	     [STEM <"ke">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

shii_pron := 
	     3-s-m-strong-pron-lex &
	     [STEM <"shi">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

ita_pron := 
	     3-s-f-strong-pron-lex &
	     [STEM <"ita">,
	      SYNSEM.LKEYS [SYLS _short_short_,
			    --TONE h*-list]].

muu_pron := 
	     1-p-strong-pron-lex &
	     [STEM <"mu">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

kuu_pron := 
	     2-p-strong-pron-lex &
	     [STEM <"ku">,
	      SYNSEM.LKEYS [SYLS _long_short_,
			    --TONE h*-list]].


suu_pron := 
	     3-p-strong-pron-lex &
	     [STEM <"su">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

;;; Strong resumptives

nii_resump := 
	     1-s-strong-resump-lex &
	     [STEM <"ni" >,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

kai_resump := 
	     2-s-m-strong-resump-lex &
	     [STEM <"kai">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

kee_resump := 
	     2-s-f-strong-resump-lex &
	     [STEM <"ke">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

shii_resump := 
	     3-s-m-strong-resump-lex &
	     [STEM <"shi">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

ita_resump := 
	     3-s-f-strong-resump-lex &
	     [STEM <"ita">,
	      SYNSEM.LKEYS [SYLS _short_short_,
			    --TONE h*-list]].

muu_resump := 
	     1-p-strong-resump-lex &
	     [STEM <"mu">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].

kuu_resump := 
	     2-p-strong-resump-lex &
	     [STEM <"ku">,
	      SYNSEM.LKEYS [SYLS _long_short_,
			    --TONE h*-list]].


suu_resump := 
	     3-p-strong-resump-lex &
	     [STEM <"su">,
	      SYNSEM.LKEYS [SYLS _long_,
			    --TONE h*-list]].


	   

;;; Object pronouns

;;; DO 
#|
ni_pron_hi := 
	     1-s-weak-pron-lex &
	     [STEM <"ni" >,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

ka_pron_hi := 
	     2-s-m-weak-pron-lex &
	     [STEM <"ka">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

ki_pron_hi := 
	     2-s-f-weak-pron-lex &
	     [STEM <"ki">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

shi_pron_hi := 
	     3-s-m-weak-pron-lex &
	     [STEM <"shi">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

ta_pron_hi := 
	     3-s-f-weak-pron-lex &
	     [STEM <"ta">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

mu_pron_hi := 
	     1-p-weak-pron-lex &
	     [STEM <"mu">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].

ku_pron_hi := 
	     2-p-weak-pron-lex &
	     [STEM <"ku">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].


su_pron_hi := 
	     3-p-weak-pron-lex &
	     [STEM <"su">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE h*-list]].


ni_pron_lo := 
	     1-s-weak-pron-lex &
	     [STEM <"ni" >,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].

ka_pron_lo := 
	     2-s-m-weak-pron-lex &
	     [STEM <"ka">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].

ki_pron_lo := 
	     2-s-f-weak-pron-lex &
	     [STEM <"ki">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].

shi_pron_lo := 
	     3-s-m-weak-pron-lex &
	     [STEM <"shi">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].

ta_pron_lo := 
	     3-s-f-weak-pron-lex &
	     [STEM <"ta">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].

mu_pron_lo := 
	     1-p-weak-pron-lex &
	     [STEM <"mu">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].

ku_pron_lo := 
	     2-p-weak-pron-lex &
	     [STEM <"ku">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].


su_pron_lo := 
	     3-p-weak-pron-lex &
	     [STEM <"su">,
	      SYNSEM.LKEYS [SYLS _short_,
			    --TONE l*-list]].
|#


;;; Wh-pronouns
wàa_pron := 
	     wh-pron-lex &
	     [STEM <"wa">,
	      SYNSEM.LKEYS [KEYREL.PRED "person_rel",
			    SYLS _long_,
			    --TONE l*-list]].
mèe_pron := 
	     wh-pron-lex &
	     [STEM <"me">,
	      SYNSEM.LKEYS [KEYREL.PRED "thing_rel",
			    SYLS _long_,
			    --TONE l*-list]].

;;; Relative pronouns

dà_pron := 
	 rel-pron-lex &
	 [STEM <"da">,
	  SYNSEM.LKEYS [SYLS _short_,
			--TONE l*-list]].


wândà_pron := 
	 m-sg-rel-pron-lex &
	 [STEM <"wanda">,
	  SYNSEM.LKEYS [SYLS _short_short_,
			--TONE h*-hl-l-list]].

wâddà_pron := 
	 f-sg-rel-pron-lex &
	 [STEM <"wadda">,
	  SYNSEM.LKEYS [SYLS _short_short_,
			    --TONE h*-hl-l-list]].

waɗàndà_pron := 
	 pl-rel-pron-lex &
	 [STEM <"waɗanda">,
	  SYNSEM.LKEYS [SYLS _short_short_short_,
			--TONE h*-l-l-list]].

wandà_pron := 
	 m-sg-rel-pron-lex &
	 [STEM <"wanda">,
	  SYNSEM.LKEYS [SYLS _short_short_,
			--TONE h*-l-list]].

waddà_pron := 
	 f-sg-rel-pron-lex &
	 [STEM <"wadda">,
	  SYNSEM.LKEYS [SYLS _short_short_,
			    --TONE h*-l-list]].

	 

;;;;;;;;;;;;;;;;;;
;;; Determiner ;;;
;;;;;;;;;;;;;;;;;;

;;; Bound determiners

nan_d_hi :=  bound-det-lex &
	 [STEM <"nan">,
	  SYNSEM.LKEYS [KEYREL [PRED _dem_q_hearer_rel],
			SYLS _short_,
			--TONE h*-list]].

nan_d_lo :=  bound-det-lex &
	 [STEM <"nan">,
	  SYNSEM.LKEYS [KEYREL [PRED _dem_q_speaker_rel],
			SYLS _short_,
			--TONE l*-list]].

nan_d_hl :=  bound-det-lex &
	 [STEM <"nan">,
	  SYNSEM.LKEYS [KEYREL [PRED _dem_q_speaker_rel],
			SYLS _short_,
			--TONE h*-hl-list]].

can_d_hi :=  bound-det-lex &
	 [STEM <"can">,
	  SYNSEM.LKEYS [KEYREL [PRED _dem_q_distant_rel],
			SYLS _short_,
			--TONE h*-list]].

can_d_lo :=  bound-det-lex &
	 [STEM <"can">,
	  SYNSEM.LKEYS [KEYREL [PRED _dem_q_there_rel],
			SYLS _short_,
			--TONE l*-list]].

can_d_hl :=  bound-det-lex &
	 [STEM <"can">,
	  SYNSEM.LKEYS [KEYREL [PRED _dem_q_there_rel],
			SYLS _short_,
			--TONE h*-hl-list]].




;;; Free determiners

wannàn_d := sg-det-lex &
	    [STEM <"wannan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_speaker_rel,
			   SYLS _short_short_,
			   --TONE h*-l-list]].

waɗànnân_d := pl-det-lex &
	    [STEM <"waɗannan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_speaker_rel,
			   SYLS _short_short_short_,
			   --TONE h*-l-hl-list]].

wànnan_d := sg-det-lex &
	    [STEM <"wannan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_hearer_rel,
			   SYLS _short_short_,
			   --TONE l*-h-list]].

wàɗànnan_d := pl-det-lex &
	    [STEM <"waɗannan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_hearer_rel,
			   SYLS _short_short_short_,
			   --TONE l*-h-list]].

wancàn_d := m-sg-det-lex &
	    [STEM <"wancan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_there_rel,
			   SYLS _short_short_,
			   --TONE h*-l-list]].

waccàn_d := f-sg-det-lex &
	    [STEM <"waccan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_there_rel,
			   SYLS _short_short_,
			   --TONE h*-l-list]].

waɗàncân_d := pl-det-lex &
	    [STEM <"waɗancan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_there_rel,
			   SYLS _short_short_short_,
			   --TONE h*-l-hl-list]].

wàncan_d := m-sg-det-lex &
	    [STEM <"wancan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_distant_rel,
			   SYLS _short_short_,
			   --TONE l*-h-list]].

wàccan_d := f-sg-det-lex &
	    [STEM <"waccan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_distant_rel,
			   SYLS _short_short_,
			   --TONE l*-h-list]].

wàɗàncan_d := pl-det-lex &
	    [STEM <"waɗancan">,
	     SYNSEM.LKEYS [KEYREL.PRED _dem_q_distant_rel,
			   SYLS _short_short_short_,
			   --TONE l*-h-list]].

wani_d := m-sg-det-lex &
	    [STEM <"wani">,
	     SYNSEM.LKEYS [KEYREL.PRED _some_q_rel,
			   SYLS _short_short_,
			   --TONE h*-list]].

wata_d := f-sg-det-lex &
	    [STEM <"wata">,
	     SYNSEM.LKEYS [KEYREL.PRED _some_q_rel,
			   SYLS _short_short_,
			   --TONE h*-list]].

waɗansu_d := pl-det-lex &
	    [STEM <"waɗansu">,
	     SYNSEM.LKEYS [KEYREL.PRED _some_q_rel,
			   SYLS _short_short_short_,
			   --TONE h*-list]].

wasu_d := pl-det-lex &
	    [STEM <"wasu">,
	     SYNSEM.LKEYS [KEYREL.PRED _some_q_rel,
			   SYLS _short_short_,
			   --TONE h*-list]].


wane_d := wh-m-sg-det-lex &
	    [STEM <"wane">,
	     SYNSEM.LKEYS [KEYREL.PRED wh_q_rel,
			   SYLS _short_short_,
			   --TONE l*-list]].

wace_d := wh-f-sg-det-lex &
	    [STEM <"wace">,
	     SYNSEM.LKEYS [KEYREL.PRED wh_q_rel,
			   SYLS _short_short_,
			   --TONE l*-list]].

waɗanne_d := wh-pl-det-lex &
	    [STEM <"waɗanne">,
	     SYNSEM.LKEYS [KEYREL.PRED wh_q_rel,
			   SYLS _short_short_short_,
			   --TONE l*-list]].

;;; Complementiser

wai_c := complementiser-lex &
	 [STEM <"wai">,
	  SYNSEM.LKEYS [SYLS _short_,
			--TONE h*-list]].

cêwaa_c := complementiser-lex &
	 [STEM <"cewa">,
	  SYNSEM.LKEYS [SYLS _long_long_,
			--TONE h*-hl-h-list]].

dà_c := complementiser-lex &
	 [STEM <"da">,
	  SYNSEM.LKEYS [SYLS _short_,
			--TONE l*-list]].


;;;;;;;;;;;;;;;;;;;;
;;; Prepositions ;;;
;;;;;;;;;;;;;;;;;;;;


; Dative -wa

wà_p := 
	wa-sel-lex &
	[ STEM < "wa" >,
	  SYNSEM [LKEYS [--MCLASS v-vn-irr-wa,
			 SYLS _short_,
			 --TONE l*-list ]]].
	

mài_p := sg-agr-nmod-prep-npro-lex &
	 [ STEM < "mai" >,
	   SYNSEM.LKEYS [SYLS  _short_,
			 --TONE l*-list,
			 KEYREL [PRED "_mài_a_owner_rel"]]].

màasu_p := pl-agr-nmod-prep-npro-lex &
	 [ STEM < "masu" >,
	   SYNSEM.LKEYS [SYLS  _long_short_,
			 --TONE l*-h-list,
			 KEYREL [PRED "_mài_a_owner_rel"]]].


maràs_p := sg-agr-nmod-prep-npro-lex &
	   [ STEM < "maras" >,
	     SYNSEM.LKEYS [SYLS  _short_short_,
			 --TONE h*-l-list,
			 KEYREL.PRED "_maràs_a_lack_rel"]].

maràsaa_p := pl-agr-nmod-prep-npro-lex &
	   [ STEM < "marasa" >,
	     SYNSEM.LKEYS [SYLS  _short_short_long_,

			 --TONE h*-l-h-list,
			 KEYREL.PRED "_maràs_a_lack_rel"]].

na_p_poss_npro := pl-or-m-sg-agr-nmod-npro-prep-lex &
	     [ STEM < "na" >,
	       SYNSEM [LKEYS [KEYREL.PRED "poss_rel",
			      SYLS _short_,
			      --TONE h*-list ]]].

ta_p_poss_npro := f-sg-agr-nmod-npro-prep-lex &
	[ STEM < "ta" >,
	  SYNSEM [LKEYS [KEYREL.PRED "poss_rel",
			 SYLS _short_,
			 --TONE h*-list ]]].

na_p_poss_n1sg := pl-or-m-sg-agr-nmod-n1sg-prep-lex &
	     [ STEM < "na" >,
	       SYNSEM [LKEYS [KEYREL.PRED "poss_rel",
			      SYLS _long_,
			      --TONE h*-list ]]].

ta_p_poss_n1sg := f-sg-agr-nmod-n1sg-prep-lex &
	[ STEM < "ta" >,
	  SYNSEM [LKEYS [KEYREL.PRED "poss_rel",
			 SYLS _long_,
			 --TONE h*-list ]]].

na_p_poss_1sg := pl-or-m-sg-agr-nmod-1sg-prep-lex &
	     [ STEM < "na" >,
	       SYNSEM [LKEYS [KEYREL.PRED "poss_rel",
			      SYLS _long_,
			      --TONE l*-list ]]].

ta_p_poss_1sg := f-sg-agr-nmod-1sg-prep-lex &
	[ STEM < "ta" >,
	  SYNSEM [LKEYS [KEYREL.PRED "poss_rel",
			 SYLS _long_,
			 --TONE l*-list ]]].


dàgà_p_np := p_np_le &
	  [ STEM < "daga" >,
	    SYNSEM [LKEYS [KEYREL.PRED "_dàgà_p_from_rel",
			   SYLS _short_short_,
			   --TONE l*-list ]]].

dàgà_p_np-mod := p_np-mod_le &
	  [ STEM < "daga" >,
	    SYNSEM [LKEYS [KEYREL.PRED "_dàgà_p_from_rel",
			   SYLS _short_short_,
			   --TONE l*-list ]]].



à_p_np := p_np_le &
          [ STEM < "a" >,
            SYNSEM [LKEYS [KEYREL.PRED "_à_p_at_rel",
                           SYLS _short_,
                           --TONE l*-list ]]].

à_p_np-mod := p_np-mod_le &
              [ STEM < "a" >,
                SYNSEM [LKEYS [KEYREL.PRED "_à_p_at_rel",
                               SYLS _short_,
                               --TONE l*-list ]]].

dà_p := p_np_le &
        [ STEM < "da" >,
          SYNSEM [LKEYS [KEYREL.PRED "_dà_p_with_rel",
                         SYLS _short_,
				 --TONE l*-list ]]].

ta_p := p_np_le &
        [ STEM < "ta" >,
          SYNSEM [LKEYS [KEYREL.PRED "_ta_p_via-through_rel",
                         SYLS _short_,
                         --TONE h*-list ]]].

bisà_p := p_np_le &
          [ STEM < "bisa" >,
            SYNSEM [LKEYS [KEYREL.PRED "_bisà_p_on-about_rel",
                           SYLS _short_short_,
                           --TONE h*-l-list ]]].

gà_p_np := p_np_ga_le &
           [ STEM < "ga" >,
             SYNSEM [LKEYS [KEYREL.PRED "_gà_p_by_rel",
                            SYLS _short_,
                            --TONE l*-list ]]].

gà_p_np-mod := p_np-mod_ga_le &
               [ STEM < "ga" >,
	  SYNSEM [LKEYS [KEYREL.PRED "_gà_p_by_rel",
			 SYLS _short_,
			 --TONE l*-list ]]].

gàree_p := p_np_garee_le &
	   [ STEM < "gare" >,
	     SYNSEM [LKEYS [KEYREL.PRED "_gà_p_by_rel",
			    SYLS _short_long_,
			    --TONE l*-h-list ]]].


àlbarkàci_p := m-genitive-prep-lex &
	[ STEM < "albarkaci" >,
    SYNSEM [LKEYS [KEYREL.PRED "_àlbarkàcii_p_thanks+to_rel",
			 SYLS _short_short_short_long_,
			 --TONE l*-h-l-h-list ]]].

arewanci_p := m-genitive-prep-lex &
	[ STEM < "arewanci" >,
    SYNSEM [LKEYS [KEYREL.PRED "_arewanci_p_north+of_rel",
			 SYLS _short_short_short_long_,
			 --TONE h*-list ]]].

; arewanci_p := m-genitive-prep-lex &
; 	[ STEM < "arewanci" >,
;     SYNSEM [LKEYS [KEYREL.PRED "_arewanci_p_north+of_rel",
; 			 SYLS _short_short_short_long_,
; 			 --TONE h*-list ]]].

baaya_p := m-genitive-prep-lex &
	[ STEM < "baya" >,
	  SYNSEM [LKEYS [KEYREL.PRED "_baaya_p_behind-at+back_rel",
			 SYLS _long_short_,
			 --TONE h*-list ]]].

ciki_p := m-genitive-prep-lex &
	[ STEM < "ciki" >,
	  SYNSEM [LKEYS [KEYREL.PRED "_ciki_p_in_rel",
			 SYLS _short_short_,
			 --TONE h*-list ]]].

dàliilì_p := m-genitive-prep-lex &
	[ STEM < "dalilin" >,
	  SYNSEM [LKEYS [KEYREL.PRED "_dàliilì_p_on+account+of_rel",
			 SYLS _short_long_long_,
			 --TONE l*-h-l-list ]]].

;;; Does this one appear without in situ complement? 
; dòomin_p := m-genitive-prep-lex &
; 	[ STEM < "domi" >,
; 	  SYNSEM [LKEYS [KEYREL.PRED "_dòomin_p_in_rel",
; 			 SYLS _long_short_,
; 			 --TONE l*-h-list ]]].


gaba_p := m-genitive-prep-lex &
	[ STEM < "gaba" >,
	  SYNSEM [LKEYS [KEYREL.PRED "_gàba_p_before-in+front_rel",
			 SYLS _short_short_,
			 --TONE l*-h-list ]]].

 sabòo-dà_p := subord-conjunction-lex &
 	[ STEM < "sabo", "da" >,
 	  SYNSEM [LKEYS [KEYREL.PRED "_sabòo-dà_p_because_rel",
 			 SYLS _short_long_short_,
 			 --TONE h*-l-l-list ]]].

; sabòo-dà_p_2 := subord-conjunction-lex &
;  	[ STEM < "sabo da" >,
;  	  SYNSEM [LKEYS [KEYREL.PRED "_sabòo-dà_p_because_rel",
;  			 SYLS _short_long_short_,
;  			 --TONE h*-l-l-list ]]].