Contents
dqdoti - compute a constant plus the extended precision dot
product of two double precision vectors x and y.
DOUBLE PRECISION FUNCTION DQDOTI(N, DB, QC, DX, INCX, DY, INCY)
INTEGER N, INCX, INCY
REAL * 16 QC
DOUBLE PRECISION DB
DOUBLE PRECISION DX(*), DY(*)
DOUBLE PRECISION FUNCTION DQDOTI_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 DQDOTI(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 DQDOTI_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 dqdoti(int n, double db, long double *qc, double *dx,
int incx, double *dy, int incy);
double dqdoti_64(long n, double db, long double *qc, double
*dx, long incx, double *dy, long incy);
dqdoti computes a constant plus the double precision dot
product of x and y where x and y are double precision n-
vectors.
N (input)
On entry, N specifies the number of elements in
the vector. If N <= 0 then the function returns
the value DB. 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 (output)
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:
dqdoti does not exist in X86 libraries.