"Source: Text/LieTheory/GrpRfl.text";
"Line: 459";
"Date: Sat Nov  9 18:06:06 2019";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/LieTheory/GrpRfl.text, line: 459
// Example: H106E5 ()
print "Example: H106E5";
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);
