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

Go to the source code of this file.

Functions/Subroutines

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

Function/Subroutine Documentation

subroutine zlarscl2 ( integer  M,
integer  N,
double precision, dimension( * )  D,
complex*16, dimension( ldx, * )  X,
integer  LDX 
)

ZLARSCL2 performs reciprocal diagonal scaling on a vector.

Download ZLARSCL2 + dependencies [TGZ] [ZIP] [TXT]
Purpose:
 ZLARSCL2 performs a reciprocal diagonal scaling on an vector:
   x <-- inv(D) * x
 where the DOUBLE PRECISION diagonal matrix D is stored as a vector.

 Eventually to be replaced by BLAS_zge_diag_scale in the new BLAS
 standard.
Parameters:
[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 D and X. N >= 0.
[in]D
          D is DOUBLE PRECISION array, length M
     Diagonal matrix D, stored as a vector of length M.
[in,out]X
          X is COMPLEX*16 array, dimension (LDX,N)
     On entry, the vector X to be scaled by D.
     On exit, the scaled vector.
[in]LDX
          LDX is INTEGER
     The leading dimension of the vector X. LDX >= 0.
Author:
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date:
September 2012

Definition at line 92 of file zlarscl2.f.