Merge pull request #719 from bh11/NewmanInfinityCriterionBug

fix bug in NewmanInfinityCriterion
gap-system · Apr 9, 2016 · ec8c2d4 · ec8c2d4
2 parents 5434201 + c8852da
commit ec8c2d4
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/grpfp.gi b/lib/grpfp.gi
@@ -5242,7 +5242,7 @@ local GO,q,d,e,b,r,val,agemo,ngens;
     q:=PQuotient(G,p,2,ngens);
   until q<>fail;
   q:=Image(EpimorphismQuotientSystem(q));
-  q:=PCentralSeries(q,p);
+  q:=ShallowCopy(PCentralSeries(q,p));
   if Length(q)=1 then
     Error("Trivial <p> quotient");
   fi;