![]() |
LAPACK
3.5.0
LAPACK: Linear Algebra PACKage
|
Go to the source code of this file.
Functions/Subroutines | |
| real function | scasum (N, CX, INCX) |
| SCASUM More... | |
| real function scasum | ( | integer | N, |
| complex, dimension(*) | CX, | ||
| integer | INCX | ||
| ) |
SCASUM
SCASUM takes the sum of the absolute values of a complex vector and
returns a single precision result. 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(*) Definition at line 53 of file scasum.f.