"Source: Text/Ring/RngGal.text";
"Line: 788";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Ring/RngGal.text, line: 788
// Example: H55E2 ()
print "Example: H55E2";
ei := GetEchoInput();
SetEchoInput(true);
R<w> := GaloisRing(3, 3, 2);                             
#R;
assert $1 eq 729;
P<x,y,z> := PolynomialRing(R, 3);
I := ideal<P | [x^2 - w*y, 3*y^3 - 3*w*x*z, 9*z^5 - 9*w]>;         
GroebnerBasis(I);
SetEchoInput(ei);
