add maxrules to SpecialAutomorphismGroup

2021-06-29 16:54:00 +02:00 · 2021-06-29 16:54:00 +02:00 · 2f5401be83
parent 29b6675a8a
commit 2f5401be83
1 changed files with 3 additions and 1 deletions
--- a/src/groups/sautFn.jl
+++ b/src/groups/sautFn.jl
@ -7,8 +7,10 @@ function SpecialAutomorphismGroup(F::FreeGroup; ordering = KnuthBendix.LenLex, k
    A, rels = gersten_relations(n, commutative = false)
    S = KnuthBendix.letters(A)[1:2(n^2-n)]

+    maxrules = 1000*n
+
    rws = KnuthBendix.RewritingSystem(rels, ordering(A))
-    KnuthBendix.knuthbendix!(rws; kwargs...)
+    @time KnuthBendix.knuthbendix!(rws; maxrules=maxrules, kwargs...)
    return AutomorphismGroup(F, S, rws, ntuple(i -> gens(F, i), n))
 end