forked from GitHub/gf-core
added PossNP, PartNP and CountNP in the Bulgarian RGL
This commit is contained in:
@@ -173,6 +173,21 @@ concrete NounBul of Noun = CatBul ** open ResBul, Prelude in {
|
|||||||
|
|
||||||
ApposCN cn np = {s = \\nf => cn.s ! nf ++ np.s ! RSubj; g=cn.g} ;
|
ApposCN cn np = {s = \\nf => cn.s ! nf ++ np.s ! RSubj; g=cn.g} ;
|
||||||
|
|
||||||
|
PossNP cn np = {s = \\nf => cn.s ! nf ++ "íà" ++ np.s ! (RObj Acc); g = cn.g} ;
|
||||||
|
|
||||||
|
PartNP cn np = {s = \\nf => cn.s ! nf ++ "îò" ++ np.s ! (RObj Acc); g = cn.g} ;
|
||||||
|
|
||||||
|
CountNP det np = {
|
||||||
|
s = \\role => let g = case np.a.gn of { -- this is lossy
|
||||||
|
GSg Masc => AMasc NonHuman ;
|
||||||
|
GSg Neut => ANeut ;
|
||||||
|
GSg Fem => AFem ;
|
||||||
|
GPl => ANeut
|
||||||
|
}
|
||||||
|
in det.s ! False ! g ! role ++ np.s ! (RObj Acc) ;
|
||||||
|
a = {gn = gennum ANeut (numnnum det.nn); p = P3}
|
||||||
|
} ;
|
||||||
|
|
||||||
RelNP np rs = {
|
RelNP np rs = {
|
||||||
s = \\r => np.s ! r ++ rs.s ! np.a ;
|
s = \\r => np.s ! r ++ rs.s ! np.a ;
|
||||||
a = np.a
|
a = np.a
|
||||||
|
|||||||
Reference in New Issue
Block a user