ring h1=32003,(t,x,y,z),dp; ideal i=x4+y3+z2; qhweight(i); LIB "tst.lib";tst_status(1);$