234 lines
4.8 KiB
Plaintext
234 lines
4.8 KiB
Plaintext
ring r = 0,(x,y),ds;
|
|
ideal f = x,xy+y6+y9;
|
|
kbase(std(f));
|
|
ring s = 0,(x,y),dp;
|
|
ideal f = x,xy+y6+y9
|
|
;
|
|
kbase(std(f));
|
|
ideal f = x,xy+y6+y8+y9;
|
|
kbase(std(f));
|
|
setring r;
|
|
f = imap(s,f);
|
|
f;
|
|
kbase(std(f));
|
|
quit;
|
|
LIB"AeCodPruebas.lib";
|
|
ring r = 0,(x,y),ds;
|
|
ideal f = x,y2,y3+x2y;
|
|
def Q = MalgrRing(ideal(0),2,f);
|
|
setring Q;
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(ideal(x,y));
|
|
ring r = 0,(x,y),ds;
|
|
ideal f = x,y2,y3+x2y;
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(f, ideal(x,y));
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
LIB"AeCodPruebas.lib";
|
|
ring r = 0,(x,y),ds;
|
|
ideal f = x,y2,y3+x2y;
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
ring r = 0,(x,y),ds;
|
|
ideal f = x,y2,y3+x2y;
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
LIB"AeCodPruebas.lib";
|
|
TargetIdeal(f, std(ideal(x,y)));
|
|
TargetIdeal(f, std(maxideal(3)));
|
|
TargetIdeal(f, std(maxideal(5)));
|
|
LIB"AeCodPruebas.lib";
|
|
basering;
|
|
AeNormal(f);
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f);
|
|
;
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f);
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f);
|
|
;
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f);
|
|
ideal f = x+x4,y2,y3+x2y;
|
|
LIB"AeCodPruebas.lib";
|
|
ideal f = x+x4,y2,y3+x2y;
|
|
AeNormal(f,maxideal(3));
|
|
AeNormal(f,maxideal(4));
|
|
AeNormal(f);
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f);
|
|
AeNormal(f,maxideal(1));
|
|
AeNormal(f,maxideal(2));
|
|
AeNormal(f,maxideal(3));
|
|
AeNormal(f,maxideal(4));
|
|
AeNormal(f,maxideal(7));
|
|
AeNormal(f,maxideal(4));
|
|
AeNormal(f,maxideal(5));
|
|
f;
|
|
def Q = MalgrRing(ideal(0),2,f);
|
|
setring Q;
|
|
GF;
|
|
Gens;
|
|
setring r;
|
|
ideal w = x+x4,y2;
|
|
kbase(std(w));
|
|
setring Q;
|
|
GF;
|
|
basering;
|
|
GF;
|
|
reduce(x2, GF);
|
|
MalgrFormPoly(x2);
|
|
MalgrFormPoly(x2, maxideal(4));
|
|
MalgrFormPoly(x2, maxideal(2));
|
|
MalgrFormPoly(x2, maxideal(5));
|
|
MalgrFormPoly(x2, maxideal(6));
|
|
GF;
|
|
reduce(x2,GF);
|
|
x2;
|
|
X(3) - f[3];
|
|
X(3) - mappingf[3];
|
|
MalgrFormPoly(x2, maxideal(6));
|
|
LIB"AeCodPruebas.lib";
|
|
MalgrFormPoly(x2, maxideal(6));
|
|
LIB"AeCodPruebas.lib";
|
|
MalgrFormPoly(x2, maxideal(6));
|
|
MalgrFormPoly(x2, ideal(x,y)^4);
|
|
LIB"AeCodPruebas.lib";
|
|
MalgrFormPoly(x2, ideal(x,y)^4);
|
|
print(_);
|
|
MalgrFormPoly(x3, ideal(x,y)^4);
|
|
MalgrFormPoly(x3, ideal(x,y)^6);
|
|
MalgrFormPoly(x3, ideal(x,y)^7);
|
|
;
|
|
GF;
|
|
LIB"AeCodPruebas.lib";
|
|
ring r = 0,(x,y),ds;
|
|
ideal f = x,y2,y7+x2y;
|
|
AeNormal(f);
|
|
ideal f = x,y2,y5+x2y;
|
|
AeNormal(f);
|
|
ring r = 0,(t,x,y),ds;
|
|
ideal f = t,x,y3+t2y,(x+y)^4+t3y;
|
|
AeNormal(f);
|
|
ideal f = t,x,y4+t3y,(x+y)^3+t3y;
|
|
AeNormal(f);
|
|
ideal f = t,x,y5+t4y,(x+y)^4+t3y;
|
|
ideal f = t,x,y4+t3y,(x+y)^3+t2y;
|
|
AeNormal(f);
|
|
ideal f = t,x,y4+t3y,(x+y)^3+t2y;
|
|
AeNormal(f);
|
|
ideal f = t,x,y5+t4y,(x+y)^4+t3y;
|
|
AeNormal(f);
|
|
ideal f = t,x,y4+t3y,(x+y)^5+t4y;
|
|
AeNormal(f);
|
|
quit;
|
|
ring r = 0,(x,y),ds;
|
|
ideal f = x,y2,y3+x2y;
|
|
AeNormal(f);
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f);
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f);
|
|
ideal f = x+x4,y2,y3+x2y;
|
|
AeNormal(f);
|
|
AeNormal(f,maxideal(4));
|
|
ideal f = x+x4,y2,y3+x2y;
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
LIB"AeCodPruebas.lib";
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
f;
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
f;
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(4));
|
|
AeNormal(f,maxideal(6));
|
|
AeNormal(f,maxideal(10));
|
|
AeNormal(f,maxideal(20));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(10));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(10));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(10));
|
|
dimX
|
|
;
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(10));
|
|
AeNormal(f,maxideal(10));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(10));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(10));
|
|
AeNormal(f,maxideal(20));
|
|
LIB"AeCodPruebas.lib";
|
|
AeNormal(f,maxideal(20));
|
|
f;
|
|
ideal g = x,xy+y^6+y^9;
|
|
AeNormal(g,maxideal(20));
|
|
AeNormal(g,maxideal(10));
|
|
AeNormal(g,maxideal(12));
|
|
AeNormal(f,maxideal(12));
|
|
AeNormal(f);
|
|
AeNormal(g);
|
|
AeNormal(g,maxideal(12));
|
|
AeNormal(g,maxideal(20));
|
|
AeNormal(g);
|
|
AeNormal(g,maxideal(50));
|
|
ring r = 0,(x,y),ds;
|
|
ring R = 0,(X,Y),ds;
|
|
setring r;
|
|
map Rr = R,x2,y3;
|
|
ideal J = maxideal(20);
|
|
setring R;
|
|
preimage(r,Rr,J);
|
|
setring r;
|
|
ideal J = maxideal(50);
|
|
setring R;
|
|
ideal J = maxideal(50);
|
|
preimage(r,Rr,J);
|
|
setring r;
|
|
ideal J = maxideal(100);
|
|
setring R;
|
|
preimage(r,Rr,J);
|
|
setring r;
|
|
map f = R,x2+y3,y5+x7;
|
|
J = maxideal(20);
|
|
setring R;
|
|
preimage(r,f,J);
|