ring r=(0,a,b,c),(x,y,z),dp;
  par(2);
LIB "tst.lib";tst_status(1);$