Contents


NAME

     dzasum - Return the sum of the absolute values of  a  vector
     x.

SYNOPSIS

     DOUBLE PRECISION FUNCTION DZASUM(N, X, INCX)

     DOUBLE COMPLEX X(*)
     INTEGER N, INCX

     DOUBLE PRECISION FUNCTION DZASUM_64(N, X, INCX)

     DOUBLE COMPLEX X(*)
     INTEGER*8 N, INCX

  F95 INTERFACE
     REAL(8) FUNCTION ASUM([N], X, [INCX])

     COMPLEX(8), DIMENSION(:) :: X
     INTEGER :: N, INCX

     REAL(8) FUNCTION ASUM_64([N], X, [INCX])

     COMPLEX(8), DIMENSION(:) :: X
     INTEGER(8) :: N, INCX

  C INTERFACE
     #include <sunperf.h>

     double dzasum(int n, doublecomplex *x, int incx);

     double dzasum_64(long n, doublecomplex *x, long incx);

PURPOSE

     dzasum Return the sum of the absolute values of the elements
     of  x  where x is an n-vector.  This is the sum of the abso-
     lute values of the real and complex elements and not the sum
     of the squares of the real and complex elements.

ARGUMENTS

     N (input)
               On entry, N specifies the number  of  elements  in
               the  vector.   N must be at least one for the sub-
               routine 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. INCX must not be zero or negative.
               Unchanged on exit.