------------------------------------------------------------------------
IMSL Name:  ISAMAX (Single precision version)
 
Revised:    August 9, 1986
 
Purpose:    Find the smallest index of the component of a
            single-precision vector having maximum absolute value.
 
Usage:      ISAMAX(N, SX, INCX)
 
Arguments:
   N      - Length of vector X.  (Input)
   SX     - Real vector of length N*INCX.  (Input)
   INCX   - Displacement between elements of SX.  (Input)
            X(I) is defined to be SX(1+(I-1)*INCX). INCX must be
            greater than zero.
   ISAMAX - The smallest index I such that ABS(X(I)) is the maximum
            of ABS(X(J)) for J=1 to N.  (Output)
            X(I) refers to a specific element of SX. see INCX
            argument description.
 
Keywords:   Level 1 BLAS; ISAMAX
 
GAMS:       D1a2; D1a3c
 
Chapters:   MATH/LIBRARY Basic Matrix/Vector Operations
            STAT/LIBRARY Mathematical Support
 
Page No.:   MATH/LIBRARY User's Manual page 1146
            STAT/LIBRARY User's Manual page 1508