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.