GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-24 02:12:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

*** empty log message ***

Browse Source
This commit is contained in:
janna
2003-11-25 21:10:53 +00:00
parent 61507ef2de
commit 3c5a8768b9
3 changed files with 18 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
grammars/resource/russian/Syntax.gf
View File

@@ -311,7 +311,7 @@ oper
complementOfTransVerb : TransVerb -> Complement = \v -> {s2 = v.s2 ; c = v.c} ;
verbOfTransVerb : TransVerb -> Verb = \v ->
{s = v.s; t = v.t; a = v.a ; v = v.v } ;
{s = v.s; t = v.t; a = v.a ; w = v.w } ;
mkTransVerb : Verb -> Preposition -> Case -> TransVerb = \v,p,cas ->
v ** {s2 = p ; c = cas } ;
@@ -324,7 +324,7 @@ oper
-- The rule for using transitive verbs is the complementization rule:
complTransVerb : Bool -> TransVerb -> NounPhrase -> VerbPhrase = \b,se,tu ->
{s = se.s ; a = se.a ; t = se.t ; v = se.v ; s2 = negation b ;
{s = se.s ; a = se.a ; t = se.t ; w = se.w ; s2 = negation b ;
s3 = \\_,_ => se.s2 ++ tu.s ! (mkPronForm se.c No NonPoss) ;
negBefore = True } ;
@@ -353,7 +353,7 @@ oper
-- Sometimes we want to extract the verb part of a verb phrase.
verbOfPhrase : VerbPhrase -> Verb = \v ->
{s = v.s; t = v.t ; a = v.a ; v =v.v} ;
{s = v.s; t = v.t ; a = v.a ; w =v.w} ;
-- Verb phrases can also be formed from adjectives ("- молод"),
@@ -367,7 +367,7 @@ oper
{ s= \\_ => "-" ;
t = Present ;
a = Imperfective ;
v = Act ;
w = Act ;
s2 = negation b ;
s3 = \\g,n => case n of {
Sg => zloj.s ! AF Nom Animate (ASg g) ;
@@ -380,7 +380,7 @@ oper
{ s= \\_ => "-" ;
t = Present ;
a = Imperfective ;
v = Act ;
w = Act ;
s2 = negation b ;
s3 = \\_,n => (indefNounPhrase n chelovek ).s ! (mkPronForm Nom No NonPoss) ;
negBefore = False
@@ -390,7 +390,7 @@ oper
{ s= \\_ => "-" ;
t = Present ;
a = Imperfective ;
v = Act ;
w = Act ;
s2 = negation b ;
s3 = \\_,_ => masha.s ! (mkPronForm Nom No NonPoss) ;
negBefore = False
@@ -412,7 +412,7 @@ oper
--
adVerbPhrase : VerbPhrase -> Adverb -> VerbPhrase = \poet, khorosho ->
{s = \\vf => khorosho.s ++ poet.s ! vf ; s2 = poet.s2; s3 = poet.s3;
a = poet.a; v = poet.v; t = poet.t ; negBefore = poet.negBefore } ;
a = poet.a; w = poet.w; t = poet.t ; negBefore = poet.negBefore } ;
-- Adverbials are typically generated by prefixing prepositions.
-- The rule for creating locative noun phrases by the preposition "в"
@@ -488,7 +488,7 @@ oper
\b,vidit,tuUlubaeshsya ->
{s = vidit.s ; s2 = negation b ; s3 = \\_,_ => [", что"] ++
tuUlubaeshsya.s ;
t = vidit.t ; v = vidit.v ; a = vidit.a ; negBefore = True } ;
t = vidit.t ; w = vidit.w ; a = vidit.a ; negBefore = True } ;
--2 Sentences missing noun phrases