1DSCAL(1)                         BLAS routine                         DSCAL(1)
2
3
4

NAME

6       DSCAL - a vector by a constant
7

SYNOPSIS

9       SUBROUTINE DSCAL(N,DA,DX,INCX)
10
11           DOUBLE                     PRECISION DA
12
13           INTEGER                    INCX,N
14
15           DOUBLE                     PRECISION DX(*)
16

PURPOSE

18          scales a vector by a constant.
19          uses unrolled loops for increment equal to one.
20          jack dongarra, linpack, 3/11/78.
21          modified 3/93 to return if incx .le. 0.
22          modified 12/3/93, array(1) declarations changed to array(*)
23
24
25
26
27
28BLAS routine                     November 2006                        DSCAL(1)