SSCAL(1) BLAS routine SSCAL(1)NAMESSCAL - scales a vector by a constant
SYNOPSIS
SUBROUTINE SSCAL(N,SA,SX,INCX)
REAL SA
INTEGER INCX,N
REAL SX(*)
PURPOSE
scales a vector by a constant.
uses unrolled loops for increment equal to 1.
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(*)
BLAS routine November 2008 SSCAL(1)