$(0) CF40* +0 COUNTS ITEMS PLACED IN F40 CF50* +0 COUNTS ITEMS PLACED IN F50 TA* +0 . A DUMMY LOCATION 03660 TB* +0 . A DUMMY LOCATION TB MUST FOLLOW TA IN MEMORY 036700 CTF51* -1,0 . CONTAINS CURRENT NUMBER OF ITEMS IN TF51 02560 CXF51* +0 . CONTAINS CURRENT NUMBER OF ITEMS IN XF51 02590 INSNO* +0 . CONTAINS THE NO. OF ITEMS IN INSERT TO SEND TO F50 02830 LOOPNU* 1,0 . CONTAINS THE CURRENT NUMBER OF ENTRIES IN INDVAR 03010 LXA* +LEXA-8 LENGTH OF SUBEXA . . ABFCFL* +0 IF NON ZERO IT IS SEQUENCE NUMBER TO FORCE EVALUATION AX* +0 . . HOLDS INITIAL VALUE FROM BEGIN DO 02320 ARYITM* +020000,N0ARAY BND* +0 . (FFFFFFLLLLLL) WHERE FFFFFF IS THE 1ST LOC USED 02360 BX* +0 . . HOLDS INCREMENT FROM BEGIN DO 02390 CHTFLG* +0 NONZERO WHEN EXPRESSIONS REFORMED FOR SUBSCRIPTS CHPXFL* +0 . FLAG FOR CHARACTER PACKET ADDRESS CLB* +0310200,0 . USED TO FORM LABEL INDICATOR 02440 CNTOP* +0 . USED TO COUNT OPERANDS IN THE POLISH 02460 CONTP* +0 . =2, IF CON WERE 3, =1 IF CONSTANT WERE 1 02490 CONFCF* +0 INHIBIT INTEGER DIVIDE COUNT* +0 . . LOOP COUNT ITEM OF CURRENT DO 02550 CSUBXD* +LEAA . ACCUMULATES NUMBER OF ACTIVE EXPRESSIONS CTRST* +CTRSTL CYF51* +1,0 . CONTAINS CURRENT NUMBER OF ITEMS IN YF51 02610 DEFNAM* +0 NAME OF DEFINE DELF* +0 . NON ZERO IF DEL DID DELETE AN EXPRESSION DELJZ* +0 PROPAGATE BITS FOR SUBEXPRESSION DMSBCN* +0 NON ZERO FOR CREATED 1017 OPERATOR DOSXTF* +0 DFLX* +0 . NON ZERO IF FATAL ERROR HAS BEEN FILED DUMPL* +0 . USED TO STORE LOCATION FOR PRINTING DMPX* +0 . USED AS STORAGE BY DIAGNOSTIC ROUTINES DUMPN* +0 . SAVES ERROR NUMBER FOR MINUS TEST DEFNO* +0 . CONTAINS CURRENT SEQUENCE NUMBER 02620 DUMARC* +0 CURRENT END OF DUMARG TABLE EMPZZZ* +0 ENDMSK* +0 CONTAINS 1 WHEN FNC COUNTED DOWN BY END OF POLISH ENTDPF* +0 NONZERO IF CALL BY NAME IS INHIBITED ON D EXPN* +0 . SAVES USAGE FOR DON DEFINED SUBEXPRESSIONS EXS* +0 SAVES COUNT OF TF51 WHILE IN EXX F31F* +0 NONZERO IF TRIAD AT TOP OF STACK F31C* +0 COUNTS F31PD F31CT* +0 MARKER FOR F31 FDPX* +0 FLBG* +0177777 . THIS CONTAINS THE SEQ NO RELATIVE TO F50 OF THE BEFIN DO FLCM* +0 . =0, IF NO EXPRESSIONS CONTG VARIABLES IN COMMON HAVE OCC 02710 FLEQ* +0 . =0, IF NO EXPRESSIONS CONTNG VARIABLES IN EQUIVALENCE HA 02720 FLND* +0 . ZERO IF LABEL INDICATORS SHOULD BE GENERATED 02730 FL30* +0 . CONTAINS LAST ITEM READ FROM F30 02740 FLPR* +0 . FLAG FOR ZERO LEVEL FLST* +0 CONTAINS STATEMENT TYPE TO BE INSERTED AFTER CURRENT ARITH FNC* +0 . CONTAINS THE NO. OF FUNCTIONS NESTED. FOR EACH LEVEL TH 02750 GESUFL* +0 . SET NON ZERO WHEN DEFINE IS PART OF SUBSCRIPT GETF* +0 . IS A FLAG WHICH TELLS GET WHERE TO READ FROM, F30,F31 OR 02790 GL* +0 HOLDS GENERATED LABEL UNTIL IT SHOULD BE OUTPUT GSUB* +1,0 . CONTAINS LOCATION IN F31 TO HAVE GET READ FROM 02800 GTFX* +1,0 CONTAINS LOCATION TO READ NEXT ITEM FORM FACTORING IDF* +0 . SET WHEN AN INDUCTION VARIABLE IS DEFINED ILXP* +0 FLAG WORD USED IN ILXP ILGT* +1,0 . CONTAINS NEXT LOCATION TO READ FROM SORT ILXEX* +0 . LAST EXPONENT PROCESSED BY ILP ILXOP* +0 . LAST OPERAND PROCESSED BY ILP POLQ* +0 . USED TO FLAG POLG POLISH IF IT CONTAINS VARIABLE ILXX* +0 . FLAG TO SAVE EXPRESSION NUMBER INVAR* +0 INT* +0 . CONTAINS 0 IF IN MAIN PROGRAM; NON ZERO OTHERWISE 02840 IFSPI* +0 NONZERO WHILE IN A LOGICAL IF LCABNM* +0 SYMBOL TABLE ADDRESS OF ABSOLUTE ELEMENT LBX* +0 . THIS FLAG IS NON ZERO WHEN A LABEL IS BEING PROCESSED 02920 LGLNST* +0 . NEST LEVEL OF LOGICAL IF'S LOCFLG* +0 NONZERO IF TC COMPUTE POINT OF LOC FUNCTION LOOPLB* +0 . IF NON ZERO THERE WAS A REFERENCED LABEL IN THE LOOP LSOC* +0310000,0 . THIS WORD IS USED TO GENERATE THE LAST OCC ITEM 03040 LSEQ* +0 CONTAINS LOC IN F31 OF LAST = OPERATOR LSEX* +0 HOLDS REUSABLE EXP NUMBER FROM LAST TRIAD 03060 MOOP* +0 . CONTAINS EXTRA INFORMATION TO ADD TO OPERATOR ITEM FROM 03100 MEL* +0 . THIS FLAG IS NON ZERO IF EXPRESSIONS WITH J3=1 MUST BE OUTPUT MULTO* +0 . MULTIPLIER ON IND VAR OF NEXT OUTER DO 03110 MULTC* +0 . MULTIPLIER ON IND VAR OF CURRENT DO 03120 N3TRFL* +0 STORES TRACE +0 N3TRF2* +0 TRACE +0 N3TRF3* +0 LABELS TRACE +0 N3TRF4* +0 IO TRACE NEGARG* +0 NON ZERO FOR NEGATIVE ARGUEMNTS NGCN* +0 FLAG FOR MINUS FUNCTION ARGUMENTS NLCS* + 1,1 . CURRENT NO. OF ENTRIES IN LCS TAB 00032100 NOI* +0 . CONTAINS NUMBER OF ITEMS IN NEXT STATEMENT NOPER* +0 . CONTAINS LOCATION IN F31 OF NEXT OPERATOR 03230 NSTR* + 1,0 . CONTAINS CURRENT NUMBER OF ITEMS IN SORTK 03250 N3MXRG* +6 . MAX NUMBER OF REGISTERS NSTRS* +1,0 . NUMBER OF EXPRESSIONS TO SORT NSUBM* +0 . FLAG=NON-ZERO IF ANY NON ZERO INCREMENT FOR LOOP 03260 OFPLUS* +0 CONTAINS LOCAFION OF LAST OFFSET PLUS OPNDFL* +0 COUNTS OPERANDS THAT ARE CONSTANTS OPTF* +0 . FLAG=1 IF LOOP IS OPTIM AL AND EACH OF 03290 PLAT* +0 . THE PLATEAU FROM END DO'S IS STORED HERE 03360 POLG* -1,0 . USED BY GET TO INDEX ITEMS IN POL 03380 RELCF* +0 NON ZERO WHILE INSERTING CONSTNATS FOR RELATIONAL RCPF* +0 . THIS FLAG SET TO NON ZERO WHILE FORMING RECIPROCALS SAVE* +0 . STORES TEMPORARY RESULTS 03420 SAVELG* +0 . CONTAINS LOGICAL IF PROCESSED IN N3T35 SEFL* +0 . =0 IF NO ITEMS HAVE BEEN MOVED FROM F31 NON ZERO OTHERWI 03480 SEQB* +0 . SEQ NO. OF BEGIN DO 03500 SEQE* +0 . SEQ NO. OF END DO 03510 SEQNX* +0120100,0 . CURRENT SEQN0, USED AS STAT TYPE FOR INSERTS 035210 SFGT* +0 CURRENT INDEX FOR POLISH MASKS SXDF* +0 . TELLS WHETHER STATEMENT OR EXPRESSION BEING DEFINED 03530 STNO* -1,0 . CURRENT NUMBER OF ITEMS IN STACK 03600 STTY* + 0350000,0 . THIS INITIALIZED TO END OF FILE STTYA* + 0124600,0 . SAVES STATEMENT TYPE FOR ONE STATEMENT SUBNO* +050000,0 . LAST EXPRESSION NUMBER 03640 SUBSV* +0 . NON ZERO IF LAST EXPRESS. FROM POLISH MASK SUDMFL* +0 SET NONZERO WHERE THERE IS ONLY A CONSTAN SUBNL* +077777 SUBLV* +0 . LEVEL OF SUBSCRIPT NESTING SGTF* +0 SAVES GETF . WHILE IN COMBINING PARTS SXCT* +0 CONTAINS NUMBER OF OCCURRENCES OF SUBEX BEING ELIMINATED TC* +0 . A DUMMY USED TO HOLD THE COMPUTE POINTS OF AN EXPRESSION 03700 TD* +0 . SAVES 037110 TLOC* 0,-1 . FORCES IT TO SEARCH FOR FIRST VALUE TRBX* + $ TSZCNT* +0 TX* +0 . A DUMMY LOCATION 03780 TY* +0 . A DUMMY LOCATION 03790 XF30* +0 . ITEMS PRINTED FOR F30 XF40* +0 . ITEMS PRINTED FOR F40 XF50* +0 . ITEMS PRINTED FOR F50 USE3CT* +1,0 USAFZZ* +0 NONZERO WHEN TI5 CALLED FOR = USEL* +0 1,LOCC . NEXT OCC LOC IN H1, NUMBER USED IN OCC IN H2 . N3XPCZ INFO 2 0 . $(2) . AEX* +0 . NONZERO IF A CHECK FOR EXPONENTS IS BEING MADE FOR ** 02310 BCPND1* +0 . SAVES COPND1 WHILE CONVERSION OPERATORS ARE BEING INSERT 02330 CNVFLG* +0 CTRSTL* EQU 013 CX* +0 . . HOLDS FINAL VALUE FROM BEGIN DO 02570 DAD* +0 FUNCTION LEVEL DECREMENT, 0 OR 1 DUMPI* +0 . USED IN DUMP ROUTINES DMPL* +0 . USED IN DUMP ROUTINES DTEST* +0 . USED AS A FLAG FOR PRINTING AT FATAL ERROR DLPX* +0 . USED AS TEMP STORAGE IN LOOP ROUTINE +0 EXDL* +0 . SET NON ZERO WHEN AN EXPRESSION IS BEING DELETED GEXFL* +1,0 GTMX* +1,0 CONTAINS LOCATION TO READ NEXT ITEM FROM MATRIX IFS2* +0 IF NON ZERO NO EXPRESSION CAN BE FOUND BY EXX IFDST* +0 LAST STATEMENT TYPE FOR IF DEF OINTS ILSV* +0370000,0 . USED TO FORM NEXT SAVE EXPRESSION ITEM ILRS* +0400000,0 . USED TO FORM NEXT RESTORE EXPRESSION ITEM LADEF* +0 IF NON ZERO DEF PT OF UCRRENT LOOP ITEM LTRS* +0 . CONTAINS SEARCHING PARAMETERS FOR COMBING ACROSS TRIADS SCT1* +0 . SAVES SEARCH PARAMETERS WHILE IN SCON ROUTINE SCT2* +0 . SCON ROUTINE SCT3* +0 . SHC* +0 . SAVES OPERAND TO TAKE TO HC WHEN COMBINING TRIADS SUDMVR* +0 SYM REF OF LAST SUBSCRIPTED VARIABLE SV7* +0 . SAVES B7 SV4* +0 . SAVES A4 SV9* +0 . SAVES B9 SV3* +0 . SAVES A3 SV8* +0 . SAVES INDEX 8 036420 SXLD* +0 COUNTS NUMBER OF LINKED EXPRESSIONS EOFX* +0350000,0 . USED TO FORM END OF FILE END