class verb_oblige_as_mod
{
    %% idiomatic semi-frozen sentence modifier X oblige
    %% example: service oblige, je dois vous quitter.
    %% example: je ne conclurai pas, exception culturelle oblige, par une citation.
    <: categories;
    desc.@arg0 = value([function: suj, kind: subj, real: N2]);
    desc.@arg2  = value(@emptyarg_fs);
    desc.@arg1 = value(@emptyarg_fs);
    - s_modifier; S=Modifier;
    node(Root).bot = node(Foot).bot;
    node(Foot).dummy.cat = value(S);
    node(Foot).dummy.excl = value(~post);
    desc.@diathesis = value(active);
    node S: [type:std, cat: S, adj: no];
    S >> subject;
    S >> v; Anchor = v;
    subject < v;
    node subject: [ type: subst, id: subject, cat: N2, top: [sat: -]];
    node v: [ cat: v, lex: obliger, bot: [mode: indicative, person: 3]];
    node(subject).top.number = node(v).bot.number;
    node(subject).top.person = node(v).bot.person;
    node(subject).top.gender = node(v).bot.gender;
    - vagreement; V = v;
    desc.dummy.modcleft=value(-);
}