// MetaPost compatibility routines

path cuttings;

path cutbefore(path p, path q)
{
 slice s=firstcut(p,q);
 cuttings=s.before;
 return s.after;
}

path cutafter(path p, path q)
{
 slice s=lastcut(p,q);
 cuttings=s.after;
 return s.before;
}