SASUM(1)

NAME
LAPACK-3 - SASUM take the sum of the absolute values

SYNOPSIS

REAL FUNCTION
    SASUM(N,SX,INCX)

INTEGER
    INCX,N

REAL
    SX(*)

PURPOSE
   SASUM takes the sum of the absolute values.
    uses unrolled loops for increment equal to one.

FURTHER DETAILS
    jack dongarra, linpack, 3/11/78.
    modified 3/93 to return if incx .le. 0.
    modified 12/3/93, array(1) declarations changed to array(*)