*DECK DPLPUP SUBROUTINE DPLPUP (DUSRMT, MRELAS, NVARS, PRGOPT, DATTRV, BL, BU, + IND, INFO, AMAT, IMAT, SIZEUP, ASMALL, ABIG) C***BEGIN PROLOGUE DPLPUP C***SUBSIDIARY C***PURPOSE Subsidiary to DSPLP C***LIBRARY SLATEC C***TYPE DOUBLE PRECISION (SPLPUP-S, DPLPUP-D) C***AUTHOR (UNKNOWN) C***DESCRIPTION C C THE EDITING REQUIRED TO CONVERT THIS SUBROUTINE FROM SINGLE TO C DOUBLE PRECISION INVOLVES THE FOLLOWING CHARACTER STRING CHANGES. C C USE AN EDITING COMMAND (CHANGE) /STRING-1/(TO)STRING-2/. C /REAL (12 BLANKS)/DOUBLE PRECISION/. C C REVISED 810613-1130 C REVISED YYMMDD-HHMM C C THIS SUBROUTINE COLLECTS INFORMATION ABOUT THE BOUNDS AND MATRIX C FROM THE USER. IT IS PART OF THE DSPLP( ) PACKAGE. C C***SEE ALSO DSPLP C***ROUTINES CALLED DPCHNG, DPNNZR, XERMSG C***REVISION HISTORY (YYMMDD) C 811215 DATE WRITTEN C 890531 Changed all specific intrinsics to generic. (WRB) C 890605 Corrected references to XERRWV. (WRB) C 890605 Removed unreferenced labels. (WRB) C 891009 Removed unreferenced variables. (WRB) C 891214 Prologue converted to Version 4.0 format. (BAB) C 900315 CALLs to XERROR changed to CALLs to XERMSG. (THJ) C 900328 Added TYPE section. (WRB) C 900510 Convert XERRWV calls to XERMSG calls, changed do-it-yourself C DO loops to DO loops. (RWC) C 900602 Get rid of ASSIGNed GOTOs. (RWC) C***END PROLOGUE DPLPUP