//Execute this with: //Singular --ticks-per-sec=100<24.sing // timer=1; // ring R= 0 , (a,b,c,d,e,f,g,h),dp; ideal I= -20480*a+2048*b+65536*f-131072*c-786432*e-4194304*g+12288*d+262144*h+16777216-\ 4096*f*g+64*f*c+16*f*a-192*b*g-b*c-1024*d*g+d*a+4096*h*e+192*h*a+1024*h*c-64*d* e-16*b*e , -12005*a+1372*b+33614*f-67228*c-352947*e-1647086*g+7203*d+117649*h-2401*f*g+49* f*c+14*f*a-147*b*g-b*c-686*d*g+d*a+2401*h*e+147*h*a+686*h*c-49*d*e-14*b*e+ 5764801 , -6480*a+864*b+15552*f-31104*c-139968*e-559872*g+3888*d+46656*h-1296*f*g+36*f*c+ 12*f*a-108*b*g-b*c-432*d*g+d*a+1296*h*e+108*h*a+432*h*c-36*d*e-12*b*e+1679616 , -3125*a+500*b+6250*f-12500*c-46875*e-156250*g+1875*d+15625*h-625*f*g+25*f*c+10* f*a-75*b*g-b*c-250*d*g+d*a+625*h*e+75*h*a+250*h*c-25*d*e-10*b*e+390625 , -1280*a+256*b+2048*f-4096*c-12288*e-32768*g+768*d+4096*h+65536-256*f*g+16*f*c+8 *f*a-48*b*g-b*c-128*d*g+d*a+256*h*e+48*h*a+128*h*c-16*d*e-8*b*e , -405*a+108*b+486*f-972*c-2187*e-4374*g+243*d+729*h+6561-81*f*g+9*f*c+6*f*a-27*b *g-b*c-54*d*g+d*a+81*h*e+27*h*a+54*h*c-9*d*e-6*b*e , -80*a+32*b+64*f-128*c-192*e-256*g+48*d+64*h+256-16*f*g+4*f*c+4*f*a-12*b*g-b*c-\ 16*d*g+d*a+16*h*e+12*h*a+16*h*c-4*d*e-4*b*e , 1-5*a+4*b+2*f-4*c-3*e-2*g+3*d+h-f*g+f*c+2*f*a-3*b*g-b*c-2*d*g+d*a+h*e+3*h*a+2*h *c-d*e-2*b*e , 0; int t=timer; ideal G; G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); G= std(I);G= std(I);G= std(I);G= std(I);G= std(I); int s=timer-t; print("Time in to compute 50 degree reverse lexicographic Groebner bases: "); s; print("Time units, counts per second:"); system("--ticks-per-sec"); degree(G); ncols(G); print(G); quit;