"Source: Text/Group/GrpFP.text";
"Line: 7849";
"Date: Mon May 17 16:13:13 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Group/GrpFP.text, line: 7849
// Example: H78E60 ()
print "Example: H78E60";
ei := GetEchoInput();
SetEchoInput(true);
G<a, b> := FPGroup<a, b| a^8, b^7, (a * b)^2, (a^-1 * b)^3>;
H<x, y> := sub< G | a^2, a^-1 * b >;
#AbelianQuotientInvariants(H,2);  
assert $1 eq 1;
SetEchoInput(ei);
