mirror of
https://github.com/kalmarek/Groups.jl.git
synced 2024-12-25 18:15:29 +01:00
fix bug in reduce!(::Automorphism)
This commit is contained in:
parent
6d22c82ab3
commit
7bc26ece79
@ -294,7 +294,7 @@ function reduce!(w::Automorphism)
|
|||||||
while !reduced
|
while !reduced
|
||||||
reduced = simplifyperms!(Bool, w) && freereduce!(Bool, w)
|
reduced = simplifyperms!(Bool, w) && freereduce!(Bool, w)
|
||||||
end
|
end
|
||||||
return W
|
return w
|
||||||
end
|
end
|
||||||
|
|
||||||
###############################################################################
|
###############################################################################
|
||||||
|
@ -182,6 +182,15 @@
|
|||||||
|
|
||||||
g_im = g(Groups.domain(A))
|
g_im = g(Groups.domain(A))
|
||||||
@test length.(g_im) == (1,1,1,1)
|
@test length.(g_im) == (1,1,1,1)
|
||||||
|
|
||||||
|
g = A(Groups.σ(perm"(1,2)(4)"))
|
||||||
|
h = A(Groups.σ(perm"(2,3,4)"))
|
||||||
|
@test g*h isa Groups.Automorphism{4}
|
||||||
|
f = g*h
|
||||||
|
Groups
|
||||||
|
@test Groups.syllablelength(f) == 2
|
||||||
|
@test Groups.reduce!(f) isa Groups.Automorphism{4}
|
||||||
|
@test Groups.syllablelength(f) == 1
|
||||||
end
|
end
|
||||||
|
|
||||||
@testset "specific Aut(F4) tests" begin
|
@testset "specific Aut(F4) tests" begin
|
||||||
|
Loading…
Reference in New Issue
Block a user