generalize infVP to support negative VP in Romance

This commit is contained in:
krangelov
2021-04-27 13:18:27 +02:00
parent 617cb25f1e
commit adb1cffb75
10 changed files with 31 additions and 33 deletions

View File

@@ -31,7 +31,7 @@ concrete IdiomFre of Idiom = CatFre **
ProgrVP vp =
insertComplement
(\\a => "en" ++ "train" ++ elisDe ++ infVP vp a)
(\\a => "en" ++ "train" ++ elisDe ++ infVP vp RPos a)
(predV copula) ;
ImpPl1 vp = {