| ring r=32003,(x,y,z),dp;
ideal i=x2,xy,y5;
eliminate(i,x);
→ _[1]=y5
ring R=0,(x,y,t,s,z),dp;
ideal i=x-t,y-t2,z-t3,s-x+y3;
eliminate(i,ts);
→ _[1]=y2-xz
→ _[2]=xy-z
→ _[3]=x2-y
intvec v=hilb(std(i),1);
eliminate(i,ts,v);
→ _[1]=y2-xz
→ _[2]=xy-z
→ _[3]=x2-y
|