change lincat PN to make it similar to LN and avoid storing rt and rel

This commit is contained in:
Krasimir Angelov
2024-03-11 08:25:12 +01:00
parent 2aef82181b
commit 0fe84ad2cf
6 changed files with 37 additions and 42 deletions
+8 -3
View File
@@ -1,7 +1,13 @@
concrete CatRus of Cat = CommonX ** open ResRus, Prelude in {
flags coding=utf8 ; optimize=all ;
lincat
N, PN = ResRus.NounForms ;
N = ResRus.NounForms ;
PN = {
s : Case => Str ;
g : Gender ;
anim : Animacy ;
n : Number ;
} ;
GN = {
s : Case => Str ;
g : Sex ;
@@ -119,8 +125,7 @@ lincat
linref
N = \s -> s.snom ;
PN = \s -> s.snom ;
LN = \s -> s.s ! Nom ;
PN,LN = \s -> s.s ! Nom ;
Pron = \s -> s.nom ;
N2 = \s -> s.snom ++ s.c2.s ;
N3 = \s -> s.snom ++ s.c2.s ++ s.c3.s ;