LIB"AeCodPruebas.lib";
ring r = 0,(x,y,z),ds;

ideal f = x,y,yz+z6+z8,z3+xz;
matrix jf = jacob(f);

AeNormal(f,maxideal(2));


/*
def Q = MalgrRing(ideal(0),2,ideal(x,y2));
setring Q;

def f = imap(r,f);
def jf = imap(r,jf);

jf[1];

MalgrFormVect(matrix(jf[1]), maxOX^5);
*/

quit;