More generous up step to avoid horrible down indices.

hulpke · Aug 10, 2018 · 076a915 · 076a915
1 parent 6eabfe3
commit 076a915
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/lib/csetgrp.gi b/lib/csetgrp.gi
@@ -867,6 +867,8 @@ local c, flip, maxidx, refineChainActionLimit, cano, tryfct, p, r, t,
 
     if maxidx(c)>10*actlimit then
 
+      badlimit:=10*actlimit;
+      uplimit:=15000;
       r:=ShallowCopy(TryMaximalSubgroupClassReps(a:cheap));
       r:=Filtered(r,x->Index(a,x)<uplimit);
 
@@ -891,6 +893,8 @@ local c, flip, maxidx, refineChainActionLimit, cano, tryfct, p, r, t,
   stabs:=[b];
   dcs:=[];
 
+  Info(InfoCoset,1,"Chosen series is ",List(c,Size));
+
   # calculate setup for once
   homs:=[];
   tra:=[];