mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-15 06:02:55 -06:00
Maltese RG: Fix apposition. Add ExtAdvNP & ExtAdvVP. Fix adjective order.
This commit is contained in:
@@ -174,6 +174,10 @@ concrete NounMlt of Noun = CatMlt ** open ResMlt, Prelude in {
|
||||
-- Paris today
|
||||
AdvNP np adv = overwriteNPs np (\\c => np.s ! c ++ adv.s) ;
|
||||
|
||||
-- NP -> Adv -> NP
|
||||
-- boys, such as ..
|
||||
ExtAdvNP np adv = overwriteNPs np (\\c => np.s ! c ++ "," ++ adv.s ++ ",") ;
|
||||
|
||||
-- Num
|
||||
NumSg = {s = \\c => []; n = NumX Sg ; hasCard = False} ;
|
||||
NumPl = {s = \\c => []; n = NumX Pl ; hasCard = False} ;
|
||||
@@ -275,8 +279,8 @@ concrete NounMlt of Noun = CatMlt ** open ResMlt, Prelude in {
|
||||
SentCN cn sc = overwriteCNs cn (\\num => cn.s ! num ++ sc.s) ;
|
||||
|
||||
-- CN -> NP -> CN
|
||||
-- Appossition: city Paris
|
||||
ApposCN cn np = overwriteCNs cn (\\num => cn.s ! num ++ np.s ! NPNom) ; -- known to be overgenerating
|
||||
-- Apposition: city Paris
|
||||
ApposCN cn np = overwriteCNs cn (\\num => cn.s ! num ++ prepNP prep_ta np) ;
|
||||
|
||||
-- CN -> NP -> CN
|
||||
-- Possessive: house of mine
|
||||
|
||||
Reference in New Issue
Block a user