update ortSVD to "where" syntax

2018-08-20 03:58:09 +02:00 · 2018-08-20 03:58:09 +02:00 · 9c674ec284
parent 1825cc0b3d
commit 9c674ec284
1 changed files with 1 additions and 1 deletions
--- a/src/OrbitDecomposition.jl
+++ b/src/OrbitDecomposition.jl
@ -122,7 +122,7 @@ function Cstar_repr(x::GroupRingElem{T}, mreps::Dict) where {T}
    return sum(x[i].*mreps[parent(x).basis[i]] for i in findn(x.coeffs))
 end

-function orthSVD{T}(M::AbstractMatrix{T})
+function orthSVD(M::AbstractMatrix{T}) where {T<:AbstractFloat}
    M = full(M)
    fact = svdfact(M)
    M_rank = sum(fact[:S] .> maximum(size(M))*eps(T))