started a separate module for names

This commit is contained in:
Krasimir Angelov committed 2023-07-24 17:24:13 +02:00
1 parent 8b1309c99d
commit 645de9955a
100 files changed
+611 -227

No files matched your search

+14
View File
@@ -0,0 +1,14 @@
concrete NamesEst of Names = CatEst ** open ResEst, Prelude in {
lin GivenName, MaleSurname, FemaleSurname = \n -> emptyNP ** {
s = \\c => n.s ! npform2case Sg c ;
a = agrP3 Sg ;
isPron = False
} ;
lin FullName gn sn = emptyNP ** {
s = \\c => gn.s ! Nom ++ sn.s ! npform2case Sg c ;
a = agrP3 Sg ;
isPron = False
} ;
}