"Source: Text/Group/GrpFPInt.text";
"Line: 2128";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Group/GrpFPInt.text, line: 2128
// Example: H79E25 ()
print "Example: H79E25";
ei := GetEchoInput();
SetEchoInput(true);
G := FPGroup< a,b,c | a*c^-1*b*c^-1*a*b*a^-1*b,
                    a*b*a*b^-1*c^2*b^-1,
                    a^2*b^-1*c*a*c*a*c*a*c*a*c*b^-1 >;
H := Alt(5);
homs := Homomorphisms(G, H : Limit := 1);
homs;
homs := Homomorphisms(G, H);
#homs;
phi :=  homs[1];
K := Kernel(phi);
K;
SetEchoInput(ei);
