(May) ImpersCl, AdvVP + tests about verbal prefixes

This commit is contained in:
Inari Listenmaa
2020-08-20 17:53:25 +02:00
parent 7f032c511f
commit ec9dcb92bf
4 changed files with 123 additions and 12 deletions

View File

@@ -84,10 +84,13 @@ lin
-- : Comp -> VP ;
UseComp comp = comp ;
{-
-- : VP -> Adv -> VP ; -- sleep here
AdvVP = insertAdv ;
-- : VP -> Adv -> VP ; -- sleep here
AdvVP vp adv = vp ** {
s = \\vf,pol => vp.s ! vf ! pol ++ adv.s
} ;
{-
-- : VPSlash -> Adv -> VPSlash ; -- use (it) here
AdvVPSlash = insertAdv ;