dznrm2 - Return the Euclidian norm of a vector.
DOUBLE PRECISION FUNCTION DZNRM2(N, X, INCX) DOUBLE COMPLEX X(*) INTEGER N, INCX DOUBLE PRECISION FUNCTION DZNRM2_64(N, X, INCX) DOUBLE COMPLEX X(*) INTEGER*8 N, INCX F95 INTERFACE REAL(8) FUNCTION NRM2(N, X, INCX) COMPLEX(8), DIMENSION(:) :: X INTEGER :: N, INCX REAL(8) FUNCTION NRM2_64(N, X, INCX) COMPLEX(8), DIMENSION(:) :: X INTEGER(8) :: N, INCX C INTERFACE #include <sunperf.h> double dznrm2(int n, doublecomplex *x, int incx); double dznrm2_64(long n, doublecomplex *x, long incx);
Oracle Solaris Studio Performance Library dznrm2(3P) NAME dznrm2 - Return the Euclidian norm of a vector. SYNOPSIS DOUBLE PRECISION FUNCTION DZNRM2(N, X, INCX) DOUBLE COMPLEX X(*) INTEGER N, INCX DOUBLE PRECISION FUNCTION DZNRM2_64(N, X, INCX) DOUBLE COMPLEX X(*) INTEGER*8 N, INCX F95 INTERFACE REAL(8) FUNCTION NRM2(N, X, INCX) COMPLEX(8), DIMENSION(:) :: X INTEGER :: N, INCX REAL(8) FUNCTION NRM2_64(N, X, INCX) COMPLEX(8), DIMENSION(:) :: X INTEGER(8) :: N, INCX C INTERFACE #include <sunperf.h> double dznrm2(int n, doublecomplex *x, int incx); double dznrm2_64(long n, doublecomplex *x, long incx); PURPOSE dznrm2 Return the Euclidian norm of a vector x where x is an n-vector. ARGUMENTS N (input) On entry, N specifies the number of elements in the vector. N must be at least one for the subroutine to have any visible effect. Unchanged on exit. X (input) ( 1 + ( n - 1 )*abs( INCX ) ). On entry, the incremented array X must contain the vector x. Unchanged on exit. INCX (input) On entry, INCX specifies the increment for the elements of X. If INCX < 1 then DZNRM2 returns 0. Unchanged on exit. 7 Nov 2015 dznrm2(3P)