LIB "tst.lib"; tst_init();
LIB "random.lib";
ring r=0,(x,y,z),dp;
sparsepoly(5);"";
sparsepoly(3,5,90,9);
tst_status(1);$