We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent c7643cd commit ba76f65Copy full SHA for ba76f65
base/linalg/lapack.jl
@@ -10,12 +10,6 @@ import Base.@blasfunc
10
import ..LinAlg: BlasFloat, Char, BlasInt, LAPACKException,
11
DimensionMismatch, SingularException, PosDefException, chkstride1, checksquare
12
13
-const VERSION = Ref{VersionNumber}()
14
-
15
-function __init__()
16
- VERSION[] = VersionNumber(laver()...)
17
-end
18
19
#Generic LAPACK error handlers
20
"""
21
Handle only negative LAPACK error codes
base/linalg/svd.jl
@@ -124,7 +124,7 @@ If `thin=true` (default), a thin SVD is returned. For a ``M \\times N`` matrix
124
125
function svdfact!{T<:BlasFloat}(A::StridedMatrix{T}, B::StridedMatrix{T})
126
# xggsvd3 replaced xggsvd in LAPACK 3.6.0
127
- if LAPACK.VERSION[] < v"3.6.0"
+ if LAPACK.laver() < (3, 6, 0)
128
U, V, Q, a, b, k, l, R = LAPACK.ggsvd!('U', 'V', 'Q', A, B)
129
else
130
U, V, Q, a, b, k, l, R = LAPACK.ggsvd3!('U', 'V', 'Q', A, B)
@@ -216,7 +216,7 @@ end
216
217
function svdvals!{T<:BlasFloat}(A::StridedMatrix{T}, B::StridedMatrix{T})
218
219
220
_, _, _, a, b, k, l, _ = LAPACK.ggsvd!('N', 'N', 'N', A, B)
221
222
_, _, _, a, b, k, l, _ = LAPACK.ggsvd3!('N', 'N', 'N', A, B)
test/linalg/lapack.jl
@@ -156,7 +156,7 @@ for elty in (Float32, Float64, Complex64, Complex128)
156
@test_approx_eq V' lVt
157
B = rand(elty,10,10)
158
159
160
@test_throws DimensionMismatch LAPACK.ggsvd!('S','S','S',A,B)
161
162
@test_throws DimensionMismatch LAPACK.ggsvd3!('S','S','S',A,B)
0 commit comments