1CLARSCL2(1)LAPACK routine (version 3.2) CLARSCL2(1)
2
3
4
6 CLARSCL2 - performs a reciprocal diagonal scaling on an vector
7
9 SUBROUTINE CLARSCL2 ( M, N, D, X, LDX )
10
11 IMPLICIT NONE
12
13 INTEGER M, N, LDX
14
15 COMPLEX X( LDX, * )
16
17 REAL D( * )
18
20 CLARSCL2 performs a reciprocal diagonal scaling on an vector:
21 x <-- inv(D) * x
22 where the diagonal matrix D is stored as a vector.
23 Eventually to be replaced by BLAS_sge_diag_scale in the new BLAS stan‐
24 dard.
25
27 The size of the vectors X and D.
28
29 D (input) REAL array, length N
30 Diagonal matrix D, stored as a vector of length N. X
31 (input/output) COMPLEX array, length N On entry, the vector X to
32 be scaled by D. On exit, the scaled vector.
33
34
35
36 LAPACK routine (version 3.2) November 2008 CLARSCL2(1)