mirror of
https://github.com/kalmarek/Groups.jl.git
synced 2024-12-24 18:05:27 +01:00
But so far we only implemented Aut(FreeGroup)
This commit is contained in:
parent
117eddafd6
commit
b955eed67b
@ -19,7 +19,7 @@ typealias AutGroupElem GWord{AutSymbol}
|
||||
|
||||
type AutGroup <: FPGroup
|
||||
objectGroup::Group
|
||||
generators::Vector{AutSymbol}
|
||||
gens::Vector{AutSymbol}
|
||||
end
|
||||
|
||||
export AutSymbol, AutGroupElem, AutGroup
|
||||
@ -107,9 +107,8 @@ end
|
||||
#
|
||||
###############################################################################
|
||||
|
||||
function AutGroup(G::FPGroup; outer=false, special=false)
|
||||
length(G.rels) == 0 || throw("Don't know how to construct AutGroup of $G.")
|
||||
n = length(G.generators)
|
||||
function AutGroup(G::FreeGroup; outer=false, special=false)
|
||||
n = length(G.gens)
|
||||
indexing = [[i,j] for i in 1:n for j in 1:n if i≠j]
|
||||
rmuls = [rmul_autsymbol(i,j) for (i,j) in indexing]
|
||||
lmuls = [lmul_autsymbol(i,j) for (i,j) in indexing]
|
||||
|
Loading…
Reference in New Issue
Block a user