mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 08:58:55 -06:00
added ExtAdvVP, AdvVPSlash, AdVVPSlash
This commit is contained in:
@@ -95,10 +95,22 @@ concrete VerbTur of Verb = CatTur ** open Prelude, ResTur, SuffixTur, HarmonyTur
|
||||
compl = vp.compl ++ adv.s ;
|
||||
} ;
|
||||
|
||||
ExtAdvVP vp adv = vp ** {
|
||||
compl = vp.compl ++ adv.s ;
|
||||
} ;
|
||||
|
||||
AdVVP adv vp = vp ** {
|
||||
s = \\vf => adv.s ++ vp.s ! vf ;
|
||||
} ;
|
||||
|
||||
AdvVPSlash vp adv = vp ** {
|
||||
compl = vp.compl ++ adv.s ;
|
||||
} ;
|
||||
|
||||
AdVVPSlash adv vp = vp ** {
|
||||
compl = vp.compl ++ adv.s ;
|
||||
} ;
|
||||
|
||||
PassV2 = variants {} ;
|
||||
|
||||
oper
|
||||
|
||||
Reference in New Issue
Block a user