![]() |
LAPACK
3.7.0
LAPACK: Linear Algebra PACKage
|
| subroutine sscal | ( | integer | N, |
| real | SA, | ||
| real, dimension(*) | SX, | ||
| integer | INCX | ||
| ) |
SSCAL
scales a vector by a constant.
uses unrolled loops for increment equal to 1. 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(*)