"Source: Text/Group/GrpFP.text";
"Line: 1277";
"Date: Thu Sep 25 14:47:45 2025";
"Main: Fri Sep 26 14:29:19 2025";
// original file: Text/Group/GrpFP.text, line: 1277
// Example: H80E11 ()
print "Example: H80E11";
ei := GetEchoInput();
SetEchoInput(true);
F<x1, x2, x3, x4, x5, x6, x7, x8> := FreeGroup(8);
F8<x1, x2, x3, x4, x5, x6, x7, x8> := 
    quo< F | x1*x2=x3, x2*x3=x4, x3*x4=x5, x4*x5=x6,
       x5*x6=x7, x6*x7=x8, x7*x8=x1, x8*x1=x2>;
H<x, y>, f := Simplify(F8: Preserve := [1,2]);
F8 ! f(x5*x6);
SetEchoInput(ei);
