forked from GitHub/gf-core
added PassVPSlash to ExtraRomance; it is a generalization of PassV2 already implemented for some languages. As a variant in Spa and Cat, added PassVPSlash_ser with another copula.
This commit is contained in:
@@ -54,5 +54,20 @@ lin
|
||||
youPolPl_Pron = vostePl Masc;
|
||||
youPolPl8fem_Pron = vostePl Fem;
|
||||
|
||||
-- ExtraRomance.PassVPSlash uses estar
|
||||
PassVPSlash_ser vps =
|
||||
let auxvp = predV copula
|
||||
in
|
||||
insertComplement (\\a => let agr = complAgr a in vps.s.s ! VPart agr.g agr.n) {
|
||||
s = auxvp.s ;
|
||||
agr = auxvp.agr ;
|
||||
neg = vps.neg ;
|
||||
clit1 = vps.clit1 ;
|
||||
clit2 = vps.clit2 ;
|
||||
clit3 = vps.clit3 ;
|
||||
isNeg = vps.isNeg ;
|
||||
comp = vps.comp ;
|
||||
ext = vps.ext
|
||||
} ;
|
||||
|
||||
}
|
||||
@@ -26,4 +26,6 @@ fun
|
||||
youPolPl8fem_Pron : Pron ;
|
||||
|
||||
ImpNeg : NP -> VP -> Utt ; --IL 2012-10-12
|
||||
|
||||
PassVPSlash_ser : VPSlash -> VP ;
|
||||
}
|
||||
|
||||
Reference in New Issue
Block a user