scasum(3f) - [BLAS:SINGLE_BLAS_LEVEL1] SCASUM:=SUM(I=1 to N) ABS(REAL(CX(I)))+ABS(AIMAG(CX(I))).
Synopsis
Definition
Options
Cx
Authors
Further Details
See Also
real function scasum(n,cx,incx)
.. Scalar Arguments .. integer,intent(in) :: incx,n .. .. Array Arguments .. complex,intent(inout) :: cx(*) ..
SCASUM takes the sum of the (|Re(.)| + |Im(.)|)s of a complex vector and returns a single precision result.
N is INTEGER number of elements in input vector(s)
CX is COMPLEX array, dimension ( 1 + ( N - 1 )*abs( INCX ) )
INCX is INTEGER storage spacing between elements of SX
o Univ. of Tennessee o Univ. of California Berkeley o Univ. of Colorado Denver o NAG Ltd. date:November 2017
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(*)
Online html documentation available at http://www.netlib.org/lapack/explore-html/
Nemo Release 3.1 | scasum (3) | February 23, 2025 |