F77_ddot()

double F77_ddot	(	const CBLAS_INT *	N,
		const double *	X,
		const CBLAS_INT *	incX,
		const double *	Y,
		const CBLAS_INT *	incY
	)