"Source: Text/LieTheory/GrpCox.text";
"Line: 2639";
"Date: Fri Sep 26 12:10:11 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/LieTheory/GrpCox.text, line: 2639
// Example: H108E35 ()
print "Example: H108E35";
ei := GetEchoInput();
SetEchoInput(true);
mij:=[1,3,1,2,3,1,2,3,2,1,2,2,2,3,1,2,2,3,2,2,1];
E6 := CoxeterGroup(GrpFPCox, SymmetricMatrix(mij) );
J := {1,3,5};
drs := Transversal(E6,J);
ttt := WGidealgens2WGtable([drs[1398],drs[156],drs[99]],J);
nwg := WGtable2WG(ttt);
TestWG(E6,nwg);
SetEchoInput(ei);
