@@ -54,12 +54,7 @@ function \(a::ScalMat, x::AbstractVecOrMat)
5454end
5555function / (x:: AbstractVecOrMat , a:: ScalMat )
5656 @check_argdims a. dim == size (x, 2 )
57- if VERSION < v " 1.9-"
58- # return matrix for 1-element vectors `x`, consistent with LinearAlgebra < 1.9
59- return reshape (x, Val (2 )) / a. value
60- else
61- return x / a. value
62- end
57+ return x / a. value
6358end
6459Base. kron (A:: ScalMat , B:: ScalMat ) = ScalMat (A. dim * B. dim, A. value * B. value )
6560
@@ -78,7 +73,7 @@ LinearAlgebra.sqrt(a::ScalMat) = ScalMat(a.dim, sqrt(a.value))
7873function whiten! (r:: AbstractVecOrMat , a:: ScalMat , x:: AbstractVecOrMat )
7974 @check_argdims axes (r) == axes (x)
8075 @check_argdims a. dim == size (x, 1 )
81- _ldiv ! (r, sqrt (a. value), x)
76+ ldiv ! (r, sqrt (a. value), x)
8277end
8378
8479function unwhiten! (r:: AbstractVecOrMat , a:: ScalMat , x:: AbstractVecOrMat )
@@ -180,10 +175,10 @@ end
180175
181176function X_invA_Xt (a:: ScalMat , x:: Matrix{<:Real} )
182177 @check_argdims LinearAlgebra. checksquare (a) == size (x, 2 )
183- return Symmetric (_rdiv ! (x * transpose (x), a. value))
178+ return Symmetric (rdiv ! (x * transpose (x), a. value))
184179end
185180
186181function Xt_invA_X (a:: ScalMat , x:: Matrix{<:Real} )
187182 @check_argdims LinearAlgebra. checksquare (a) == size (x, 1 )
188- return Symmetric (_rdiv ! (transpose (x) * x, a. value))
183+ return Symmetric (rdiv ! (transpose (x) * x, a. value))
189184end
0 commit comments