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

1064 HP MLIB User’s Guide
DSEVRS Restore problem state from a savefile
Name DSEVRS
Restore problem state from a savefile
Purpose This subprogram restores the working problem from the state stored on the
user-specified I/O file by subprogram DSEVSV.
Usage VECLIB:
INTEGER*4 svfile, ier
REAL*8 global(150)
CALL DSEVRS(svfile, global, ier)
VECLIB8:
INTEGER*8 svfile, ier
REAL*8 global(150)
CALL DSEVRS(svfile, global, ier)
Input svfile Fortran logical unit number of a file containing the
saved problem state as created by DSEVSV.
Output global Global communications array restored from svfile.
ier Status response:
ier = 0 Normal return.
ier = −901 Error in storage allocation.
ier = −902 I/O error detected by Fortran.
Example Restart the eigenanalysis from the save file on Fortran logical unit 42 created
by subroutine DSEVSV.
REAL*8 GLOBAL(150)
CALL DSEVRS (42,GLOBAL,IER)
IF ( IER .NE. 0 ) THEN
handle error condition
ENDIF