(Ara) add the preposition ka 'كَ' which attaches to its head

This commit is contained in:
Inari Listenmaa
2025-08-22 14:27:10 +02:00
parent f2afe03303
commit 97227181fe
2 changed files with 11 additions and 7 deletions
+5 -3
View File
@@ -70,6 +70,8 @@ oper
_ => "لِ"
}) Dat ;
biPrep : Preposition = mkPrefix "بِ" ;
kaPrep : Preposition = mkPrefix "كَ" ;
accPrep : Preposition = mkPreposition [] Acc ; -- default object case in VP
genPrep : Preposition = mkPreposition [] Gen ; -- default object case in N2
@@ -502,17 +504,17 @@ oper
AComp d c => comp ! Sg ! d ! c
}
} ;
mascFemCompAdj : (kabir, kabira, akbar : Str) -> Adj =
\kabir, kabira, akbar ->
ntablesAdj (positAdj kabir ! Masc) (positAdj kabir ! Fem) (positAdj akbar ! Masc) ;
mascFemAdj : (kabir, kabira : Str) -> Adj = \kabir, kabira ->
mascFemCompAdj kabir kabira kabir ; ---- comp
mascAdj : (kabir : Str) -> Adj = \kabir ->
mascFemAdj kabir (kabir + "َة") ;
-----------------------------------------------------------------------------
-----------------------------------------------------------------------------