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

# dlarscl2(3lapack)

performs a reciprocal diagonal scaling on an vector

## NAME

DLARSCL2 - performs a reciprocal diagonal scaling on an vector

## SYNOPSIS

- SUBROUTINE DLARSCL2

  ( M, N, D, X, LDX )

- IMPLICIT

  NONE

- INTEGER

  M, N, LDX

- DOUBLE

  PRECISION D( \* ), X( LDX, \* )

## PURPOSE

DLARSCL2 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) DOUBLE PRECISION array, length N

  Diagonal matrix D, stored as a vector of length N.

- X (input/output) DOUBLE PRECISION array, length N

  On entry, the vector X to be scaled by D. On exit, the scaled vector.