dzasumsub.f File Reference

Go to the source code of this file.


subroutine dzasumsub (n, x, incx, asum)

Function/Subroutine Documentation

◆ dzasumsub()

subroutine dzasumsub ( integer  n,
double complex, dimension(*)  x,
integer  incx,
double precision  asum 

Definition at line 7 of file dzasumsub.f.

7 c
8  external dzasum
9  double precision dzasum,asum
10  integer n,incx
11  double complex x(*)
12 c
13  asum=dzasum(n,x,incx)
14  return