msyds/gf-core
1
0
Fork 0
forked from GitHub/gf-core
Code Pull Requests Activity

copula in romance: ser/estar for Cat,Spa, just essere/etre in Ita,Fra. Controlled by the param type CopulaType in DiffRomance.

Browse Source
This commit is contained in:
aarne
2015-07-20 13:41:01 +00:00
parent 42d5efbe08
commit 53c477d2a2
16 changed files with 58 additions and 27 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lib/src/romance/QuestionRomance.gf
View File

@@ -49,7 +49,7 @@ incomplete concrete QuestionRomance of Question =
QuestIComp icomp np = {
s = \\t,a,p,_ =>
let
vp = predV copula ;
vp = predV (selectCopula icomp.cop) ;
cls = (mkClause (np.s ! Nom).comp np.hasClit np.isPol np.a vp).s !
DInv ! t ! a ! p ! Indic ;
why = icomp.s ! complAgr np.a ;
@@ -95,9 +95,9 @@ incomplete concrete QuestionRomance of Question =
AdvIAdv i a = {s = i.s ++ a.s} ;
CompIAdv a = {s = \\_ => a.s} ;
CompIAdv a = {s = \\_ => a.s ; cop = estarCopula} ;
CompIP p = {s = \\_ => p.s ! Nom} ;
CompIP p = {s = \\_ => p.s ! Nom ; cop = serCopula} ;
lincat
QVP = ResRomance.VP ;