------------------------------------------------------------------------
IMSL Name:  IDAMIN (Single precision version)
 
Revised:    August 9, 1986
 
Purpose:    Find the smallest index of the component of a
            double-precision vector having minimum absolute value.
 
Usage:      IDAMIN(N, DX, INCX)
 
Arguments:
   N      - Length of vector X.  (Input)
   DX     - Double precision vector of length N*INCX.  (Input)
   INCX   - Displacement between elements of DX.  (Input)
            X(I) is defined to be DX(1+(I-1)*INCX). INCX must be
            greater than zero.
   IDAMIN - The smallest index I such that DABS(X(I)) is the minimum
            of DABS(X(J)) for J=1 to N.  (Output)
            X(I) refers to a specific element of DX. 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