mirror of
https://github.com/kalmarek/Groups.jl.git
synced 2024-11-19 06:30:29 +01:00
Simplify perms before join_free_symbol for automorphisms
This commit is contained in:
parent
3ddc1294f9
commit
91189124b3
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user