LAPACK  3.6.0
LAPACK: Linear Algebra PACKage
subroutine dscal ( integer  N,
double precision  DA,
double precision, dimension(*)  DX,
integer  INCX 
)

DSCAL

Purpose:
    DSCAL scales a vector by a constant.
    uses unrolled loops for increment equal to one.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
November 2011
Further Details:
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)