clascl2()

subroutine clascl2	(	integer	m,
		integer	n,
		real, dimension( * )	d,
		complex, dimension( ldx, * )	x,
		integer	ldx
	)

CLASCL2 performs diagonal scaling on a matrix.

Download CLASCL2 + dependencies [TGZ] [ZIP] [TXT]

Purpose:

 CLASCL2 performs a diagonal scaling on a matrix:
   x <-- D * x
 where the diagonal REAL matrix D is stored as a matrix.

 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 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 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.

Author

Univ. of Tennessee

Univ. of California Berkeley

Univ. of Colorado Denver

NAG Ltd.