add VPS and VPI to ExtendMay

This commit is contained in:
Meowyam
2022-05-11 14:56:01 +08:00
parent a1c85431be
commit 3e79ab25e1
3 changed files with 62 additions and 4 deletions
+1 -1
View File
@@ -10,7 +10,7 @@ concrete PhraseMay of Phrase = CatMay ** open Prelude, ResMay in {
UttIP ip = {s = ip.sp ! NF Sg Bare} ;
UttImpSg pol imp = { s = pol.s ++ imp.s ! Sg ! pol.p } ;
UttImpPol pol imp = {s = pol.s ++ imp.s ! Sg ! pol.p} ;
UttVP vp = {s = vp.s ! Active ! Pos} ;
UttVP vp = {s = linVP vp} ;
{-
UttImpSg pol imp =
UttImpPl pol imp =