1
0
mirror of https://github.com/kalmarek/Groups.jl.git synced 2024-12-03 17:56:28 +01:00

evaluate AutSymbol

This commit is contained in:
kalmarek 2017-10-24 15:26:27 +02:00
parent 54e8eb0b43
commit 23d3787e34

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)