HP MLIB User's Guide Vol. 2 7th Ed.

Chapter 13 Sparse Linear Equations 917
Matrix structure input by matrix DSLEIM
Name DSLEIM
Matrix structure input by matrix
Purpose This subprogram specifies the locations of nonzeros of the sparse matrix all at
once. For a symmetric matrix (LDL’ factorization), only the locations of the
nonzeros in the lower triangle are specified. For a nonsymmetric matrix (LU
factorization), the locations of all nonzeros in the sparse matrix are specified.
NOTE Matrix structure input by matrix supports five data types. Matrix structure
input by elements, columns, and finite elements supports only REAL*8
precision.
Usage VECLIB:
INTEGER*4 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL SSLEIM(colstr, rowind, global, ier)
INTEGER*4 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL DSLEIM(colstr, rowind, global, ier)
INTEGER*4 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL QSLEIM(colstr, rowind, global, ier)
INTEGER*4 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL CSLEIM(colstr, rowind, global, ier)
INTEGER*4 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL ZSLEIM(colstr, rowind, global, ier)
VECLIB8:
INTEGER*8 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL SSLEIM(colstr, rowind, global, ier)
INTEGER*8 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL DSLEIM(colstr, rowind, global, ier)
INTEGER*8 neqns, nnzero, colstr(neqns+1), rowind(nnzero), ier
REAL*8 global(150)
CALL QSLEIM(colstr, rowind, global, ier)