| LIB "primdec.lib";
ring r = 0,(x,y,z),lp;
poly p = z2+1;
poly q = z3+2;
ideal i = p*q^2,y-z2;
list pr = primdecGTZ(i);
pr;
→ [1]:
→ [1]:
→ _[1]=z6+4z3+4
→ _[2]=y-z2
→ [2]:
→ _[1]=z3+2
→ _[2]=y-z2
→ [2]:
→ [1]:
→ _[1]=z2+1
→ _[2]=y-z2
→ [2]:
→ _[1]=z2+1
→ _[2]=y-z2
|