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

916 HP MLIB User’s Guide
DSLEIF End of matrix structure input
Name DSLEIF
End of matrix structure input
Purpose This subprogram specifies the end of structure input for the matrix. DSELIF is
used only if routines DSLEI1 and/or DSLEIE were the mechanism by which the
structure was input.
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 ier
REAL*8 global(150)
CALL DSLEIF(global, ier)
VECLIB8:
INTEGER*8 ier
REAL*8 global(150)
CALL DSLEIF(global, ier)
Updated global Global communications array for this problem. This
array must be passed, untouched by the user, to
successive subroutines in this package.
Output ier Status response:
ier = 0 Normal return.
ier = −100 Incorrect processing path; DSLEIN
not called or matrix input already
finished.
ier = −101 Error in dynamic storage allocation.
Example The nonzero structure of a pair of finite element matrices was passed to the
package using repeated calls to subroutine DSLEIE. Signal that no more
nonzeros will be added to the matrix.
INTEGER*4 IER
REAL*8 GLOBAL(150)
CALL DSLEIF (GLOBAL,IER)
IF ( IER .NE. 0 ) THEN
handle error condition
ENDIF