LAPACK  3.10.1
LAPACK: Linear Algebra PACKage

◆ dznrm2sub()

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

Definition at line 6 of file dznrm2sub.f.

7 c
8  external dznrm2
9  double precision dznrm2,nrm2
10  integer n,incx
11  double complex x(*)
12 c
13  nrm2=dznrm2(n,x,incx)
14  return
real(wp) function dznrm2(n, x, incx)
Definition: dznrm2.f90:90
Here is the call graph for this function: