mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-04-09 04:59:31 -06:00
implemented compound nounds which work like adverbs
This commit is contained in:
@@ -30,11 +30,11 @@ lin ACitizen p cit =
|
||||
let noun : N
|
||||
= case p.name.a.gn of {
|
||||
R.GSg g => lin N {s = \\nf => cit.s1 ! g ! nf;
|
||||
rel = cit.s2.s;
|
||||
rel = cit.s2.s; relPost = False;
|
||||
g = case g of {R.Masc=>R.AMasc R.Human; R.Fem=>R.AFem; R.Neut=>R.ANeut}
|
||||
} ;
|
||||
R.GPl => lin N {s = \\nf => cit.s1 ! R.Masc ! nf;
|
||||
rel = cit.s2.s;
|
||||
rel = cit.s2.s; relPost = False;
|
||||
g = R.AMasc R.Human
|
||||
}
|
||||
} ;
|
||||
|
||||
Reference in New Issue
Block a user