{
%% ncpred for support verbs implemented as a special arg comming before
%% all others
VMod=ncpred::VMod;
S=ncpred::S;
V=ncpred::V;
VModNcPred = ncpred::VModArg;
node ncpred2: [cat:ncpred2, id:ncpred2, type:std];
ncpred2 = ncpred::ArgGroup;
node ncpred: [cat:ncpred, id:ncpred, type:coanchor];
ncpred2 >> ncpred;
%% for lglex, ncpred may have a det
%% example: commettre une aggression contre X
%% tmp hack for that
%% the current solution does not allow full adjoining on ncpred2
%% such as PPs or relative
%% a better solution would be to reuse a real N2 and check its head is the ncpred
ncpred2 >> det;
det < ncpred;
node det: [ cat: det, type: subst];
node(det).top.number = node(ncpred).bot.number;
node(det).top.gender = node(ncpred).bot.gender;
det =>
node(ncpred2).bot.sat = value(+);
~ det =>
node(ncpred2).bot.sat = value(-);
ncpred::VModArg =>
desc.ht.diathesis = value(active),
desc.@arg1.kind = value(~subj|acomp),
node(v).bot.lightverb = node(ncpred).bot.lightverb;
~ ncpred::VModArg =>
node(v).bot.lightverb = value(-);
ncpred::VModArg < postsubj;
%% No extraction on ncpred arg
$ncpred::arg.extracted = value(-);
}
Ajouter un commentaire