.TH "BLAS/SRC/dznrm2.f90" 3 "Version 3.12.0" "LAPACK" \" -*- nroff -*- .ad l .nh .SH NAME BLAS/SRC/dznrm2.f90 .SH SYNOPSIS .br .PP .SS "Functions/Subroutines" .in +1c .ti -1c .RI "real(wp) function \fBdznrm2\fP (n, x, incx)" .br .RI "\fBDZNRM2\fP " .in -1c .SH "Function/Subroutine Documentation" .PP .SS "real(wp) function dznrm2 (integer n, complex(wp), dimension(*) x, integer incx)" .PP \fBDZNRM2\fP .PP \fBPurpose:\fP .RS 4 .PP .nf DZNRM2 returns the euclidean norm of a vector via the function name, so that DZNRM2 := sqrt( x**H*x ) .fi .PP .RE .PP \fBParameters\fP .RS 4 \fIN\fP .PP .nf N is INTEGER number of elements in input vector(s) .fi .PP .br \fIX\fP .PP .nf X is COMPLEX*16 array, dimension (N) complex vector with N elements .fi .PP .br \fIINCX\fP .PP .nf INCX is INTEGER, storage spacing between elements of X If INCX > 0, X(1+(i-1)*INCX) = x(i) for 1 <= i <= n If INCX < 0, X(1-(n-i)*INCX) = x(i) for 1 <= i <= n If INCX = 0, x isn't a vector so there is no need to call this subroutine\&. If you call it anyway, it will count x(1) in the vector norm N times\&. .fi .PP .RE .PP \fBAuthor\fP .RS 4 Edward Anderson, Lockheed Martin .RE .PP \fBDate\fP .RS 4 August 2016 .RE .PP \fBContributors:\fP .RS 4 Weslley Pereira, University of Colorado Denver, USA .RE .PP \fBFurther Details:\fP .RS 4 .PP .nf Anderson E\&. (2017) Algorithm 978: Safe Scaling in the Level 1 BLAS ACM Trans Math Softw 44:1--28 https://doi\&.org/10\&.1145/3061665 Blue, James L\&. (1978) A Portable Fortran Program to Find the Euclidean Norm of a Vector ACM Trans Math Softw 4:15--23 https://doi\&.org/10\&.1145/355769\&.355771 .fi .PP .RE .PP .PP Definition at line \fB89\fP of file \fBdznrm2\&.f90\fP\&. .SH "Author" .PP Generated automatically by Doxygen for LAPACK from the source code\&.