LAPACK 3.12.0
LAPACK: Linear Algebra PACKage
Loading...
Searching...
No Matches
scnrm2sub.f
Go to the documentation of this file.
1c scnrm2sub.f
2c
3c The program is a fortran wrapper for scnrm2.
4c Witten by Keita Teranishi. 2/11/1998
5c
6 subroutine scnrm2sub(n,x,incx,nrm2)
7c
8 external scnrm2
9 real scnrm2,nrm2
10 integer n,incx
11 complex x(*)
12c
13 nrm2=scnrm2(n,x,incx)
14 return
15 end
real(wp) function scnrm2(n, x, incx)
SCNRM2
Definition scnrm2.f90:90
subroutine scnrm2sub(n, x, incx, nrm2)
Definition scnrm2sub.f:7