SLARSCL2(1)LAPACK routine (version 3.2) SLARSCL2(1)NAME
SLARSCL2 - performs a reciprocal diagonal scaling on an vector
SYNOPSIS
SUBROUTINE SLARSCL2 ( M, N, D, X, LDX )
IMPLICIT NONE
INTEGER M, N, LDX
REAL D( * ), X( LDX, * )
PURPOSE
SLARSCL2 performs a reciprocal diagonal scaling on an vector:
x <-- inv(D) * x
where the diagonal matrix D is stored as a vector.
Eventually to be replaced by BLAS_sge_diag_scale in the new BLAS stan‐
dard.
ARGUMENTS
N (input) INTEGER
The size of the vectors X and D.
D (input) REAL array, length N
Diagonal matrix D, stored as a vector of length N.
X (input/output) REAL array, length N
On entry, the vector X to be scaled by D. On exit, the scaled
vector.
LAPACK routine (version 3.2) November 2008 SLARSCL2(1)