dasumsub()

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

Definition at line 6 of file dasumsub.f.

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

Here is the call graph for this function: