ddot()

double F77NAME() ddot	(	const integer *	n,
		const double *	dx,
		const integer *	incx,
		const double *	dy,
		const integer *	incy
	)