SCASUM
Purpose
SCASUM takes the sum of the absolute values of a complex vector and
returns a single precision result.
returns a single precision result.
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(*)