"Source: Text/RepThy/AlgGrp.text";
"Line: 1104";
"Date: Fri Sep 26 12:10:12 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/RepThy/AlgGrp.text, line: 1104
// Example: H93E6 ()
print "Example: H93E6";
ei := GetEchoInput();
SetEchoInput(true);
M11 := sub< Sym(11) | (1,11,9,10,4,3,7,2,6,5,8), (1,5,6,3,4,2,7,11,9,10,8) >;
A := GroupAlgebra(RealField(16), M11 : Rep := "Vector");
A;
e := (A!M11.1 + A!M11.2) / 2.0;
eta := Eta(A) / #M11;
e10 := e^10;
f := A!1;
for i in [1..5] do
    f *:= e10;
    print &+[ c^2 : c in Eltseq(f - eta) ];
end for;
SetEchoInput(ei);
