added inherent parameters for pronouns

This commit is contained in:
Krasimir Angelov
2026-03-20 08:04:26 +01:00
parent 9d18d316c5
commit 1d7b717866
3 changed files with 16 additions and 14 deletions
+1 -1
View File
@@ -153,7 +153,7 @@ oper mkAdv : Str -> Adv =
param Case = Acc | Dat ;
param Role = RSubj | RObj Case | RPrep ;
oper Pron = {s : Role => Str; clitic : Case => Str} ;
oper Pron = {s : Role => Str; clitic : Case => Str; g : GenNum; p : Person} ;
genNum : Gender -> Number -> GenNum = \g,n ->
case n of {