kalmar/Groups.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/Groups.jl.git synced 2024-12-04 18:11:26 +01:00
Code Issues Releases Wiki Activity

add domain field to AutGroup

Browse Source
This commit is contained in:
kalmarek 2018-03-17 05:01:21 +01:00
parent c76ad85067
commit 6a59c53c8f
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/AutGroup.jl
View File

@ -32,9 +32,10 @@ end
AutGroupElem = GWord{AutSymbol}
mutable struct AutGroup <: AbstractFPGroup
mutable struct AutGroup{N} <: AbstractFPGroup
objectGroup::Group
gens::Vector{AutSymbol}
domain::NTuple{N, FreeGroupElem}
end
export AutGroupElem, AutGroup
@ -144,7 +145,7 @@ function AutGroup(G::FreeGroup; special=false)
append!(S, [flips; syms])
end
return AutGroup(G, S)
return AutGroup{n}(G, S, NTuple{n, FreeGroupElem}(G.(G.gens)))
end
###############################################################################