LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
subroutine idamaxsub ( integer  n,
double precision, dimension(*)  x,
integer  incx,
integer  iamax 
)