sasum - Return the sum of the absolute values of a vector x.
REAL FUNCTION SASUM(N, X, INCX) INTEGER N, INCX REAL X(*) REAL FUNCTION SASUM_64(N, X, INCX) INTEGER*8 N, INCX REAL X(*) F95 INTERFACE REAL FUNCTION ASUM(N, X, INCX) INTEGER :: N, INCX REAL, DIMENSION(:) :: X REAL FUNCTION ASUM_64(N, X, INCX) INTEGER(8) :: N, INCX REAL, DIMENSION(:) :: X C INTERFACE #include <sunperf.h> float sasum(int n, float *x, int incx); float sasum_64(long n, float *x, long incx);
Oracle Solaris Studio Performance Library sasum(3P) NAME sasum - Return the sum of the absolute values of a vector x. SYNOPSIS REAL FUNCTION SASUM(N, X, INCX) INTEGER N, INCX REAL X(*) REAL FUNCTION SASUM_64(N, X, INCX) INTEGER*8 N, INCX REAL X(*) F95 INTERFACE REAL FUNCTION ASUM(N, X, INCX) INTEGER :: N, INCX REAL, DIMENSION(:) :: X REAL FUNCTION ASUM_64(N, X, INCX) INTEGER(8) :: N, INCX REAL, DIMENSION(:) :: X C INTERFACE #include <sunperf.h> float sasum(int n, float *x, int incx); float sasum_64(long n, float *x, long incx); PURPOSE sasum Return the sum of the absolute values of x where x is an n-vec- tor. 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. INCX must not be zero or negative. Unchanged on exit. 7 Nov 2015 sasum(3P)