LAPACK  3.4.2
LAPACK: Linear Algebra PACKage
 All Files Functions Groups
slarscl2.f File Reference

Go to the source code of this file.


subroutine slarscl2 (M, N, D, X, LDX)
 SLARSCL2 performs reciprocal diagonal scaling on a vector.

Function/Subroutine Documentation

subroutine slarscl2 ( integer  M,
integer  N,
real, dimension( * )  D,
real, dimension( ldx, * )  X,
integer  LDX 

SLARSCL2 performs reciprocal diagonal scaling on a vector.

Download SLARSCL2 + dependencies [TGZ] [ZIP] [TXT]
 SLARSCL2 performs a reciprocal diagonal scaling on an vector:
   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
          M is INTEGER
     The number of rows of D and X. M >= 0.
          N is INTEGER
     The number of columns of D and X. N >= 0.
          D is REAL array, length M
     Diagonal matrix D, stored as a vector of length M.
          X is REAL array, dimension (LDX,N)
     On entry, the vector X to be scaled by D.
     On exit, the scaled vector.
          LDX is INTEGER
     The leading dimension of the vector X. LDX >= 0.
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
September 2012

Definition at line 91 of file slarscl2.f.