"Source: Text/Group/GrpFP.text";
"Line: 10222";
"Date: Mon May 17 16:13:13 2021";
"Main: Thu May 25 10:02:38 2023";
// original file: Text/Group/GrpFP.text, line: 10222
// Example: H78E78 ()
print "Example: H78E78";
ei := GetEchoInput();
SetEchoInput(true);
Gamma< x, y > := FPGroup< x, y | x^2, y^3 >;
u := x*y; v := x*y^-1;
G := quo< Gamma | u^10*v^2*u*v*u*v^2 >;
quot := L2Quotients(G); quot;
H, A := GetMatrices(quot[1]);
H;
G := quo< Gamma | u^3*v*u^3*v*u^3*v^2*u*v^2 >;
quot := L2Quotients(G);
quot;
G := quo< Gamma | u^3*v*u^3*v^2*u*v^3*u*v^2 >;
quot := L2Quotients(G);
quot;  
SetEchoInput(ei);
