mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 08:58:55 -06:00
make it possible to control the preposition in LN
This commit is contained in:
@@ -12,6 +12,7 @@ lincat
|
|||||||
} ;
|
} ;
|
||||||
LN = {
|
LN = {
|
||||||
s : Case => Str ;
|
s : Case => Str ;
|
||||||
|
c : ResRus.ComplementCase ;
|
||||||
g : Gender ;
|
g : Gender ;
|
||||||
n : Number ;
|
n : Number ;
|
||||||
anim : Animacy
|
anim : Animacy
|
||||||
|
|||||||
@@ -110,7 +110,9 @@ lin
|
|||||||
tr (th (heading partitive_Parameter) ++ td (ln.s ! Ptv)) ++
|
tr (th (heading partitive_Parameter) ++ td (ln.s ! Ptv)) ++
|
||||||
tr (th ("местный") ++ td (ln.s ! Loc)) ++
|
tr (th ("местный") ++ td (ln.s ! Loc)) ++
|
||||||
tr (th ("звательный") ++ td (ln.s ! VocRus))
|
tr (th ("звательный") ++ td (ln.s ! VocRus))
|
||||||
)
|
) ++
|
||||||
|
heading2 (heading adverb_Category) ++
|
||||||
|
paragraph (ln.c.s ++ ln.s ! ln.c.c)
|
||||||
} ;
|
} ;
|
||||||
|
|
||||||
InflectionA, InflectionA2 = \adj -> {
|
InflectionA, InflectionA2 = \adj -> {
|
||||||
|
|||||||
@@ -41,7 +41,7 @@ lin FullName gn sn =
|
|||||||
a=Ag (gennum ln.g ln.n) P3
|
a=Ag (gennum ln.g ln.n) P3
|
||||||
} ; -- Does NP need animacy?
|
} ; -- Does NP need animacy?
|
||||||
|
|
||||||
InLN ln = ss (applyPrep {s=v_prep_mod; c=Loc; hasPrep=True} {
|
InLN ln = ss (applyPrep ln.c {
|
||||||
s=ln.s ;
|
s=ln.s ;
|
||||||
pron=False;
|
pron=False;
|
||||||
a=Ag (gennum ln.g ln.n) P3
|
a=Ag (gennum ln.g ln.n) P3
|
||||||
|
|||||||
Reference in New Issue
Block a user