INTEGER FUNCTION IDAMAX( N, X, INCX) INTEGER N, INCX DOUBLE PRECISION X(*) INTEGER*8 FUNCTION IDAMAX_64( N, X, INCX) INTEGER*8 N, INCX DOUBLE PRECISION X(*)
INTEGER FUNCTION IAMAX( [N], X, [INCX]) INTEGER :: N, INCX REAL(8), DIMENSION(:) :: X INTEGER(8) FUNCTION IAMAX_64( [N], X, [INCX]) INTEGER(8) :: N, INCX REAL(8), DIMENSION(:) :: X
int idamax(int n, double *x, int incx);
long idamax_64(long n, double *x, long incx);
.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.