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)