mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-09-16 15:26:02 -06:00
started a separate module for names
This commit is contained in:
@@ -0,0 +1,6 @@
|
||||
concrete NamesAfr of Names = CatAfr ** open ResAfr, Prelude in {
|
||||
|
||||
lin GivenName, MaleSurname, FemaleSurname = \n -> {s = n.s ; a = agrP3 Sg ; isPron = False} ;
|
||||
lin FullName gn sn =
|
||||
{s = \\c => gn.s ! NPNom ++ sn.s ! c ; a = agrP3 Sg ; isPron = False} ;
|
||||
}
|
||||
Reference in New Issue
Block a user