//IRAAGPBP JOB TIME=(1,00) << 20-70 SEC PER TIMESTEP /*SCHEDULE PRIORITY=1.1 *** RUN VERSTEC FOR HARD-COPY GRAPHICS *** /*JOBPARM LINES=99 << IN K; YOU NEED 2K PER B/W, 3K PER COLOR PLOT //PLOT EXEC PGM=GO,REGION=4000K RUN PRECOMPILED LOAD MODULE //STEPLIB DD DISP=SHR,DSN=EFF9GPB.VERSMOD SITE OF LOAD MODULE //FT05F001 DD DISP=SHR,DSN=EFF9GPB.IN9003 PARAMETER INPUT FILE //FT06F001 DD SYSOUT=*, LINE PRINTER OUTPUT // DCB=(RECFM=FBA,LRECL=133,BLKSIZE=4123) //FT07F001 DD UNIT=SYSDA,DSN=&&BORING, DISCARD BORING OUTPUT // DISP=(NEW,DELETE),DCB=PRINT, REGARDING PLOTTER // SPACE=(TRK,(1,2)) SETUP PARAMETERS //FT08F001 DD DISP=SHR,DSN=EFF9GPB.T9003A70 OUPUT FROM FINITE-ELEMENTS //FT11F001 DD DISP=SHR,DSN=EFF9GPB.BASEMAP STATE OUTLINES //FT12F001 DD DUMMY DSN=EFF9GPB.T8928END FINAL NODE LOCATIONS //C2502D DD DISP=(SHR,PASS),DSN=APP6.VTEC21.C2502D, ??? // LABEL=(,,,IN) (SUPPLIED BY CONSULTANTS) //C2502P DD DISP=(SHR,PASS),DSN=APP6.VTEC21.C2502P, ??? // LABEL=(,,,IN) (SUPPLIED BY CONSULTANTS) //PLOTPARM DD * (IT'S OPTIONAL TO PLACE COMMANDS HERE) &PLOT &END /* //VRFDATA DD DISP=(MOD,PASS),DSN=&&CVRFDTA, TEMPORARY WORKSPACE // UNIT=SYSDA,SPACE=(CYL,(10,2)), TO RASTERIZE PLOTS // DCB=(RECFM=F,LRECL=4096,BLKSIZE=4096) //VRFOUT DD SYSOUT=V,COPIES=1,DEST=CENTRAL, DESTINATION OF THE // DCB=(LRECL=150,BLKSIZE=150,RECFM=FB) HARD COPY //