------------------------------------------------------------------------
IMSL Name:  ISAMIN (Single precision version)
 
Revised:    August 9, 1986
 
Purpose:    Find the smallest index of the component of a
            single-precision vector having minimum absolute value.
 
Usage:      ISAMIN(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) isdefined to be SX(1+(I-1)*INCX). INCX must be
            greater than zero.
   ISAMIN - The smallest index I such that ABS(X(I)) is the minimum
            of ABS(X(J)) for J=1 to N.  (Output)
            X(I) refers to a specific element of SX. see INCX
            argument description.
 
Keyword:    Level 1 BLAS
 
GAMS:       D1a2
 
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