"Source: Text/RepThy/ModAlg.text";
"Line: 4227";
"Date: Fri Sep 26 12:10:12 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/RepThy/ModAlg.text, line: 4227
// Example: H99E28 ()
print "Example: H99E28";
ei := GetEchoInput();
SetEchoInput(true);
G := PermutationGroup< 12 |
        (1,6,7)(2,5,8,3,4,9)(11,12),
        (1,3)(4,9,12)(5,8,10,6,7,11) >;
P := PermutationModule(G, GF(3));
time End := EndomorphismAlgebra(P);
End;
time Aut := AutomorphismGroup(P);
Aut;
#Aut;
assert $1 eq 18;
IsAbelian(Aut);
assert $1;
AbelianInvariants(Aut);
SetEchoInput(ei);
