LAPACK  3.4.1
LAPACK: Linear Algebra PACKage
clarscl2.f File Reference

Go to the source code of this file.

Functions/Subroutines

subroutine CLARSCL2 (M, N, D, X, LDX)
 CLARSCL2

Function/Subroutine Documentation

subroutine CLARSCL2 ( INTEGER  M,
INTEGER  N,
REAL, dimension( * )  D,
COMPLEX, dimension( ldx, * )  X,
INTEGER  LDX 
)

CLARSCL2

Download CLARSCL2 + dependencies [TGZ] [ZIP] [TXT]
Purpose:

 CLARSCL2 performs a reciprocal diagonal scaling on an vector:
   x <-- inv(D) * x
 where the REAL diagonal matrix D is stored as a vector.

 Eventually to be replaced by BLAS_cge_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 REAL array, length M
     Diagonal matrix D, stored as a vector of length M.
 
[in,out]X
          X is COMPLEX 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:
November 2011

Definition at line 92 of file clarscl2.f.

 All Files Functions