class pres_on_coo
{
    <: _pres_s;
    node(Root).cat = value(coo);
    node(Incise).post.adj = value(strict);
}