29-SEP-80 21:25:00 PAGE 1 -------------------------- program unit DAYS subroutines: IDATE -------------------------- program unit DUMPIT common block CPRTLN subroutines: DOINDX ERROR RATLST STRGET -------------------------- program unit FILFIX subroutines: ERRSET -------------------------- program unit GETLIN common block CLINE common block CPRTLN common block CLIST common block CUCLC subroutines: ERROR INDEX PRTLIN PUTLIN SCOPY STRGET STRIM -------------------------- program unit GETNAM subroutines: NGETCH PUTBAK -------------------------- program unit HEADR common block CDATIM subroutines: DATE DAYS TIME -------------------------- program unit OPENI common block CLINE common block CLIST subroutines: DOINDX ERROR GETNAM INDEX OPNIN SINSRT SJOIN -------------------------- program unit OPNIN subroutines: ERRSNS 29-SEP-80 21:25:09 PAGE 2 -------------------------- program unit OPNOUT subroutines: ERRSNS -------------------------- program unit PRTLIN common block CLINE common block CPRTLN common block CLIST common block CUCLC subroutines: DOINDX EQLS FOLD INDEX RATLST -------------------------- program unit PUTLIN common block CLIST subroutines: STRPUT -------------------------- program unit RATGO common block CDEFIO common block CFOR common block CFUNC common block CLINE common block CLIST common block CLOOK common block COUTLN common block CPRTLN -------------------------- program unit RATGO common block CSTR common block CUCLC subroutines: LABGEN -------------------------- program unit .MAIN. common block CLIST common block CICSI subroutines: CLOSE DEFLST DMPIDX DOINDX DUMPIT EXIT FILFIX HEADR ICSI ICSIE OPNIN OPNOUT PARSE QIO RATGO RATHLP SITOC SLEN SPAWNF STRPUT -------------------------- program unit RATLST common block CLIST 29-SEP-80 21:25:19 PAGE 3 common block CLINE common block CICSI common block CDATIM subroutines: PUTLIN SCOPY SINSRT SITOC SPAD -------------------------- program unit SPAWNF subroutines: ICSIE INDEX SCOPY SJOIN SLEN SPAWN -------------------------- program unit SYNERR common block COUTLN common block CLIST subroutines: ICSIE OUTDON PUTLIN RATLST -------------------------- program unit ADDDEF common block CLOOK subroutines: GETDEF INSTAL LOOKFR SCOMPR SHELL SYNERR UNFOLD -------------------------- program unit BALPAR common block CUCLC subroutines: DEFTOK LRPAR OUTCH OUTSTR PBSTR SYNERR -------------------------- program unit BRKNXT subroutines: ALLDIG GTOK OUTGO PBSTR SCTOI SYNERR -------------------------- program unit DEFLST common block CLOOK common block CPRTLN subroutines: DOINDX RATLST SCOPY SITOC SJOIN SLEN SPAD -------------------------- program unit DEFMAC subroutines: GTOK LRPAR NGETCH PBSTR PUTBAK 29-SEP-80 21:25:25 PAGE 4 SLEN SYNERR -------------------------- program unit DEFTOK common block CLINE subroutines: CLOSE DEFMAC GTFUNC GTOK LOOKFR SEQL TYPE UNFOLD -------------------------- program unit DOCODE common block CUCLC subroutines: EATUP LABGEN OUTCH OUTDON OUTNUM OUTSTR OUTTAB -------------------------- program unit DOINDX common block CLIST subroutines: ERROR SITOC SJOIN SPAD STRPUT -------------------------- program unit DMPIDX subroutines: RATLST STRGET -------------------------- program unit EATUP common block CUCLC subroutines: DEFTOK LRPAR OUTCH OUTSTR PBSTR SLEN SYNERR -------------------------- program unit ELSEIF subroutines: OUTCON OUTGO -------------------------- program unit ENDCOD common block CFUNC common block CLIST common block CPRTLN common block CLINE subroutines: DEFTOK OTHERC OUTCH OUTDON OUTSTR OUTTAB PBSTR PRTLIN SLEN SYNERR -------------------------- program unit ENDSTR 29-SEP-80 21:25:31 PAGE 5 common block CSTR common block CUCLC subroutines: OUTCH OUTDON OUTNUM OUTSTR OUTTAB SLEN -------------------------- program unit ERROR subroutines: EXIT SYNERR -------------------------- program unit FORCOD common block CFOR common block CPRTLN common block CUCLC subroutines: DEFTOK EATUP ERROR LABGEN LRPAR OUTCH OUTCON OUTDON OUTGO OUTIF OUTNUM OUTSTR OUTTAB PBSTR SCOPY SLEN SYNERR -------------------------- program unit FORS common block CFOR subroutines: OUTCON OUTDON OUTGO OUTNUM OUTSTR OUTTAB SLEN -------------------------- program unit GETDEF subroutines: GTOK INDEX LRPAR MATH NGETCH SCOPY SYNERR -------------------------- program unit GTFUNC common block CFUNC subroutines: GTOK LOOKFR PBSTR SYNERR TYPE UNFOLD -------------------------- program unit GTOK subroutines: NGETCH PUTBAK RELATE SYNERR TYPE -------------------------- program unit IFCODE subroutines: IFGO LABGEN 29-SEP-80 21:25:37 PAGE 6 -------------------------- program unit IFDEFC common block CLINE subroutines: GTOK LOOKFR PBSTR PUTBAK SEQL SYNERR TYPE UNFOLD -------------------------- program unit IFGO common block CUCLC subroutines: BALPAR OUTCH OUTGO OUTIF -------------------------- program unit INSTAL subroutines: SCOPY SLEN -------------------------- program unit LABELC common block COUTLN subroutines: OUTCH OUTSTR SLEN SYNERR -------------------------- program unit LABGEN -------------------------- program unit LRPAR -------------------------- program unit LEX subroutines: ALLDIG DEFTOK SEQL -------------------------- program unit LOOKFR common block CLOOK subroutines: SCOPY -------------------------- program unit MATH subroutines: NGETCH PBSTR SCTOI SITOC SYNERR TOKDEF -------------------------- program unit NGETCH common block CDEFIO 29-SEP-80 21:25:45 PAGE 7 subroutines: GETLIN -------------------------- program unit OTHERC subroutines: EATUP OUTDON OUTSTR OUTTAB -------------------------- program unit OUTCH common block COUTLN subroutines: OUTDON -------------------------- program unit OUTCON common block CUCLC common block COUTLN subroutines: OUTDON OUTNUM OUTSTR OUTTAB -------------------------- program unit OUTDON common block COUTLN subroutines: IABS PUTLIN -------------------------- program unit OUTGO common block CUCLC subroutines: OUTCH OUTDON OUTNUM OUTSTR OUTTAB -------------------------- program unit OUTIF common block CPRTLN common block CUCLC subroutines: OUTSTR OUTTAB -------------------------- program unit OUTNUM subroutines: OUTSTR SITOC -------------------------- program unit OUTSTR common block COUTLN common block CUCLC subroutines: OUTCH SITOC SLEN 29-SEP-80 21:25:51 PAGE 8 -------------------------- program unit OUTTAB common block COUTLN common block CLINE subroutines: OUTCH -------------------------- program unit PARSE subroutines: ADDDEF BRKNXT DOCODE ELSEIF ENDCOD ENDSTR ERROR FORCOD IFCODE IFDEFC LABELC LEX OPENI OTHERC PBSTR REPCOD RETCOD STRNGC SYNERR UNSTAK WHILEC -------------------------- program unit PBSTR subroutines: PUTBAK SLEN -------------------------- program unit PUTBAK common block CDEFIO subroutines: ERROR -------------------------- program unit RELATE common block CUCLC subroutines: FOLD NGETCH PUTBAK SCOPY -------------------------- program unit REPCOD subroutines: LABGEN OUTCON -------------------------- program unit RETCOD common block CFUNC common block CUCLC subroutines: BALPAR FOLD GTOK OTHERC OUTCH OUTDON OUTSTR OUTTAB PBSTR -------------------------- program unit STRNGC common block CSTR common block CUCLC 29-SEP-80 21:25:57 PAGE 9 subroutines: DEFTOK INSTAL OUTCH OUTDON OUTNUM OUTSTR OUTTAB PBSTR PUTBAK SYNERR -------------------------- program unit TOKDEF subroutines: GTOK LOOKFR PBSTR SYNERR TYPE UNFOLD -------------------------- program unit UNSTAK subroutines: FORS OUTCON OUTGO UNTILS -------------------------- program unit UNTILS common block CPRTLN common block CUCLC subroutines: IFGO LEX OUTCON OUTGO OUTNUM -------------------------- program unit WHILEC subroutines: IFGO LABGEN OUTCON OUTNUM -------------------------- program unit ICSI common block CICSI common block ICSIP subroutines: ICSIL ICSIN SCOPY SLEN -------------------------- program unit ICSIN common block CICSI subroutines: ICSIE ICSIS INDEX MAX0 MIN0 SCOPY SJOIN SLEN SPREV UNFOLD -------------------------- program unit ICSIL common block CICSI subroutines: CLOSE GETMCR ICSIE INDEX SCOPY SJOIN SLEN STRGET STRPUT -------------------------- program unit ICSIS common block CICSI 29-SEP-80 21:26:04 PAGE 10 subroutines: ICSIE SCTOI TYPE -------------------------- program unit ICSIE common block ICSIP common block CICSI subroutines: SJOIN STRPUT -------------------------- program unit ALLDIG subroutines: TYPE -------------------------- program unit EQLS -------------------------- program unit FOLD -------------------------- program unit INDEX -------------------------- program unit SCOMM subroutines: SMOVE -------------------------- program unit SCOMPR -------------------------- program unit SCOMPX -------------------------- program unit SCOPY -------------------------- program unit SCTOI subroutines: SFIND -------------------------- program unit SDECAT subroutines: SCOMM SLEN SSAME -------------------------- program unit SEQL 29-SEP-80 21:26:09 PAGE 11 -------------------------- program unit SHELL subroutines: SCOMPR -------------------------- program unit SFIND -------------------------- program unit SINDX -------------------------- program unit SINSRT -------------------------- program unit SITOC subroutines: IABS MOD -------------------------- program unit SJOIN subroutines: SCOPY SLEN -------------------------- program unit SLEN -------------------------- program unit SMIDV subroutines: SINDX SLEN SMOVE -------------------------- program unit SMOVE -------------------------- program unit SNUMBR subroutines: SCTOI TYPE -------------------------- program unit SPAD subroutines: SLEN -------------------------- program unit SPOSTV subroutines: SCOPY SINDX SLEN 29-SEP-80 21:26:15 PAGE 12 -------------------------- program unit SPREFX subroutines: SCOMM SSAME -------------------------- program unit SPREV subroutines: SINDX SMOVE -------------------------- program unit SREPT subroutines: SCOPY -------------------------- program unit SSAME subroutines: SLEN -------------------------- program unit SSAMEX subroutines: SLEN -------------------------- program unit SSUFX subroutines: SCOMM SLEN SSAME -------------------------- program unit SSWAP subroutines: SINDX SJOIN SLEN SMOVE -------------------------- program unit STRGET -------------------------- program unit STRPUT subroutines: MIN0 SLEN -------------------------- program unit STRIM subroutines: SLEN -------------------------- program unit TYPE 29-SEP-80 21:26:20 PAGE 13 -------------------------- program unit UNFOLD