LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
subroutine ddotsub ( integer  n,
double precision, dimension(*)  x,
integer  incx,
double precision, dimension(*)  y,
integer  incy,
double precision  dot 
)