ring r=23,(x,a(1..7)),ls;
  nvars(r);
LIB "tst.lib";tst_status(1);$