perm_autsymbol(::Vector{Int}) convenience function

2017-05-15 17:23:49 +02:00 · 2017-05-15 17:23:49 +02:00 · d3a9f8d3f6
parent 9606a14743
commit d3a9f8d3f6
1 changed files with 5 additions and 0 deletions
--- a/src/AutGroup.jl
+++ b/src/AutGroup.jl
@ -89,6 +89,11 @@ function perm_autsymbol(p::perm; pow::Int=1)
    end
 end

+function perm_autsymbol(a::Vector{Int})
+   G = PermutationGroup(length(a))
+   return perm_autsymbol(G(a))
+end
+
 function getperm(s::AutSymbol)
   if s.ex.args[1] == :σ
      p = s.ex.args[2]