1
0
mirror of https://github.com/kalmarek/PropertyT.jl.git synced 2024-12-26 18:40:29 +01:00

keep permtype consistent with partitions (i.e. rev-sorted)

This commit is contained in:
kalmar 2017-07-13 17:47:40 +02:00
parent af74ae6fb0
commit 680d888b68

View File

@ -6,7 +6,7 @@
function chars(G::PermutationGroup) function chars(G::PermutationGroup)
permtype_unsorted(σ::Nemo.perm) = [length(c) for c in cycles(σ)] permtype_unsorted(σ::Nemo.perm) = [length(c) for c in cycles(σ)]
permtype(σ::Nemo.perm) = sort(permtype_unsorted(σ)) permtype(σ::Nemo.perm) = sort(permtype_unsorted(σ), rev=true)
χ_id(σ::Nemo.perm) = 1 χ_id(σ::Nemo.perm) = 1
@ -33,9 +33,9 @@ function chars(G::PermutationGroup)
function χ_regviaS3(σ::Nemo.perm) function χ_regviaS3(σ::Nemo.perm)
vals = Dict{Vector{Int}, Int}( vals = Dict{Vector{Int}, Int}(
[1,1,1,1] => 2, [1,1,1,1] => 2,
[1,1,2] => 0, [2,1,1] => 0,
[2,2] => 2, [2,2] => 2,
[1,3] =>-1, [3,1] =>-1,
[4] => 0 [4] => 0
) )
return vals[permtype(σ)] return vals[permtype(σ)]
@ -48,11 +48,11 @@ function chars(G::PermutationGroup)
function ϱ(σ::Nemo.perm) function ϱ(σ::Nemo.perm)
vals = Dict{Vector{Int}, Int}( vals = Dict{Vector{Int}, Int}(
[1,1,1,1,1] => 5, [1,1,1,1,1] => 5,
[1,1,1,2] => 1, [2,1,1,1] => 1,
[1,2,2] => 1, [2,2,1] => 1,
[1,1,3] =>-1, [3,1,1] =>-1,
[2,3] => 1, [3,2] => 1,
[1,4] =>-1, [4,1] =>-1,
[5] => 0 [5] => 0
) )
return vals[permtype(σ)] return vals[permtype(σ)]
@ -63,11 +63,11 @@ function chars(G::PermutationGroup)
function ψ(σ::Nemo.perm) function ψ(σ::Nemo.perm)
vals = Dict{Vector{Int}, Int}( vals = Dict{Vector{Int}, Int}(
[1,1,1,1,1] => 6, [1,1,1,1,1] => 6,
[1,1,1,2] => 0, [2,1,1,1] => 0,
[1,2,2] => -2, [2,2,1] => -2,
[1,1,3] => 0, [3,1,1] => 0,
[2,3] => 0, [3,2] => 0,
[1,4] => 0, [4,1] => 0,
[5] => 1 [5] => 1
) )
return vals[permtype(σ)] return vals[permtype(σ)]