---
name: "slarscl2"
section: "3lapack"
platform: "linux"
package: "liblapack-doc"
version: "3.2.1-8"
release: "Debian 6.0 (Squeeze)"
platforms: ["linux"]
url: "https://new.carta.tech/slarscl2/3lapack"
---

# slarscl2(3lapack)

performs a reciprocal diagonal scaling on an vector

## 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 standard.\

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