LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
integer function idamax ( integer  N,
double precision, dimension(*)  DX,
integer  INCX 
)

IDAMAX

Purpose:
    IDAMAX finds the index of the first element having maximum absolute value.
Author
Univ. of Tennessee
Univ. of California Berkeley
Univ. of Colorado Denver
NAG Ltd.
Date
December 2016
Further Details:
     jack dongarra, linpack, 3/11/78.
     modified 3/93 to return if incx .le. 0.
     modified 12/3/93, array(1) declarations changed to array(*)