LAPACK  3.6.0
LAPACK: Linear Algebra PACKage
subroutine icamaxsub ( integer  n,
complex, dimension(*)  x,
integer  incx,
integer  iamax 
)