C-----------------------------------------------------------------------
C IMSL Name:  IDAMIN (Single precision version)
C
C Purpose:    Find the smallest index of the component of a
C             double-precision vector having minimum absolute value.
C
C Usage:      IDAMIN(N, DX, INCX)
C
C Example:    No example available for this routine.