finish reduce if both simplify_perms! and free_reduce! return true

This commit is contained in:
kalmar 2017-05-15 17:23:23 +02:00
parent 18ae84d9cd
commit 9606a14743
1 changed files with 1 additions and 2 deletions

View File

@ -282,8 +282,7 @@ function reduce!(W::AutGroupElem)
else
reduced = false
while !reduced
reduced = simplify_perms!(W)
reduced = join_free_symbols!(W)
reduced = simplify_perms!(W) && free_reduce!(W)
deleteat!(W.symbols, find(x -> x.pow == 0, W.symbols))
end
end