class mod_on_comparative_adj_modifier 
{
    <: mod_on_comparative_simple_modifier;
    node(Modifier).type = value(subst);
    node(Modifier).cat = value(adjP);
}