class mod_on_comparative_CS_modifier 
{
    <: mod_on_comparative_modifier;
    node Modifier : [ type: subst, cat: CS, top: [ que: ~que ]];
    node(Foot).top.supermod_kind = value(comparative);
}