kalmar/Groups.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/Groups.jl.git synced 2024-11-19 06:30:29 +01:00
Code Issues Releases Wiki Activity

Simplify perms before join_free_symbol for automorphisms

Browse Source
This commit is contained in:
kalmar 2017-02-02 11:47:03 +01:00
parent 3ddc1294f9
commit 91189124b3
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/automorphism_groups.jl
View File

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