#include <math.h>
#include "slu_scomplex.h"
#include "slu_Cnames.h"
Defines | |
#define | CX(I) cx[(I)-1] |
Functions | |
int | icmax1_ (int *n, complex *cx, int *incx) |
-- LAPACK auxiliary routine (version 2.0) -- Univ. of Tennessee, Univ. of California Berkeley, NAG Ltd., Courant Institute, Argonne National Lab, and Rice University October 31, 1992
#define CX | ( | I | ) | cx[(I)-1] |
int icmax1_ | ( | int * | n, | |
complex * | cx, | |||
int * | incx | |||
) |
Purpose =======
ICMAX1 finds the index of the element whose real part has maximum absolute value.
Based on ICAMAX from Level 1 BLAS. The change is to use the 'genuine' absolute value.
Contributed by Nick Higham for use with CLACON.
Arguments =========
N (input) INT The number of elements in the vector CX.
CX (input) COMPLEX array, dimension (N) The vector whose elements will be summed.
INCX (input) INT The spacing between successive values of CX. INCX >= 1.
=====================================================================