icamax

NAME

icamax - return the index of the element with largest absolute value.

SYNOPSIS

  INTEGER FUNCTION ICAMAX( N, X, INCX)
  COMPLEX X(*)
  INTEGER N, INCX
 
  INTEGER*8 FUNCTION ICAMAX_64( N, X, INCX)
  COMPLEX X(*)
  INTEGER*8 N, INCX

F95 INTERFACE

  INTEGER FUNCTION IAMAX( [N], X, [INCX])
  COMPLEX, DIMENSION(:) :: X
  INTEGER :: N, INCX
 
  INTEGER(8) FUNCTION IAMAX_64( [N], X, [INCX])
  COMPLEX, DIMENSION(:) :: X
  INTEGER(8) :: N, INCX

C INTERFACE

#include <sunperf.h>

int icamax(int n, complex *x, int incx);

long icamax_64(long n, complex *x, long incx);

PURPOSE

icamax return the index of the element in x with largest absolute value where x is an n-vector and absolute value is defined as the sum of the absolute value of the real part and the absolute value of the imaginary part.

ARGUMENTS

* N (input)

On entry, N specifies the number of elements in the vector. N must be at least one for the subroutine to have any visible effect. Unchanged on exit.

* X (input)

( 1 + ( m - 1 )*abs( INCX ) ). On entry, the incremented array X must contain the vector x. Unchanged on exit.

* INCX (input)

On entry, INCX specifies the increment for the elements of X. INCX must be positive. Unchanged on exit.

.SH NOTES If the vector contains a NaN then the result of this function is the index of a NaN in the vector. If the vector contains multiple NaNs then there is no guarantee which NaN index this function will return, but it will return the index of some NaN in the vector.