mirror of
https://github.com/GrammaticalFramework/gf-rgl.git
synced 2026-05-27 17:08:54 -06:00
(Kor) change V*'s linref, for morpho test cases
This commit is contained in:
@@ -385,7 +385,7 @@ oper
|
|||||||
--------------------------------------------------------------------------------
|
--------------------------------------------------------------------------------
|
||||||
-- linrefs
|
-- linrefs
|
||||||
|
|
||||||
linVerb : Verb -> Str = \v -> v.s ! linVF ;
|
linVerb : Verb -> Str = \v -> v.s ! VF Polite Pos ;
|
||||||
linVP : VForm -> VerbPhrase -> Str = \vf,vp -> vp.nObj ! DeclObj ++ vp.adv ++ vp.s ! vf ;
|
linVP : VForm -> VerbPhrase -> Str = \vf,vp -> vp.nObj ! DeclObj ++ vp.adv ++ vp.s ! vf ;
|
||||||
linImp : Polarity -> VerbPhrase -> Str = \pol,vp ->
|
linImp : Polarity -> VerbPhrase -> Str = \pol,vp ->
|
||||||
let vf : VForm = case pol of {
|
let vf : VForm = case pol of {
|
||||||
|
|||||||
Reference in New Issue
Block a user