INTEGER FUNCTION IZAMAX(N,CX,INCX)
 
an integer function that returns the index of the first occurrence of the
element in a complex*16 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*16 CX(N), vector to be searched.
 
INCX   Input, INTEGER INCX, increment between elements of CX.  For contiguous
       elements, INCX = 1.
 
IZAMAX Output, INTEGER IZAMAX, the index of the entry in CX of
       largest absolute value.