From 91189124b3978002450a9a70d0aa6f6cea8d43e7 Mon Sep 17 00:00:00 2001
From: kalmar <kalmar@amu.edu.pl>
Date: Thu, 2 Feb 2017 11:47:03 +0100
Subject: [PATCH] Simplify perms before join_free_symbol for automorphisms

---
 src/automorphism_groups.jl | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/automorphism_groups.jl b/src/automorphism_groups.jl
index 3272b2a..95328c4 100644
--- a/src/automorphism_groups.jl
+++ b/src/automorphism_groups.jl
@@ -159,8 +159,8 @@ function reduce!(W::AutWord)
     else
         reduced = false
         while !reduced
-            reduced = join_free_symbols!(W)
             reduced = simplify_perms!(W)
+            reduced = join_free_symbols!(W)
             deleteat!(W.symbols, find(x -> x.pow == 0, W.symbols))
         end
     end