cyclic7:=[x1+x2+x3+x4+x5+x6+x7,x1*x2+x1*x7+x2*x3+x3*x4+x4*x5+x5*x6+x6*x7,x1*x2*x3+x1*x2*x7+x1*x6*x7+x2*x3*x4+x3*x4*x5+x4*x5*x6+x5*x6*x7,x1*x2*x3*x4+x1*x2*x3*x7+x1*x2*x6*x7+x1*x5*x6*x7+x2*x3*x4*x5+x3*x4*x5*x6+x4*x5*x6*x7,x1*x2*x3*x4*x5+x1*x2*x3*x4*x7+x1*x2*x3*x6*x7+x1*x2*x5*x6*x7+x1*x4*x5*x6*x7+x2*x3*x4*x5*x6+x3*x4*x5*x6*x7,x1*x2*x3*x4*x5*x6+x1*x2*x3*x4*x5*x7+x1*x2*x3*x4*x6*x7+x1*x2*x3*x5*x6*x7+x1*x2*x4*x5*x6*x7+x1*x3*x4*x5*x6*x7+x2*x3*x4*x5*x6*x7,x1*x2*x3*x4*x5*x6*x7-1]:;
p:=prevprime(2^24);
threads:=1;
time(H0:=gbasis(cyclic7 % p,lname(cyclic7),revlex));
write("Hcyclic7mod",H0);
p:=prevprime(2^29);
time(H:=gbasis(cyclic7 % p,lname(cyclic7),revlex));
p:=prevprime(2^31);
time(H:=gbasis(cyclic7 % p,lname(cyclic7),revlex));
