class real_group_comp
{
    + realGroupComp;
    VMod < VModArg; node VModArg : [id:vmod,cat:VMod,type:std, bot : [position: post]];
    node(VModArg).top = node(VModArg).bot;
    VModArg >> ArgGroup;
    %% Arg may be negated by preceding que
    <: que_as_advneg; Sentence = S; Arg = VModArg; Negated = ArgGroup;
    V >> VModArg;
    $arg.extracted = value(~cleft|topic);
    %% NonClefted argument should come after NcPred
    VModNcPred < VModArg;    
    %% All verb argument VMod should agree
    %% with main verb on following properties
    node(VModArg).bot.number = node(V).bot.number;
    node(VModArg).bot.gender = node(V).bot.gender;
    node(VModArg).bot.person = node(V).bot.person;
    node(VModArg).bot.quant = node(V).bot.quant;
}