drscl

cdrscl

Functions

void cdrscl(
    const INT           n,
    const f32           sa,
          c64* restrict sx,
    const INT           incx
);

void cdrscl(const INT n, const f32 sa, c64 *restrict sx, const INT incx)

CDRSCL multiplies an n-element complex vector x by the real scalar 1/a.

This is done without overflow or underflow as long as the final result x/a does not overflow or underflow.

Parameters

in

n

The number of components of the vector x.

in

sa

The scalar a which is used to divide each component of x. sa must be >= 0, or the subroutine will divide by zero.

inout

sx

Complex*16 array, dimension (1+(n-1)*abs(incx)). The n-element vector x.

in

incx

The increment between successive values of the vector sx. incx > 0.

zdrscl

Functions

void zdrscl(
    const INT            n,
    const f64            sa,
          c128* restrict sx,
    const INT            incx
);

void zdrscl(const INT n, const f64 sa, c128 *restrict sx, const INT incx)

ZDRSCL multiplies an n-element complex vector x by the real scalar 1/a.

This is done without overflow or underflow as long as the final result x/a does not overflow or underflow.

Parameters

in

n

The number of components of the vector x.

in

sa

The scalar a which is used to divide each component of x. sa must be >= 0, or the subroutine will divide by zero.

inout

sx

Complex*16 array, dimension (1+(n-1)*abs(incx)). The n-element vector x.

in

incx

The increment between successive values of the vector sx. incx > 0.