kalmar/Groups.jl
1
0
Fork 0
mirror of https://github.com/kalmarek/Groups.jl.git synced 2024-11-19 06:30:29 +01:00
Code Issues Releases Wiki Activity

in automoprhism evaluation no need to freereduce!

Browse Source 
Symbols already do so, where appropriate
This commit is contained in:
kalmarek 2020-03-25 00:47:45 +01:00
parent b9c2a90bae
commit a1ebf530f4
No known key found for this signature in database
GPG Key ID: 8BF1A3855328FC15
1 changed files with 6 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
src/AutGroup.jl
View File

@ -217,20 +217,16 @@ end
#
###############################################################################
function (s::AutSymbol)(v::NTuple{N, T}) where {N, T}
if s.pow != 0
v = s.fn(v, s.pow)::NTuple{N, T}
end
return v
end
(s::AutSymbol)(v::NTuple{N, T}) where {N, T} = s.fn(v, s.pow)::NTuple{N, T}
function (f::Automorphism{N})(v::NTuple{N, T}) where {N, T}
for (i, s) in enumerate(f.symbols)
for s in syllables(f)
v = s(v)::NTuple{N, T}
if i % 5 == 0
freereduce!.(v)
end
# if iszero(i % 3)
# freereduce!.(v)
# end
end
# return freereduce!.(v)
return v
end