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

930 HP MLIB User’s Guide
DSLEMA Specify coefficient matrix type of sparse linear equations
CHARACTER*2 type
INTEGER*8 ier
REAL*8 global(150)
CALL DSLEMA(type, global, ier)
CHARACTER*2 type
INTEGER*8 ier
REAL*8 global(150)
CALL QSLEMA(type, global, ier)
CHARACTER*2 type
INTEGER*8 ier
REAL*8 global(150)
CALL CSLEMA(type, global, ier)
CHARACTER*2 type
INTEGER*8 ier
REAL*8 global(150)
CALL ZSLEMA(type, global, ier)
Input type Type of matrix:
type = ’SS’ or ’ss’ Symmetric matrix.
type = ’SU’ or ’su’ Unsymmetric matrix with
symmetric structure.
Output global Global communications array for this problem. This
array must be passed, untouched by the user, to
successive subroutines in this package.
ier Status response:
ier = 0 Normal return.
ier = −100 Incorrect processing path; xSLEIN
not called or matrix structure input
already initialized.
ier = −120 Unknown matrix type.