added this_Quant, that_Quant

This commit is contained in:
Krasimir Angelov
2026-04-11 14:09:44 +02:00
parent fea01dd313
commit e42c5f53e2
5 changed files with 45 additions and 19 deletions
+6
View File
@@ -180,6 +180,12 @@ genNum : Gender -> Number -> GenNum = \g,n ->
Sg => GSg g ;
Pl => GPl
} ;
nnum2num : NNumber -> Number = \n ->
case n of {
NNum n => n ;
NCountable => Pl
} ;
auxBe = {
present : Number => Person => Str