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

permute π₁Σ generators to maintain coherent order with Aut(F_n)

Browse Source
This commit is contained in:
Marek Kaluba 2021-07-07 10:34:42 +02:00
parent 3629b07626
commit 99fd238cf2
No known key found for this signature in database
GPG Key ID: 8BF1A3855328FC15
1 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/groups/symplectic_twists.jl
View File

@ -155,10 +155,15 @@ function SymplecticMappingClass(
g = sautFn(w)
d = ntuple(i->gens(Σ, i), ngens(Σ))
perm = let g = genus(Σ)
[reverse(1+1:2:2g); reverse(1:2:2g)]
end
img = evaluate!(deepcopy(d), g)
invim = evaluate!(d, inv(g))
d = ntuple(i->gens(Σ, i), ngens(Σ))[perm]
img = evaluate!(deepcopy(d), g)[invperm(perm)]
invim = evaluate!(d, inv(g))[invperm(perm)]
img, invim = inverse ? (invim, img) : (img, invim)