LAPACK 3.12.0
LAPACK: Linear Algebra PACKage
|
subroutine slarscl2 | ( | integer | m, |
integer | n, | ||
real, dimension( * ) | d, | ||
real, dimension( ldx, * ) | x, | ||
integer | ldx | ||
) |
SLARSCL2 performs reciprocal diagonal scaling on a matrix.
Download SLARSCL2 + dependencies [TGZ] [ZIP] [TXT]
SLARSCL2 performs a reciprocal diagonal scaling on a matrix: x <-- inv(D) * x where the diagonal matrix D is stored as a vector. Eventually to be replaced by BLAS_sge_diag_scale in the new BLAS standard.
[in] | M | M is INTEGER The number of rows of D and X. M >= 0. |
[in] | N | N is INTEGER The number of columns of X. N >= 0. |
[in] | D | D is REAL array, length M Diagonal matrix D, stored as a vector of length M. |
[in,out] | X | X is REAL array, dimension (LDX,N) On entry, the matrix X to be scaled by D. On exit, the scaled matrix. |
[in] | LDX | LDX is INTEGER The leading dimension of the matrix X. LDX >= M. |
Definition at line 89 of file slarscl2.f.