Hrv: enough to implement NLG experiment, but bogus in some places

This commit is contained in:
Aarne Ranta
2022-09-30 13:31:06 +02:00
parent a27e502233
commit 47eca9545b
10 changed files with 52 additions and 20 deletions
+6 -2
View File
@@ -1,6 +1,7 @@
concrete ExtendHrv of Extend = CatHrv **
ExtendFunctor - [
ReflPossPron
--- ReflPossPron
CardCNCard
---- constant not found (yet)
,youPolFem_Pron
,UttVPShort
@@ -34,6 +35,9 @@ in {
---lin ReflPossPron = justDemPronFormsAdjective reflPossessivePron ;
--AW2 CardCNCard
lin CardCNCard card cn = {
s = \\g,c => card.s ! g ! c ++ numSizeForm cn.s card.size c ;
size = NS_20_
} ;
}