REAL FUNCTION SASUM(N,SX,INCX)
 
a real function that returns the sum of the absolute values of a real vector.
 
N      Input, INTEGER N, number of elements in SX.
 
SX     Input, REAL SX(N), real vector whose entries are to be summed.
 
INCX   Input, INTEGER INCX, increment between elements of SX.  For contiguous
       elements, INCX = 1.
 
SASUM  Output, REAL SASUM, the sum of the absolute values of the
       entries.