added DetNPMasc

This commit is contained in:
Krasimir Angelov committed 2018-06-24 11:28:21 +02:00
1 parent a2ba6a7d64
commit cdc2f36bdf
5 files changed
+34 -7

No files matched your search

+11
View File
@@ -179,6 +179,17 @@ lin
lin
ApposNP np1 np2 = {s = \\role => np1.s ! role ++ comma ++ np2.s ! role; a = np1.a; p = np1.p} ;
DetNPMasc det = {
s = \\role => let s = det.s ! False ! (AMasc Human) ! role
in case role of {
RObj Dat => "на" ++ s;
RObj WithPrep => with_Word ++ s;
_ => s
} ;
a = {gn = gennum (AMasc Human) (numnnum det.nn); p = P3} ;
p = det.p
} ;
DetNPFem det = {
s = \\role => let s = det.s ! False ! AFem ! role
in case role of {