@@ -521,6 +521,14 @@ function ldiv!(adjA::AdjointFactorization{<:Any,<:LU}, B::AbstractVecOrMat)
521
521
_apply_inverse_ipiv_rows! (A, B)
522
522
end
523
523
524
+ # To enable rdiv! via ldiv!
525
+ ldiv! (A:: TransposeFactorization{T,<:LU{T,<:StridedMatrix}} , B:: Transpose{T,<:StridedVecOrMat{T}} ) where {T<: Union{BlasFloat,BlasComplex} } =
526
+ LAPACK. getrs! (' T' , A. parent. factors, A. parent. ipiv, copy (B))
527
+ ldiv! (A:: TransposeFactorization{T,<:LU{T,<:StridedMatrix}} , B:: Transpose{T,<:Hermitian{T,<:StridedMatrix}} ) where {T<: BlasComplex } =
528
+ LAPACK. getrs! (' T' , A. parent. factors, A. parent. ipiv, Matrix (B))
529
+ ldiv! (A:: TransposeFactorization{T,<:LU{T,<:StridedMatrix}} , B:: Symmetric{T,<:StridedMatrix} ) where {T<: BlasFloat } =
530
+ LAPACK. getrs! (' T' , A. parent. factors, A. parent. ipiv, Matrix (B))
531
+
524
532
(\ )(A:: AdjointFactorization{T,<:LU{T,<:StridedMatrix}} , B:: Adjoint{T,<:StridedVecOrMat{T}} ) where {T<: BlasComplex } =
525
533
LAPACK. getrs! (' C' , A. parent. factors, A. parent. ipiv, copy (B))
526
534
(\ )(A:: TransposeFactorization{T,<:LU{T,<:StridedMatrix}} , B:: Transpose{T,<:StridedVecOrMat{T}} ) where {T<: BlasFloat } =
0 commit comments