scnrm2 - Return the Euclidian norm of a vector.
REAL FUNCTION SCNRM2(N, X, INCX) COMPLEX X(*) INTEGER N, INCX REAL FUNCTION SCNRM2_64(N, X, INCX) COMPLEX X(*) INTEGER*8 N, INCX F95 INTERFACE REAL FUNCTION NRM2(N, X, INCX) COMPLEX, DIMENSION(:) :: X INTEGER :: N, INCX REAL FUNCTION NRM2_64(N, X, INCX) COMPLEX, DIMENSION(:) :: X INTEGER(8) :: N, INCX C INTERFACE #include <sunperf.h> float scnrm2(int n, complex *x, int incx); float scnrm2_64(long n, complex *x, long incx);
Oracle Solaris Studio Performance Library scnrm2(3P) NAME scnrm2 - Return the Euclidian norm of a vector. SYNOPSIS REAL FUNCTION SCNRM2(N, X, INCX) COMPLEX X(*) INTEGER N, INCX REAL FUNCTION SCNRM2_64(N, X, INCX) COMPLEX X(*) INTEGER*8 N, INCX F95 INTERFACE REAL FUNCTION NRM2(N, X, INCX) COMPLEX, DIMENSION(:) :: X INTEGER :: N, INCX REAL FUNCTION NRM2_64(N, X, INCX) COMPLEX, DIMENSION(:) :: X INTEGER(8) :: N, INCX C INTERFACE #include <sunperf.h> float scnrm2(int n, complex *x, int incx); float scnrm2_64(long n, complex *x, long incx); PURPOSE scnrm2 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 SCNRM2 returns 0. Unchanged on exit. 7 Nov 2015 scnrm2(3P)