Quelle  5.7b.txt

gap> K:=ContractibleGcomplex("PGL(3,Z[i])");;
gap> R:=FreeGResolution(K,2);;
gap> P:=PresentationOfResolution(R);;
gap> G:=P.freeGroup/P.relators;
<fp group on the generators [ v, w, x, y, z ]>
gap> P.relators;
[ v^2, w^-1*v*w*v^-1, w^-1*v^-1*w^-1, (x^-1*w)^3, (y^-1*w)^3, (z^-1*w)^4, 
  y^-1*v^-1*z*y^-1*x, y^-1*v*x*v^-1*x*v, v^-1*z*v^-1*x*y, v^-1*x*v*y*v*x*v*y, 
  x^3, x*z*y, y^-1*v^-1*y^2*v*y^-1, (v*y)^4, z^-1*y*v*z^-1, (v*y*z)^2, 
  v^-1*(z*v)^2*z ]