LAPACK  3.7.0
LAPACK: Linear Algebra PACKage
subroutine dzasumsub ( integer  n,
double complex, dimension(*)  x,
integer  incx,
double precision  asum 
)