forked from GitHub/gf-rgl
extend the names API
This commit is contained in:
@@ -241,7 +241,7 @@ lin UttAccNP np = {s = P.addNegation np.isNeg ++ np.s ! NPAcc} ;
|
||||
lin AdjAsCN ap = {s = ap.s ! True ; postmod = \\_ => ap.p ; h = Back} ; ---- Harmony just a guess
|
||||
lin AdjAsNP ap = MassNP (AdjAsCN ap) ;
|
||||
|
||||
lin GivenName, Surname = \n -> n ;
|
||||
lin GivenName, MaleSurname, FemaleSurname = \n -> n ;
|
||||
lin FullName gn sn = {
|
||||
s = \\c => gn.s ! Nom ++ sn.s ! c
|
||||
} ;
|
||||
|
||||
Reference in New Issue
Block a user