.TH "BLAS/SRC/scasum.f" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME BLAS/SRC/scasum.f .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "real function \fBscasum\fP (n, cx, incx)" .br .RI "\fBSCASUM\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "real function scasum (integer n, complex, dimension(*) cx, integer incx)" .PP \fBSCASUM\fP .PP \fBPurpose:\fP .RS 4 .PP .nf !> !> SCASUM takes the sum of the (|Re(\&.)| + |Im(\&.)|)'s of a complex vector and !> returns a single precision result\&. !> .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf !> N is INTEGER !> number of elements in input vector(s) !> .fi .PP .br \fICX\fP .PP .nf !> CX is COMPLEX array, dimension ( 1 + ( N - 1 )*abs( INCX ) ) !> .fi .PP .br \fIINCX\fP .PP .nf !> INCX is INTEGER !> storage spacing between elements of SX !> .fi .PP .RE .PP \fBAuthor\fP .RS 4 Univ\&. of Tennessee .PP Univ\&. of California Berkeley .PP Univ\&. of Colorado Denver .PP NAG Ltd\&. .RE .PP \fBFurther Details:\fP .RS 4 .PP .nf !> !> 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(*) !> .fi .PP .RE .PP .PP Definition at line \fB71\fP of file \fBscasum\&.f\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.