LIB "tst.lib"; tst_init();
  ring r = 0, (x,y,z), M(1, 0, 0,   0, 1, 0,   0, 0, 1);
tst_status(1);$