Contents


NAME

     dqdota  -  compute  a  double  precision  constant  plus  an
     extended  precision constant plus the extended precision dot
     product of two double precision vectors x and y.

SYNOPSIS

     DOUBLE PRECISION FUNCTION DQDOTA(N, DB, QC, DX, INCX, DY, INCY)

     INTEGER N, INCX, INCY
     REAL * 16 QC
     DOUBLE PRECISION DB
     DOUBLE PRECISION DX(*), DY(*)

     DOUBLE PRECISION FUNCTION DQDOTA_64(N, DB, QC, DX, INCX, DY, INCY)

     INTEGER*8 N, INCX, INCY
     REAL * 16 QC
     DOUBLE PRECISION DB
     DOUBLE PRECISION DX(*), DY(*)

  F95 INTERFACE
     REAL(8) FUNCTION DQDOTA(N, DB, QC, DX, INCX, DY, INCY)

     INTEGER :: N, INCX, INCY
     REAL(16) :: QC
     REAL(8) :: DB
     REAL(8), DIMENSION(:) :: DX, DY

     REAL(8) FUNCTION DQDOTA_64(N, DB, QC, DX, INCX, DY, INCY)

     INTEGER(8) :: N, INCX, INCY
     REAL(16) :: QC
     REAL(8) :: DB
     REAL(8), DIMENSION(:) :: DX, DY

  C INTERFACE
     #include <sunperf.h>

     double dqdota(int n, double db, long double *qc, double *dx,
               int incx, double *dy, int incy);

     double dqdota_64(long n, double db, long double *qc,  double
               *dx, long incx, double *dy, long incy);

PURPOSE

     dqdota compute a double precision constant plus an  extended
     precision  constant  plus the extended precision dot product
     of two double precision vectors x and y.

ARGUMENTS

     N (input)
               On entry, N specifies the number  of  elements  in
               the  vector.   If N <= 0 then the function returns
               the value DB+QC.  Unchanged on exit.

     DB (input)
               On entry, the constant that is added  to  the  dot
               product  before the result is returned.  Unchanged
               on exit.

     QC (input/output)
               On entry, the extended precision  constant  to  be
               added  to  the dot product.  On exit, the extended
               precision result.

     DX (input)
               On entry, the incremented array  DX  must  contain
               the vector x.  Unchanged on exit.

     INCX (input)
               On entry, INCX specifies  the  increment  for  the
               elements of DX.  Unchanged on exit.

     DY (input)
               On entry, the incremented array  DY  must  contain
               the vector y.  Unchanged on exit.

     INCY (input)
               On entry, INCY specifies  the  increment  for  the
               elements of DY.  Unchanged on exit.

Note:
     dqdota does not exist in X86 libraries.