INTEGER FUNCTION ICAMAX(N,CX,INCX)
 
an integer function that returns the index of the first occurrence of the
element in a complex vector with the largest absolute value.  Here
absolute value is defined as ABS(X)=ABS(REAL(X)) + ABS(AIMAG(X)).
 
N      Input, INTEGER N, number of elements to process in vector CX.
 
CX     Input, COMPLEX CX(N), vector to be searched.
 
INCX   Input, INTEGER INCX, increment between elements of CX.  For contiguous
       elements, INCX = 1.
 
ICAMAX Output, INTEGER ICAMAX, the index of the entry in CX of
       largest absolute value.