From b5c069b2a8377a190aa39d813c2c187756614a00 Mon Sep 17 00:00:00 2001 From: kalmar Date: Wed, 21 Jun 2017 16:44:55 +0200 Subject: [PATCH] remove U\pi_matrices func --- OrbitDecomposition.jl | 12 +----------- 1 file changed, 1 insertion(+), 11 deletions(-) diff --git a/OrbitDecomposition.jl b/OrbitDecomposition.jl index b43e561..6b5850f 100644 --- a/OrbitDecomposition.jl +++ b/OrbitDecomposition.jl @@ -133,16 +133,6 @@ function orthSVD(M::AbstractMatrix) return fact[:U][:,1:M_rank] end -function Uπ_matrices(P_matrices; orth=orthSVD) - U_p_matrices = Vector{Array{Float64,2}}() - for (i,p_mat) in enumerate(P_matrices) - U_p = orth(p_mat) - push!(U_p_matrices, U_p) - end - return U_p_matrices -end - - function compute_orbit_data{T<:GroupElem}(logger, name::String, G::Group, S::Vector{T}, AutS; radius=2) isdir(name) || mkdir(name) @@ -180,7 +170,7 @@ function compute_orbit_data{T<:GroupElem}(logger, name::String, G::Group, S::Vec @time π_E_projections = [Cstar_repr(p, AutS_matrixreps) for p in AutS_mps] info(logger, "Uπs...") - @time Uπs = Uπ_matrices(π_E_projections); + @time Uπs = orthSVD.(π_E_projections) multiplicities = [size(U,2) for U in Uπs]; info(logger, "multiplicities = $multiplicities")