SCSUM1(3F)							    SCSUM1(3F)

NAME    [Toc]    [Back]

     SCSUM1 - take the sum of the absolute values of a complex vector and
     returns a single precision	result

SYNOPSIS    [Toc]    [Back]

     REAL FUNCTION SCSUM1( N, CX, INCX )

	 INTEGER   INCX, N

	 COMPLEX   CX( * )

PURPOSE    [Toc]    [Back]

     SCSUM1 takes the sum of the absolute values of a complex vector and
     returns a single precision	result.

     Based on SCASUM from the Level 1 BLAS.
     The change	is to use the 'genuine'	absolute value.

     Contributed by Nick Higham	for use	with CLACON.

ARGUMENTS    [Toc]    [Back]

     N	     (input) INTEGER
	     The number	of elements in the vector CX.

     CX	     (input) COMPLEX array, dimension (N)
	     The vector	whose elements will be summed.

     INCX    (input) INTEGER
	     The spacing between successive values of CX.  INCX	> 0.
SCSUM1(3F)							    SCSUM1(3F)

NAME    [Toc]    [Back]

     SCSUM1 - take the sum of the absolute values of a complex vector and
     returns a single precision	result

SYNOPSIS    [Toc]    [Back]

     REAL FUNCTION SCSUM1( N, CX, INCX )

	 INTEGER   INCX, N

	 COMPLEX   CX( * )

PURPOSE    [Toc]    [Back]

     SCSUM1 takes the sum of the absolute values of a complex vector and
     returns a single precision	result.

     Based on SCASUM from the Level 1 BLAS.
     The change	is to use the 'genuine'	absolute value.

     Contributed by Nick Higham	for use	with CLACON.

ARGUMENTS    [Toc]    [Back]

     N	     (input) INTEGER
	     The number	of elements in the vector CX.

     CX	     (input) COMPLEX array, dimension (N)
	     The vector	whose elements will be summed.

     INCX    (input) INTEGER
	     The spacing between successive values of CX.  INCX	> 0.


									PPPPaaaaggggeeee 1111