"Source: Text/Group/GrpFP.text";
"Line: 5506";
"Date: Mon May 17 16:13:13 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Group/GrpFP.text, line: 5506
// Example: H78E43 ()
print "Example: H78E43";
ei := GetEchoInput();
SetEchoInput(true);
G<p, q, r, s, h, a> := FPGroup<p, q, r, s, h, a | 
                         h^3 = a^2 = p^2 = 1, p^h = p, p^a = q,
                         q^h = r, r^a = s, h^s = h^-1, r^h = p * q * r,
                         s * r = p * q * r * s, p * q = q * p,
                         p * r = r * p, p * s = s * p, q * r = r * q,
                         q * s = s * q>;
LowIndexSubgroups(G, <10, 10>);
SetEchoInput(ei);
