From 39d64b7e69337d9111fc932a2f1110862e3a9959 Mon Sep 17 00:00:00 2001 From: kalmar Date: Fri, 12 May 2017 20:08:27 +0200 Subject: [PATCH] update getperm --- src/automorphism_groups.jl | 11 ++++++----- 1 file changed, 6 insertions(+), 5 deletions(-) diff --git a/src/automorphism_groups.jl b/src/automorphism_groups.jl index b08d743..f3f41c4 100644 --- a/src/automorphism_groups.jl +++ b/src/automorphism_groups.jl @@ -74,11 +74,12 @@ function perm_autsymbol(p::perm; pow::Int=1) end function getperm(s::AutSymbol) - if s.ex.args[1] == :σ - return s.ex.args[2] - else - throw(ArgumentError("$s is not a permutation automorphism!")) - end + if s.ex.args[1] == :σ + p = s.ex.args[2] + return PermutationGroup(length(p))(p) + else + throw(ArgumentError("$s is not a permutation automorphism!")) + end end function AutGroup(G::FPGroup; outer=false, special=false)