added AdjLN

This commit is contained in:
Krasimir Angelov
2023-08-29 09:33:52 +02:00
parent 54f5b687fe
commit a313207f49

View File

@@ -32,6 +32,12 @@ lin FullName gn sn = {
isPron = False
} ;
AdjLN ap ln = ln ** {
s = \\c => preOrPost ap.isPre
(ap.s ! agrAdj (gennum (ngen2gen ln.g) ln.n) (DDef Def))
(ln.s ! c) ;
} ;
InLN n = {s = "i" ++ n.s ! caseNP accusative} ;
}