LAPACK  3.6.0
LAPACK: Linear Algebra PACKage
subroutine dnrm2sub ( integer  n,
double precision, dimension(*)  x,
integer  incx,
double precision  nrm2 
)