(Som) Add GenericCl

This commit is contained in:
Inari Listenmaa
2019-07-19 13:53:58 +03:00
parent 8c11c9e372
commit 56be17ccf9
2 changed files with 7 additions and 4 deletions
+4 -2
View File
@@ -671,9 +671,11 @@ oper
c2 = P v2.c2
} ;
passV2 : Verb2 -> VerbPhrase = \v2 -> useV v2 ** {
passV2 : Verb2 -> VerbPhrase = \v2 -> passVP (useV v2) ;
passVP : VerbPhrase -> VerbPhrase = \vp -> vp ** {
c2 = Passive ;
c3 = v2.c2 ;
c3 = pp2prep vp.c2 ;
} ;
complSlash : VPSlash -> VerbPhrase = \vps -> let np = vps.obj2 in vps ** {