LAPACK  3.6.0
LAPACK: Linear Algebra PACKage
subroutine slasum ( character*3  TYPE,
integer  IOUNIT,
integer  IE,
integer  NRUN 
)

SLASUM