monomialideal.lib
LIB "monomialideal.lib"; ring R = 0,(w,x,y,z,t),lp; ideal I = w^3*x*y,w*x*y*z*t,x^2*y^2*z^2,x^2*z^4*t^3,y^3*z; radicalMon(I); ==> _[1]=yz ==> _[2]=xzt ==> _[3]=wxy