mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-12 12:42:50 -06:00
some additions to ParseChi
This commit is contained in:
@@ -84,4 +84,6 @@ concrete NounChi of Noun = CatChi ** open ResChi, Prelude in {
|
|||||||
|
|
||||||
RelNP np rs = mkNP (rs.s ++ np.s) ;
|
RelNP np rs = mkNP (rs.s ++ np.s) ;
|
||||||
|
|
||||||
|
PossNP cn np = {s = np.s ++ possessive_s ++ cn.s ; c = cn.c} ;
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
@@ -61,7 +61,8 @@ lin
|
|||||||
themselves_NP = regNP "themselves" plural ;
|
themselves_NP = regNP "themselves" plural ;
|
||||||
-}
|
-}
|
||||||
|
|
||||||
---- CompoundCN num noun cn = mkCN (ParadigmsChi.mkN (num.s ++ (noun.s ++ cn.s)) cn.c) ; ----
|
CompoundCN num noun cn = {s = num.s ++ noun.s ++ cn.s ; c = cn.c} ; ----
|
||||||
|
DashCN noun cn = {s = noun.s ++ cn.s ; c = cn.c} ; ----
|
||||||
|
|
||||||
{-
|
{-
|
||||||
DashCN noun1 noun2 = {
|
DashCN noun1 noun2 = {
|
||||||
@@ -129,16 +130,14 @@ lin
|
|||||||
s = \\agr => vp.ad ++ vp.prp ++ vp.s2 ! agr ;
|
s = \\agr => vp.ad ++ vp.prp ++ vp.s2 ! agr ;
|
||||||
c = npNom
|
c = npNom
|
||||||
} ;
|
} ;
|
||||||
|
-}
|
||||||
|
|
||||||
ApposNP np1 np2 = {
|
ApposNP np1 np2 = {
|
||||||
s = \\c => np1.s ! c ++ "," ++ np2.s ! npNom ;
|
s = np1.s ++ chcomma ++ np2.s
|
||||||
a = np1.a
|
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
AdAdV = cc2 ;
|
AdAdV = cc2 ;
|
||||||
|
|
||||||
UttAdV adv = adv;
|
UttAdV adv = adv;
|
||||||
|
|
||||||
-}
|
|
||||||
|
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user