SASUM
Purpose
SASUM takes the sum of the absolute values.
uses unrolled loops for increment equal to one.
uses unrolled loops for increment equal to one.
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(*)
modified 3/93 to return if incx .le. 0.
modified 12/3/93, array(1) declarations changed to array(*)