1
0
mirror of https://github.com/kalmarek/GroupRings.jl.git synced 2024-07-30 06:05:31 +02:00
This commit is contained in:
kalmar 2017-05-17 11:45:56 +02:00
parent 890bde8b82
commit 8685c25600

View File

@ -282,15 +282,15 @@ function reverse_dict(a::AbstractVector)
end end
function create_pm{T<:GroupElem}(basis::Vector{T}, basis_dict::Dict{T, Int}, function create_pm{T<:GroupElem}(basis::Vector{T}, basis_dict::Dict{T, Int},
limit; twisted=false) limit=length(basis); twisted=false)
product_matrix = zeros(Int, (limit,limit)) product_matrix = zeros(Int, (limit,limit))
for i in 1:limit for i in 1:limit
x = basis([i]) x = basis[i]
if twisted if twisted
x = inv(x) x = inv(x)
end end
for j in 1:limit for j in 1:limit
w = x*basis[j] w = x*(basis[j])
product_matrix[i,j] = basis_dict[w] product_matrix[i,j] = basis_dict[w]
end end
end end