1SCSUM1(1) LAPACK auxiliary routine (version 3.1) SCSUM1(1)
2
3
4
6 SCSUM1 - the sum of the absolute values of a complex vector and returns
7 a single precision result
8
10 REAL FUNCTION SCSUM1( N, CX, INCX )
11
12 INTEGER INCX, N
13
14 COMPLEX CX( * )
15
17 SCSUM1 takes the sum of the absolute values of a complex vector and
18 returns a single precision result.
19
20 Based on SCASUM from the Level 1 BLAS.
21 The change is to use the 'genuine' absolute value.
22
23 Contributed by Nick Higham for use with CLACON.
24
25
27 N (input) INTEGER
28 The number of elements in the vector CX.
29
30 CX (input) COMPLEX array, dimension (N)
31 The vector whose elements will be summed.
32
33 INCX (input) INTEGER
34 The spacing between successive values of CX. INCX > 0.
35
36
37
38 LAPACK auxiliary routine (versionNo3v.e1m)ber 2006 SCSUM1(1)