"Source: Text/LieTheory/GrpRfl.text";
"Line: 459";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/LieTheory/GrpRfl.text, line: 459
// Example: H109E5 ()
print "Example: H109E5";
ei := GetEchoInput();
SetEchoInput(true);
F<z> := CyclotomicField(7);
A := Matrix(F,2,3,[[z,0,1],[0,1,0]]);
B := Matrix(F,2,3,[[1,1,1],[1,2,1]]);
G<x,y> := PseudoReflectionGroup(A,B);
IsReflectionGroup(G);
assert $1;
Order(x),Order(y),Order(x*y);
#G;
assert $1 eq 392;
SetEchoInput(ei);
