dznrm2sub.f File Reference

Go to the source code of this file.

Functions/Subroutines
subroutine	dznrm2sub (n, x, incx, nrm2)

Function/Subroutine Documentation

dznrm2sub()

subroutine dznrm2sub	(	integer	n,
		double complex, dimension(*)	x,
		integer	incx,
		double precision	nrm2 )

Definition at line 6 of file dznrm2sub.f.

c
      external dznrm2
      double precision dznrm2,nrm2
      integer n,incx
      double complex x(*)
c
      nrm2=dznrm2(n,x,incx)
      return