mirror of
https://github.com/GrammaticalFramework/gf-core.git
synced 2026-05-06 09:42:50 -06:00
extensions to the English and the Bulgarian grammars. Infinitives with polarity and anteriority
This commit is contained in:
@@ -66,8 +66,10 @@ lin
|
||||
a = np.a
|
||||
} ;
|
||||
|
||||
SlashV2V vv p vp =
|
||||
insertSlashObj2 (daComplex vp ! Perf) (slashV vv vv.c2) ;
|
||||
SlashV2V vv ant p vp =
|
||||
insertSlashObj2 (\\agr => ant.s ++ p.s ++
|
||||
daComplex ant.a p.p vp ! Perf ! agr)
|
||||
(slashV vv vv.c2) ;
|
||||
|
||||
PredVPosv np vp = {
|
||||
s = \\t,a,p,o =>
|
||||
@@ -86,9 +88,13 @@ lin
|
||||
}
|
||||
} ;
|
||||
|
||||
CompS s = {s = \\_ => "че" ++ s.s} ;
|
||||
CompVP ant p vp = {s = \\agr => ant.s ++ p.s ++
|
||||
daComplex ant.a p.p vp ! Perf ! agr} ;
|
||||
|
||||
PassVS vs vp =
|
||||
insertObj (\\a => vs.s ! Perf ! VPassive (aform a.gn Indef (RObj Acc))
|
||||
++ daComplex vp ! Perf ! a)
|
||||
++ daComplex Simul Pos vp ! Perf ! a)
|
||||
(predV verbBe) ;
|
||||
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user