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.
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(*)
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
#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);
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.