"Source: Text/Group/GrpPC.text";
"Line: 6758";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Group/GrpPC.text, line: 6758
// Example: H70E50 ()
print "Example: H70E50";
ei := GetEchoInput();
SetEchoInput(true);
p := 541;
G := RandomGenus2Group(p, [29]);
#G eq p^(29 + 2);
A := TGAutomorphismGroup(G);
IsDivisibleBy(#A, #GL(2, p));
#A eq (p - 1)*p^28 * (p^2 - 1)*(p^2 - p) * p^(29*2);
SetEchoInput(ei);
