kalmar
/
Groups.jl
mirror of https://github.com/kalmarek/Groups.jl.git
1
0
Fork 0
Code Issues Releases Wiki Activity

evaluate AutSymbol

This commit is contained in:
kalmarek 2017-10-24 15:26:27 +02:00
parent 54e8eb0b43
commit 23d3787e34
1 changed files with 15 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/AutGroup.jl
View File

@ -157,7 +157,21 @@ function (f::AutSymbol){T}(v::Vector{GWord{T}})
if f.pow == 0
return v
end
return f.func(v)
if f.ex == :(id())
func = identity(v)
elseif f.ex.args[1] == :ϱ
func = ϱ(f.ex.args[2], f.ex.args[3], f.pow)
elseif f.ex.args[1] == :λ
func = λ(f.ex.args[2], f.ex.args[3], f.pow)
elseif f.ex.args[1] == :ɛ
func = ɛ(f.ex.args[2], f.pow)
elseif f.ex.args[1] == :σ
g = PermutationGroup(length(f.ex.args[2]))(f.ex.args[2])
func = σ(g, f.ex.args[3])
else
throw("Unknown AutSymbol!")
end
return func(v)
end
function (F::AutGroupElem)(v::Vector)