(setq maxdeg 11)
(set-heap-size 10000000)
(noncommify)
(setmodulus 11)
(load anick)
%(SETQ ANICKRESOLUTIONOUTPUTFILE "naagot")
(ALGFORMINPUT)
vars x,y,z,u,v,w;
x*z+z*x,
y*u+u*y, y*z+z*y,
y*w+w*y,
z*v+v*z,
x*u+u*x,
u*v+v*u-x*w-w*x,
x*v+v*x+w*u+u*w+2*u*v+2*v*u;
(SETQ ALGOUTMODE 'MAPLE)
(GI)
(GK)
(ON CALCBETTI)
(CALCULATEANICKRESOLUTIONTOLIMIT 11)
(ON CALCBETTI)
(ANICKDISPLAY)
(PRINTBETTI)
(MACBETTIPRINT)


