dzasumsub.f File Reference

Go to the source code of this file.

Functions/Subroutines
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 6 of file dzasumsub.f.

c
      external dzasum
      double precision dzasum,asum
      integer n,incx
      double complex x(*)
c
      asum=dzasum(n,x,incx)
      return