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);

Description

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)