------------------------------------------------------------------------
IMSL Name:  DQDDOT (Double precision version)
 
Revised:    August 9, 1986
 
Purpose:    Compute the sum of a double-precision scalar and a
            double-precision dot product, a + x*y, using an
            extended-precision accumulator.
 
Usage:      DQDDOT(N, DB, DX, INCX, DY, INCY)
 
Arguments:
   N      - Length of vectors DX and DY.  (Input)
   DB     - Double precision scalar.  (Input)
   DX     - Double precision vector of length MAX(N*IABS(INCX),1).
            (Input)
   INCX   - Displacenent between elements of DX.  (Input)
            DX(I) is devined to be
               DX(1+(I-1)*INCX) if INCX.GE.0 or
               DX(1+(I-N)*INCX) if INCX.LT.0.
   DY     - Double precision vector of length MAX(N*IABS(INCY),1).
            (Input)
   INCY   - Displacement between elements of DY.  (Input)
            DY(I) is defined to be
               DY(1+(I-1)*INCY) if INCY.GE.0 or
               DY(1+(I-N)*INCY) if INCY.LT.0.
   DQDDOT - Sum from I=1 to N of DX(I)*DY(I) + DB.  (Output)
 
Keyword:    Level 1 BLAS; Inner product; Scalar product
 
GAMS:       D1a4
 
Chapters:   MATH/LIBRARY Basic Matrix/Vector Operations
            STAT/LIBRARY Mathematical Support
 
Page No.:   MATH/LIBRARY User's Manual page 1144
            STAT/LIBRARY User's Manual page 1506