overloaded compoundN

This commit is contained in:
Krasimir Angelov
2024-10-31 12:57:46 +01:00
parent 4de1b64b58
commit 1111ca0fdd
2 changed files with 25 additions and 5 deletions
+6
View File
@@ -184,4 +184,10 @@ oper mkPron : (_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_,_ : Str) -> Pron =
}
} ;
genNum : Gender -> Number -> GenNum = \g,n ->
case n of {
Sg => GSg g ;
Pl => GPl
} ;
}