␣␣␣␣␣A = 1
  1. Definition
    610WORKING STORAGE AND CONSTANTS F3B06090
    00001 611 A EQU1 F3B06100
  2. References (35)
    00104 0 50000 1 02362 55 C6 CLAFFLBUF,A OBTAIN ALPHA FOR NEXT CIT IN IST FILE BUFFER F3B00340
    00153 0 50000 1 02362 96 G2 CLAFFLBUF,A ENTRY IN FIRST FILE BUFFER F3B00950
    00156 0 50000 1 02362 99 G4 CLAFFLBUF,A FIRST F3B00980
    00160 1 77777 1 00161 101TXIG3,A,−1 INSTRUCTION F3B01000
    00167−0 75400 1 00000 108PXD0,A COMPARE WORD COUNT WITH BUFFER SIZE F3B01070
    00201 0 50000 1 02362 118 G8 CLAFFLBUF,A TEST IF NEXT FIRST FILE ENTRY F3B01170
    00204 0 50000 1 02362 121 G9 CLAFFLBUF,A TEST IF NEXT FIRST FILE ALPHA F3B01200
    00212 0 50000 1 02362 127 G10 CLAFFLBUF,A ENTRY IN FIRST FILE BUFFER, SET F3B01260
    00214 1 77777 1 00215 129TXIG11,A,−1 STEP UP IR COUNTS F3B01280
    00223−0 75400 1 00000 136PXD0,A TEST IF FIRS T FILE BUFFER F3B01350
    00235 0 50000 1 02362 147 E3 CLAFFLBUF,A FIRST F3B01460
    00237 1 77777 1 00240 149TXIE2,A,−1 INSTRUCTION SET UP F0UR WORDS F3B01480
    00246−0 75400 1 00000 156PXD0,A COMPARE WORD COUNT F3B01550
    00257 0 50000 1 02362 165 F1 CLAFFLBUF,A DOES NEXT INSTRUCTION IN F3B01640
    00262 0 50000 1 02362 168 F2 CLAFFLBUF,A TEST KF PRESENT ALPHA IS F3B01670
    00270 0 50000 1 02362 174 F3 CLAFFLBUF,A PREPARE TO COMPILE THIS INSTRUCTION F3B01730
    00272 1 77777 1 00273 176TXIF4,A,−1 F3B01750
    00301−0 75400 1 00000 183PXD0,A COUNT OF POSITION OM FIRST FILE F3B01820
    00344 0 60100 1 02362 221STOFFLBUF,A SAVE NEW LOCATION F3B02200
    00400−0 60200 1 02362 250ORSFFLBUF,A INSTRUCTION F3B02490
    00401 1 77777 1 00402 251TXIL8,A,−1 RESET IR COUNTS F3B02500
    00404 1 00004 1 00405 254TXIL5,A,4 F3B02530
    00406 0 50000 1 02362 256 L7 CLAFFLBUF,A FIRST F3B02530
    00410 1 77777 1 00411 258TXIL6,A,−1 INSTRUCTION F3B02570
    00417−0 75400 1 00000 265PXD0,A COMPARE WORD COUNT F3B02640
    00430 0 50000 1 02362 274 M3 CLAFFLBUF,A DOES NEXT INSTRUCTION IN F3B02730
    00654−0 63400 1 01211 425READTF SXDE3M3,A SAVE LINKAGE IN IR 1 F3B04240
    00670−0 53400 1 01211 437LXDE3M3,A RESTORE INDEX OF FIRST FILE BUFFER F3B04360
    00673 2 00001 1 00656 440TIXM3B3,A,1 ERROR ROUTINE F3B04390
    00676−0 53400 1 01211 443LXDE3M3,A RESTORE INDEX OF FIRST FILE BUFFER F3B04420
    00703 0 53400 1 01141 449LXAL(0),A INITIALIZE IR1 TO ZERO F3B04480
    00704 0 70000 1 02362 450M3A1 CPYFFLBUF,A COPY FIRST FILE INTO BUFFER F3B04490
    00705 1 77777 1 00704 451TXIM3A1,A,−1 F3B04500
    00712−0 63400 1 01220 456SXDFFLWC,A SAVE LOCAT0N WORD OF FIRST FILE F3B04550
    00713 0 53400 1 01141 457LXAL(0),A RESET INDEX OF FIRST F1LE BUFFER F3B04560
␣␣␣␣␣B = 2
  1. Definition
    00002 612 B EQU2 F3B06110
  2. References (27)
    00106 0 50000 2 02216 57CLATFGBUF,B OBTAIN FOR NEXT CIT AND SAVE IN F3B00560
    00115 0 50000 2 02216 65 C2 CLATFGBUF,B SET UP FOR WORDS F3B00640
    00117 1 77777 2 00120 67TXIC1,B,−1 F3B00660
    00126−0 75400 2 00000 74PXD0,B COMPARE WORD COUNT F3B00730
    00137 0 50000 2 02216 83 C7 CLATFGBUF,B WORD COUNT LESS THAN BUFFER SIZE F3B00820
    00142 0 50000 2 02216 86CLATFGBUF,B NO F3B00850
    00317 0 50000 2 02216 198 H4 CLATFGBUF,B TIFGO F3B01970
    00321 1 77777 2 00322 200TXIH3,B,−1 INSTRUCTION F3B01990
    00330−0 75400 2 00000 207PXD0,B COMPARE WORD COUNT F3B02060
    00337 0 50000 2 02216 215 J1 CLATFGBUF,B TEST IF LOC. WORD OF TIFGO FILE IS F3B02140
    00342 0 60100 2 02216 219STOTFGBUF,B SAVE LOCATION WORD F3B02180
    00346 0 50000 2 02216 223 J3 CLATFGBUF,B TIFGO F3B02220
    00350 1 77777 2 00351 225TXIJ2,B,−1 INSTRUCTION F3B02240
    00357−0 75400 2 00000 232PXD0,B COMPARE WORD COUNT F3B02310
    00370 0 50000 2 02216 241 K3 CLATFGBUF,B DOES NEXT INSTRUCTION IN F3B02400
    00377−0 50000 2 02216 249 L2 CALTFGBUF,B WITH FIRST FILE F3B02480
    00402 1 77777 2 00403 252 L8 TXIL3,B,−1 F3B02510
    00657 0 53400 2 01141 428LXAL(0),B RESET IR2 TO ZERO F3B04270
    00660 0 70000 2 02216 429M3B1 CPYTFGBUF,B COPY TIFGO FILE FROM TAPE INTO BUFFER F3B04280
    00661 1 77777 2 00660 430TXIM3B1,B,−1 SET UP COUNT F3B04290
    00666−0 63400 2 01212 435SXDTFGWC,B NO F3B04340
    00667 0 53400 2 01141 436LXAL(0),B RESET INDEX OF TIFGO BUFFER F3B04350
    00700−0 63400 2 01210 446READFF SXDE2M3,B SAVE COUNT IN IR 2 FOR LINKAGE F3B04450
    00701 0 53400 2 01202 447LXAM3ECTR,B ERROR COUNT F3B04460
    00714−0 53400 2 01210 458LXDE2M3,B RESTORE INDEX OF TIFGO FILE BUFFER F3B04570
    00717 2 00001 2 00702 461TIXM3A3,B,1 F3B04600
    00722−0 53400 2 01210 464LXDE2M3,B RESTORE INDEX OF TIFGO FILE BUFFER F3B04630
␣␣␣␣␣C = 4
  1. Definition
    00004 613 C EQU4 F3B06120
  2. References (52)
    00074 0 07400 4 00654 47TSXREADTF,C INITIALIZE TIFGO FILE BUFFER F3B00460
    00075 0 07400 4 00700 48TSXREADFF,C FIRST FILE BUFFERS F3B00470
    00114 0 53400 4 01145 64 C5 LXAL(4),C COMPILE THIS TIFGO FILE INSTRUCTION F3B00630
    00116 0 60100 4 01220 66STOTFGCOM+4,C F3B00650
    00120 2 00001 4 00115 68 C1 TIXC2,C,1 F3B00670
    00121 0 07400 4 01022 69TSXCIT00,C COMPILER F3B00680
    00133 0 07400 4 00654 79 C3 TSXREADTF,C READ TIFGO FILE INTO BUFFER F3B00780
    00155 0 53400 4 01145 98 G5 LXAL(4),C COMPILE F3B00970
    00157 0 60100 4 01226 100STOFFLCOM+4,C FILE F3B00990
    00161 2 00001 4 00156 102 G3 TIXG4,C,1 F3B01010
    00162 0 07400 4 01022 103TSXCIT00,C COMPILER F3B01020
    00174 0 07400 4 00700 113 G7 TSXREADFF,C F3B01120
    00177 0 07400 4 00724 116TSXM31000,C YES, GO TO TSX COM TABLE SEARCH F3B01150
    00203 0 07400 4 00724 120TSXM31000,C NO F3B01190
    00211 0 53400 4 01145 126LXAL(4),C NO, COMPILE THIS INSTRUCTION F3B01230
    00213 0 60100 4 01226 128STOFFLCOM+4,C UP FOUR WORDS OF ENTRY F3B01270
    00215 2 00001 4 00212 130 G11 TIXG10,C,1 F3B01290
    00216 0 07400 4 01022 131TSXCIT00,C COMPILER F3B01300
    00230 0 07400 4 00700 141 G12 TSXREADFF,C READ IN TO REFILL BUFFER F3B01400
    00234 0 53400 4 01145 146 E1 LXAL(4),C COMPILE F3B01450
    00236 0 60100 4 01226 148STOFFLCOM+4,C FILE F3B01470
    00240 2 00001 4 00235 150 E2 TIXE3,C,1 F3B01490
    00241 0 07400 4 01022 151TSXCIT00,C COMPILER F3B01500
    00253 0 07400 4 00700 161 E4 TSXREADFF,C READ FIRST FILE F3B01600
    00261 0 07400 4 00724 167TSXM31000,C TSX COM TABLE SEARCH F3B01660
    00267 0 53400 4 01145 173LXAL(4),C F3B01720
    00271 0 60100 4 01226 175STOFFLCOM+4,C SET UP FOUR WORDS F3B01740
    00273 2 00001 4 00270 177 F4 TIXF3,C,1 F3B01760
    00274 0 07400 4 01022 178TSXCIT00,C COMPILER F3B01770
    00306 0 07400 4 00700 188 F5 TSXREADFF,C READ FIRST FILE F3B01870
    00312 0 07400 4 00724 193 H1 TSXM31000,C READ TIFGO FILE F3B01920
    00316 0 53400 4 01145 197 H2 LXAL(4),C COMPILE F3B01960
    00320 0 60100 4 01220 199STOTFGCOM+4,C FILE F3B01980
    00322 2 00001 4 00317 201 H3 TIXH4,C,1 F3B02000
    00323 0 07400 4 01022 202TSXCIT00,C COMPILER F3B02010
    00335 0 07400 4 00654 212 H5 TSXREADTF,C BUFFER NOW EMPTY, READ NEXT BLOCK F3B02110
    00345 0 53400 4 01145 222 J4 LXAL(4),C COMPILE F3B02210
    00347 0 60100 4 01220 224STOTFGCOM+4,C FILE F3B02230
    00351 2 00001 4 00346 226 J2 TIXJ3,C,1 RESET IR 4 F3B02250
    00352 0 07400 4 01022 227TSXCIT00,C COMPILER F3B02260
    00364 0 07400 4 00654 237 K1 TSXREADTF,C F3B02360
    00376 0 53400 4 01145 248 L1 LXAL(4),C OR TIFGO FILE F3B02470
    00403 2 00001 4 00377 253 L3 TIXL2,C,1 F3B02520
    00405 0 53400 4 01145 255 L5 LXAL(4),C COMPILE F3B02540
    00407 0 60100 4 01226 257STOFFLCOM+4,C FILE F3B02560
    00411 2 00001 4 00406 259 L6 TIXL7,C,1 F3B02580
    00412 0 07400 4 01022 260TSXCIT00,C F3B02590
    00424 0 07400 4 00700 270 M1 TSXREADFF,C F3B02690
    00671 0 02000 4 00001 438TRA1,C EXIR. BACK TO MAIN ROUTINE F3B04370
    00677 0 02000 4 00001 444TRA1,C TRANSFER TO MAIN ROUTINE F3B04430
    00715 0 02000 4 00001 459TRA1,C F3B04580
    00723 0 02000 4 00001 465TRA1,C F3B04640
␣␣␣␣C1 = 80
  1. Definition
    00120 2 00001 4 00115 68 C1 TIXC2,C,1 F3B00670
  2. Reference
    00117 1 77777 2 00120 67TXIC1,B,−1 F3B00660
␣␣␣␣C2 = 77
  1. Definition
    00115 0 50000 2 02216 65 C2 CLATFGBUF,B SET UP FOR WORDS F3B00640
  2. Reference
    00120 2 00001 4 00115 68 C1 TIXC2,C,1 F3B00670
␣␣␣␣C3 = 91
  1. Definition
    00133 0 07400 4 00654 79 C3 TSXREADTF,C READ TIFGO FILE INTO BUFFER F3B00780
  2. References (2)
    00131 0 02000 0 00133 77TRAC3 WC EQUALS BS F3B00760
    00441 0 02000 0 00133 283TRAC3 F3B02820
␣␣␣␣C4 = 65
  1. Definition
    00101 0 50000 0 07322 52 C4 CLA3794 TIFGO RECORD COUNT F3B00510
  2. Reference
    00077 0 02000 0 00101 50TRAC4 NO F3B00490
␣␣␣␣C5 = 76
  1. Definition
    63 ALPHA GREATER THAN BETA F3B00620
    00114 0 53400 4 01145 64 C5 LXAL(4),C COMPILE THIS TIFGO FILE INSTRUCTION F3B00630
  2. References (2)
    00141−0 10000 0 00114 85TNZC5 YES BACK TO COMPILE NEXT ENTRY F3B00840
    00147 0 02000 0 00114 91TRAC5 YES F3B00900
␣␣␣␣C6 = 68
  1. Definition
    00104 0 50000 1 02362 55 C6 CLAFFLBUF,A OBTAIN ALPHA FOR NEXT CIT IN IST FILE BUFFER F3B00340
  2. References (2)
    00145 0 02000 0 00104 89TRAC6 NO F3B00880
    00265 0 02000 0 00104 171TRAC6 NEXT INTERNAL FORMULA NO. F3B01700
␣␣␣␣C7 = 95
  1. Definition
    00137 0 50000 2 02216 83 C7 CLATFGBUF,B WORD COUNT LESS THAN BUFFER SIZE F3B00820
  2. References (3)
    00130 0 02000 0 00137 76TRAC7 WORD COUNT LESS THAN BUFFER SSIZE F3B00750
    00135 0 02000 0 00137 81TRAC7 NO TEST LOCATION WD OF NEXT ENTRY F3B00800
    00440 0 02000 0 00137 282TRAC7 F3B02810
␣␣␣␣E1 = 156
  1. Definition
    145 ALPHA LESS THAN BETA F3B01440
    00234 0 53400 4 01145 146 E1 LXAL(4),C COMPILE F3B01450
  2. References (3)
    00112 0 02000 0 00234 61TRAE1 ALPHA LESS THAN BETA F3B00600
    00260 0 10000 0 00234 166TZEE1 FIRST FILE HAVE ZERO LOC WORD F3B01650
    00373 0 02000 0 00234 244TRAE1 NO F3B02430
␣␣␣␣E2 = 160
  1. Definition
    00240 2 00001 4 00235 150 E2 TIXE3,C,1 F3B01490
  2. Reference
    00237 1 77777 1 00240 149TXIE2,A,−1 INSTRUCTION SET UP F0UR WORDS F3B01480
␣␣␣␣E3 = 157
  1. Definition
    00235 0 50000 1 02362 147 E3 CLAFFLBUF,A FIRST F3B01460
  2. Reference
    00240 2 00001 4 00235 150 E2 TIXE3,C,1 F3B01490
␣␣␣␣E4 = 171
  1. Definition
    00253 0 07400 4 00700 161 E4 TSXREADFF,C READ FIRST FILE F3B01600
  2. Reference
    00251 0 02000 0 00253 159TRAE4 WC EQUALS BS F3B01580
␣␣␣␣F1 = 175
  1. Definition
    00257 0 50000 1 02362 165 F1 CLAFFLBUF,A DOES NEXT INSTRUCTION IN F3B01640
  2. References (2)
    00250 0 02000 0 00257 158TRAF1 WC LESS THAN BS F3B01570
    00255 0 02000 0 00257 163TRAF1 NO F3B01620
␣␣␣␣F2 = 178
  1. Definition
    00262 0 50000 1 02362 168 F2 CLAFFLBUF,A TEST KF PRESENT ALPHA IS F3B01670
  2. References (2)
    00303 0 02000 0 00262 185TRAF2 IS EMPTY F3B01840
    00310 0 02000 0 00262 190TRAF2 BACK TO GET NEXT FIRST FILE ENTRY F3B01890
␣␣␣␣F3 = 184
  1. Definition
    00270 0 50000 1 02362 174 F3 CLAFFLBUF,A PREPARE TO COMPILE THIS INSTRUCTION F3B01730
  2. Reference
    00273 2 00001 4 00270 177 F4 TIXF3,C,1 F3B01760
␣␣␣␣F4 = 187
  1. Definition
    00273 2 00001 4 00270 177 F4 TIXF3,C,1 F3B01760
  2. Reference
    00272 1 77777 1 00273 176TXIF4,A,−1 F3B01750
␣␣␣␣F5 = 198
  1. Definition
    00306 0 07400 4 00700 188 F5 TSXREADFF,C READ FIRST FILE F3B01870
  2. Reference
    00304 0 02000 0 00306 186TRAF5 NO, GET NEXT CIT ENTRY F3B01850
␣␣␣␣G1 = 104
  1. Definition
    92END OF TIFGO FILE RDUTINE F3B00910
    00150−0 76000 0 00141 93 G1 MSE97 IS FIRST FILE USED UP. TEST SWITCH F3B00920
  2. References (3)
    00100 0 02000 0 00150 51TRAG1 YES, GO TO END 0F TIFGO ROUTINE F3B00500
    00136 0 02000 0 00150 82TRAG1 YES GO TO END OF TIFGO F1LE ROUTINE F3B00810
    00367 0 02000 0 00150 240TRAG1 YES F3B02390
␣␣␣␣G2 = 107
  1. Definition
    00153 0 50000 1 02362 96 G2 CLAFFLBUF,A ENTRY IN FIRST FILE BUFFER F3B00950
  2. References (2)
    00151 0 02000 0 00153 94TRAG2 NO F3B00930
    00207 0 02000 0 00153 124TRAG2 YES, BACK TO COMPILE NEXT INSTRUCTION F3B01230
␣␣␣␣G3 = 113
  1. Definition
    00161 2 00001 4 00156 102 G3 TIXG4,C,1 F3B01010
  2. Reference
    00160 1 77777 1 00161 101TXIG3,A,−1 INSTRUCTION F3B01000
␣␣␣␣G4 = 110
  1. Definition
    00156 0 50000 1 02362 99 G4 CLAFFLBUF,A FIRST F3B00980
  2. Reference
    00161 2 00001 4 00156 102 G3 TIXG4,C,1 F3B01010
␣␣␣␣G5 = 109
  1. Definition
    00155 0 53400 4 01145 98 G5 LXAL(4),C COMPILE F3B00970
  2. Reference
    00202 0 10000 0 00155 119TZEG5 BELONGS TOSAME BLOCK OF INSTRUCTIQNS F3B01180
␣␣␣␣G7 = 124
  1. Definition
    00174 0 07400 4 00700 113 G7 TSXREADFF,C F3B01120
  2. Reference
    00172 0 02000 0 00174 111TRAG7 WC EQUALS BS F3B01100
␣␣␣␣G8 = 129
  1. Definition
    00201 0 50000 1 02362 118 G8 CLAFFLBUF,A TEST IF NEXT FIRST FILE ENTRY F3B01170
  2. References (2)
    00171 0 02000 0 00201 110TRAG8 WORD COUNT LES THAN BUFFER SIZE F3B01090
    00176 0 02000 0 00201 115TRAG8 NO F3B01140
␣␣␣␣G9 = 132
  1. Definition
    00204 0 50000 1 02362 121 G9 CLAFFLBUF,A TEST IF NEXT FIRST FILE ALPHA F3B01200
  2. References (2)
    00225 0 02000 0 00204 138TRAG9 NO F3B01370
    00232 0 02000 0 00204 143TRAG9 F3B01420
␣␣␣␣H0 = 203
  1. Definition
    00313−0 76000 0 00142 194 H0 MSE98 END OF TIFGO FILE F3B01930
  2. References (2)
    00311 0 02000 0 00313 191TRAH0 F3B01900
    00336 0 02000 0 00313 213TRAH0 F3B02120
␣␣␣␣H1 = 202
  1. Definition
    192END OF FIRST FILE ROUTINE F3B01910
    00312 0 07400 4 00724 193 H1 TSXM31000,C READ TIFGO FILE F3B01920
  2. Reference
    00256 0 02000 0 00312 164TRAH1 YES F3B01630
␣␣␣␣H2 = 206
  1. Definition
    00316 0 53400 4 01145 197 H2 LXAL(4),C COMPILE F3B01960
  2. References (2)
    00314 0 02000 0 00316 195TRAH2 NO F3B01940
    00332 0 02000 0 00316 209TRAH2 WC LESS THAN BS F3B02080
␣␣␣␣H3 = 210
  1. Definition
    00322 2 00001 4 00317 201 H3 TIXH4,C,1 F3B02000
  2. References (2)
    00321 1 77777 2 00322 200TXIH3,B,−1 INSTRUCTION F3B01990
    00427 0 02000 0 00330 273COR1 TRAH3+6 F3B02720
␣␣␣␣H4 = 207
  1. Definition
    00317 0 50000 2 02216 198 H4 CLATFGBUF,B TIFGO F3B01970
  2. Reference
    00322 2 00001 4 00317 201 H3 TIXH4,C,1 F3B02000
␣␣␣␣H5 = 221
  1. Definition
    00335 0 07400 4 00654 212 H5 TSXREADTF,C BUFFER NOW EMPTY, READ NEXT BLOCK F3B02110
  2. Reference
    00333 0 02000 0 00335 210TRAH5 WC EQUALS BS F3B02090
␣␣␣␣J1 = 223
  1. Definition
    214 ALPHA EQUALS BETA F3B02130
    00337 0 50000 2 02216 215 J1 CLATFGBUF,B TEST IF LOC. WORD OF TIFGO FILE IS F3B02140
  2. Reference
    00113 0 02000 0 00337 62TRAJ1 ALPHA EQUALS BETA F3B00610
␣␣␣␣J2 = 233
  1. Definition
    00351 2 00001 4 00346 226 J2 TIXJ3,C,1 RESET IR 4 F3B02250
  2. Reference
    00350 1 77777 2 00351 225TXIJ2,B,−1 INSTRUCTION F3B02240
␣␣␣␣J3 = 230
  1. Definition
    00346 0 50000 2 02216 223 J3 CLATFGBUF,B TIFGO F3B02220
  2. Reference
    00351 2 00001 4 00346 226 J2 TIXJ3,C,1 RESET IR 4 F3B02250
␣␣␣␣J4 = 229
  1. Definition
    00345 0 53400 4 01145 222 J4 LXAL(4),C COMPILE F3B02210
  2. Reference
    00375 0 02000 0 00345 246TRAJ4 YES F3B02450
␣␣␣␣K1 = 244
  1. Definition
    00364 0 07400 4 00654 237 K1 TSXREADTF,C F3B02360
  2. Reference
    00362 0 02000 0 00364 235TRAK1 WC EQUALS BS F3B02340
␣␣␣␣K3 = 248
  1. Definition
    00370 0 50000 2 02216 241 K3 CLATFGBUF,B DOES NEXT INSTRUCTION IN F3B02400
  2. References (2)
    00361 0 02000 0 00370 234TRAK3 WC LESS THAN BS F3B02330
    00366 0 02000 0 00370 239TRAK3 NO F3B02380
␣␣␣␣L1 = 254
  1. Definition
    247 BETA IS PLUS F3B02460
    00376 0 53400 4 01145 248 L1 LXAL(4),C OR TIFGO FILE F3B02470
  2. Reference
    00340 0 12000 0 00376 216TPLL1 MINUS NO F3B02150
␣␣␣␣L2 = 255
  1. Definition
    00377−0 50000 2 02216 249 L2 CALTFGBUF,B WITH FIRST FILE F3B02480
  2. Reference
    00403 2 00001 4 00377 253 L3 TIXL2,C,1 F3B02520
␣␣␣␣L3 = 259
  1. Definition
    00403 2 00001 4 00377 253 L3 TIXL2,C,1 F3B02520
  2. Reference
    00402 1 77777 2 00403 252 L8 TXIL3,B,−1 F3B02510
␣␣␣␣L5 = 261
  1. Definition
    00405 0 53400 4 01145 255 L5 LXAL(4),C COMPILE F3B02540
  2. References (2)
    00404 1 00004 1 00405 254TXIL5,A,4 F3B02530
    00435 0 02000 0 00405 279TRAL5 YES F3B02780
␣␣␣␣L6 = 265
  1. Definition
    00411 2 00001 4 00406 259 L6 TIXL7,C,1 F3B02580
  2. Reference
    00410 1 77777 1 00411 258TXIL6,A,−1 INSTRUCTION F3B02570
␣␣␣␣L7 = 262
  1. Definition
    00406 0 50000 1 02362 256 L7 CLAFFLBUF,A FIRST F3B02530
  2. Reference
    00411 2 00001 4 00406 259 L6 TIXL7,C,1 F3B02580
␣␣␣␣L8 = 258
  1. Definition
    00402 1 77777 2 00403 252 L8 TXIL3,B,−1 F3B02510
  2. Reference
    00401 1 77777 1 00402 251TXIL8,A,−1 RESET IR COUNTS F3B02500
␣␣␣␣M1 = 276
  1. Definition
    00424 0 07400 4 00700 270 M1 TSXREADFF,C F3B02690
  2. Reference
    00422 0 02000 0 00424 268TRAM1 WC EQUALS BS F3B02670
␣␣␣␣M3 = 280
  1. Definition
    00430 0 50000 1 02362 274 M3 CLAFFLBUF,A DOES NEXT INSTRUCTION IN F3B02730
  2. References (2)
    00421 0 02000 0 00430 267TRAM3 WC LESS THAN BS F3B02660
    00426 0 02000 0 00430 272TRAM3 NO F3B02710
␣␣␣␣M4 = 286
  1. Definition
    00436−0 75400 2 00000 280M4 PXD0,2 TEST IF TIFGO FILE BUFFER IS EMPTY F3B02790
  2. Reference
    00433 0 02000 0 00436 277TRAM4 NO F3B02760
␣␣␣␣N1 = 298
  1. Definition
    00452 0 70000 1 02526 293 N1 CPYCIB,1 REMAINDER OF F3B02920
  2. Reference
    D00454 3 00000 1 00452 295 N2 TXHN1,1 TEST IF AT END OF BUFFER F3B02940
␣␣␣␣N2 = 300
  1. Definition
    D00454 3 00000 1 00452 295 N2 TXHN1,1 TEST IF AT END OF BUFFER F3B02940
  2. References (2)
    00450−0 63400 1 00454 291RET1 SXDN2,1 SAVE INDEX REG. NO. IN COMPARE INSTR. F3B02900
    00453 1 77777 1 00454 294TXIN2,1,−1 INSTRUCTIONS IN BUFFER F3B02930
␣␣␣BST = 310
  1. Definition
    00466 0 76400 0 00222 305BST BST146 BACK T0 FIRST WD. F3B03040
  2. References (2)
    00465 1 00004 4 00466 304TXIBST,4,4 F3B03030
    00467 2 00001 4 00466 306TIXBST,4,1 F3B03050
␣␣␣CIB = 1366
  1. Definition
    02526 670 CIB BSS100 F3B06680
  2. References (5)
    00444 0 50000 1 02523 287PAT1 CLACIB−3,1 ENTERED IN BLICK F3B02860
    00452 0 70000 1 02526 293 N1 CPYCIB,1 REMAINDER OF F3B02920
    00552 0 70000 1 02526 357WRITE1 CPYCIB,1 REMAINDER OF BUFFER ONTO TAPE 4 F3B03560
    01032 0 70000 1 02526 539CIT01 CPYCIB,1 REFILL BUFFER F3B05380
    01044 0 60100 2 02526 549STOCIB,2 AND STORE IN PROPER OUTPUT AREA F3B05480
␣␣␣DIF = 563
  1. Definition
    01063 0 60100 0 01065 564DIF STODUP F3B05630
  2. Reference
    01061 0 02000 0 01063 562TRADIF F3B05610
␣␣␣DUP = 565
  1. Definition
    A01065 0 00000 0 00000 566DUP HTR F3B05650
  2. References (3)
    00726 0 60000 0 01065 469STZDUP REINITIALIZE HTE INSTR. F3B04680
    01060 0 34000 0 01065 561CASDUP F3B05600
    01063 0 60100 0 01065 564DIF STODUP F3B05630
␣␣␣E1C = 644
  1. Definition
    01204 0 00000 0 00000 650E1C CELL FOR SAVING MQ F3B06480
  2. References (2)
    01022−0 60000 0 01204 531CIT00 STQE1C SAVE CONTENTS OF MQ F3B05300
    01053 0 56000 0 01204 556LDQE1C REDTORE MQ F3B05550
␣␣␣E2C = 645
  1. Definition
    01205 0 00000 0 00000 651E2C CELL FOR SAVING IRA F3B06490
  2. References (2)
    01023−0 63400 1 01205 532SXDE2C,1 SAVE CONTENTS OF IR1 F3B03310
    01054−0 53400 1 01205 557LXDE2C,1 RESTORE IR 1 F3B05560
␣␣␣E3C = 646
  1. Definition
    01206 0 00000 0 00000 652E3C CELL FOR SAVING IRB F3B06500
  2. References (2)
    01024−0 63400 2 01206 533SXDE3C,2 SAVE CONTENTS OF IR12 F3B05320
    01055−0 53400 2 01206 558LXDE3C,2 RESTORE IR2 F3B05570
␣␣␣G10 = 138
  1. Definition
    00212 0 50000 1 02362 127 G10 CLAFFLBUF,A ENTRY IN FIRST FILE BUFFER, SET F3B01260
  2. Reference
    00215 2 00001 4 00212 130 G11 TIXG10,C,1 F3B01290
␣␣␣G11 = 141
  1. Definition
    00215 2 00001 4 00212 130 G11 TIXG10,C,1 F3B01290
  2. Reference
    00214 1 77777 1 00215 129TXIG11,A,−1 STEP UP IR COUNTS F3B01280
␣␣␣G12 = 152
  1. Definition
    00230 0 07400 4 00700 141 G12 TSXREADFF,C READ IN TO REFILL BUFFER F3B01400
  2. Reference
    00226 0 02000 0 00230 139TRAG12 YES F3B01380
␣␣␣OUT = 291
  1. Definition
    285M3 TERMINAL ROUTINE F3B02840
    00443−0 53400 1 01207 286 OUT LXDBBOX,1 2S C OMPLIMENT OF NO. OF WORDS F3B02850
  2. References (4)
    00152 0 02000 0 00443 95TRAOUT YES GO TO TERMINAL ROUT INE F3B00940
    00200 0 02000 0 00443 117TRAOUT TERMINAL ROUTINE F3B01160
    00233 0 02000 0 00443 144TRAOUT TERMINAL ROUTINE F3B01430
    00315 0 02000 0 00443 196TRAOUT YES, TO TERMINAL ROUTINE F3B01950
␣␣␣P0S = 368
  1. Definition
    00560 0 76400 0 00222 363P0S BST146 BACKSPACE OVER DO FILE C F3B03620
  2. References (2)
    00557 1 00003 4 00560 362TXIP0S,4,3 F3B03610
    00561 2 00001 4 00560 364TIXP0S,4,1 F3B03630
␣␣␣RTN = 607
  1. Definition
    01137 0 76600 0 00224 608RTN WRS148 F3B06070
  2. Reference
    00446 0 10000 0 01137 289PAT3 TZERTN YES F3B02880
␣␣2BIT = 628
  1. Definition
    01164+100000000000 634 2BIT OCT100000000000 F3B06330
  2. Reference
    00140−0 32000 0 01164 84ANA2BIT IS LOCATION WORD SPECIAL F3B00830
␣␣BBOX = 647
  1. Definition
    01207 0 00000 0 00000 653BBOX 2S COMP OF NO OF WORDS ALREADY ENTERED IN BLOCK F3B06510
  2. References (6)
    00443−0 53400 1 01207 286 OUT LXDBBOX,1 2S C OMPLIMENT OF NO. OF WORDS F3B02850
    00475 0 60100 0 01207 312STOBBOX F3B03110
    00545−0 53400 1 01207 352WRITE LXDBBOX,1 TWOS COMPLIMENT OF NO. OF ENTRIES F3B03510
    01025−0 53400 2 01207 534LXDBBOX,2 2S COMPLIMENT OF NO. OF WORDS OF ENTRY F3B05330
    01052−0 63400 2 01207 555SXDBBOX,2 SAVE COUNT OF CIB BUFFER F3B05540
    01136−0 53400 1 01207 607PAT44 LXDBBOX,1 RESTORE COUNT IN IR1 F3B06060
␣␣COMP = 323
  1. Definition
    00503 0 53400 4 01145 318COMP LXAL(4),4 4 IN IR 4 F3B03170
  2. References (3)
    00501 0 02000 0 00503 316TRACOMP NO F3B03150
    00507 2 00001 4 00504 322COMP1 TIXCOMP+1,4,1 F3B03210
    00517 0 02000 0 00503 330TRACOMP LESS THAN, COMPILE ENTRIESP F3B03290
␣␣COR1 = 279
  1. Definition
    00427 0 02000 0 00330 273COR1 TRAH3+6 F3B02720
␣␣COR2 = 295
  1. Definition
    00447 0 02000 0 01066 290COR2 TRAPAT4 NO F3B02890
␣␣CQR3 = 481
  1. Definition
    00741 0 10000 0 01057 481CQR3 TZECIT07+6 TYPE 1 ENTRY NEGATIVE F3B04800
␣␣E2M3 = 648
  1. Definition
    01210 0 00000 0 00000 654E2M3 F3B06520
  2. References (5)
    00700−0 63400 2 01210 446READFF SXDE2M3,B SAVE COUNT IN IR 2 FOR LINKAGE F3B04450
    00714−0 53400 2 01210 458LXDE2M3,B RESTORE INDEX OF TIFGO FILE BUFFER F3B04570
    00722−0 53400 2 01210 464LXDE2M3,B RESTORE INDEX OF TIFGO FILE BUFFER F3B04630
    00725−0 63400 4 01210 468SXDE2M3,4 SAVE LINKAGE FROMT TSX INSTR. F3B04670
    01020−0 53400 4 01210 528LXDE2M3,4 RESTORE IR COUNTS FROM LINKAGE F3805270
␣␣E3M3 = 649
  1. Definition
    01211 0 00000 0 00000 655E3M3 F3B06530
  2. References (5)
    00654−0 63400 1 01211 425READTF SXDE3M3,A SAVE LINKAGE IN IR 1 F3B04240
    00670−0 53400 1 01211 437LXDE3M3,A RESTORE INDEX OF FIRST FILE BUFFER F3B04360
    00676−0 53400 1 01211 443LXDE3M3,A RESTORE INDEX OF FIRST FILE BUFFER F3B04420
    00724−0 63400 1 01211 467M31000 SXDE3M3,1 SAVE LINKAGE OF FIRST FILE BUFFER F3B04660
    01017−0 53400 1 01211 527M31080 LXDE3M3,1 END OF TSXCOM TABLE SEARCH F3B05260
␣␣L(0) = 609
  1. Definition
    01141+000000000000 614 L(0) DEC0 F3B06130
  2. References (18)
    00057 0 53400 1 01141 33LXAL(0),1 F3B00320
    00060−0 50000 0 01141 34CALL(0) ZEROS IN ACC. F3B00330
    00451 0 53400 1 01141 292LXAL(0),1 INITIALIZE IR 1 T0 1 F3B02910
    00473 0 70000 0 01141 310CPYL(0) F3B03090
    00474 0 50000 0 01141 311CLAL(0) RESTORE BBOX TO ZERO F3B03100
    00551 0 53400 1 01141 356LXAL(0),1 F3B03550
    00622 0 53400 1 01141 397LXAL(0),1 SET IR 1 TO ZERO F3B03960
    00633 0 53400 2 01141 406LXAL(0),2 RESET IR 2 TO ZERO F3B04050
    00657 0 53400 2 01141 428LXAL(0),B RESET IR2 TO ZERO F3B04270
    00667 0 53400 2 01141 436LXAL(0),B RESET INDEX OF TIFGO BUFFER F3B04350
    00703 0 53400 1 01141 449LXAL(0),A INITIALIZE IR1 TO ZERO F3B04480
    00713 0 53400 1 01141 457LXAL(0),A RESET INDEX OF FIRST F1LE BUFFER F3B04560
    00750 0 00000 0 01141 488HTRL(0) ZERO F3B04870
    00760 0 00000 0 01141 496HTRL(0) ZERO F3B04950
    00771 0 00000 0 01141 505HTRL(0) ZERO F3B05040
    01003 0 00000 0 01141 515HTRL(0) ZERO F3B05140
    01012 0 00000 0 01141 522HTRL(0) ZERO000000000 F3B05210
    01141 615 M1CON SYNL(0) F3B06140
␣␣L(1) = 610
  1. Definition
    01142+000000000001 616 L(1) DEC1 F3B06150
  2. Reference
    00047 0 40000 0 01142 25ADDL(1) ADD ONE TO WORD COUNT F3B00240
␣␣L(2) = 611
  1. Definition
    01143+000000000002 617L(2) DEC2 F3B06160
  2. Reference
    00617 0 46000 0 01143 394LDAL(2) READ DRUM 2 FOR FIXCON TABLE F3B03930
␣␣L(3) = 612
  1. Definition
    01144+000000000003 618 L(3) DEC3 F3B06170
␣␣L(4) = 613
  1. Definition
    01145+000000000004 619 L(4) DEC4 F3B06180
  2. References (13)
    00114 0 53400 4 01145 64 C5 LXAL(4),C COMPILE THIS TIFGO FILE INSTRUCTION F3B00630
    00155 0 53400 4 01145 98 G5 LXAL(4),C COMPILE F3B00970
    00211 0 53400 4 01145 126LXAL(4),C NO, COMPILE THIS INSTRUCTION F3B01230
    00234 0 53400 4 01145 146 E1 LXAL(4),C COMPILE F3B01450
    00267 0 53400 4 01145 173LXAL(4),C F3B01720
    00316 0 53400 4 01145 197 H2 LXAL(4),C COMPILE F3B01960
    00345 0 53400 4 01145 222 J4 LXAL(4),C COMPILE F3B02210
    00376 0 53400 4 01145 248 L1 LXAL(4),C OR TIFGO FILE F3B02470
    00405 0 53400 4 01145 255 L5 LXAL(4),C COMPILE F3B02540
    00503 0 53400 4 01145 318COMP LXAL(4),4 4 IN IR 4 F3B03170
    00526 0 53400 4 01145 337FCOMP LXAL(4),4 SET UP COUNT AND F0UR WORSD OF ENTRY F3B03360
    00646 0 53400 4 01145 417LXAL(4),4 F3B04160
    00774 0 00000 0 01145 508HTRL(4) +000000000004 F3B05070
␣␣L(8) = 614
  1. Definition
    01146+000000000010 620 L(8) DEC8 F3B06190
␣␣M3A1 = 452
  1. Definition
    00704 0 70000 1 02362 450M3A1 CPYFFLBUF,A COPY FIRST FILE INTO BUFFER F3B04490
  2. Reference
    00705 1 77777 1 00704 451TXIM3A1,A,−1 F3B04500
␣␣M3A2 = 462
  1. Definition
    00716 0 76400 0 00223 460M3A2 BST147 BACKSPACE TAPE 3 TO TRY AGAIN F3B04590
  2. Reference
    00711 0 02000 0 00716 455TRAM3A2 ERROR ROUTINE F3B04540
␣␣M3A3 = 450
  1. Definition
    00702 0 76200 0 00223 448M3A3 RDS147 READ FIRST FILE FROM TAPE 3 F3B04470
  2. Reference
    00717 2 00001 2 00702 461TIXM3A3,B,1 F3B04600
␣␣M3A4 = 465
  1. Definition
    00721 0 76000 0 00141 463M3A4 PSE97 INDICATE END DF FIRST FILE F3B04620
  2. Reference
    00706 0 02000 0 00721 452TRAM3A4 EOF F3B04510
␣␣M3B1 = 432
  1. Definition
    00660 0 70000 2 02216 429M3B1 CPYTFGBUF,B COPY TIFGO FILE FROM TAPE INTO BUFFER F3B04280
  2. Reference
    00661 1 77777 2 00660 430TXIM3B1,B,−1 SET UP COUNT F3B04290
␣␣M3B2 = 442
  1. Definition
    00672 0 76400 0 00222 439M3B2 BST146 F3B04380
  2. Reference
    00665 0 02000 0 00672 434TRAM3B2 YES F3B04330
␣␣M3B3 = 430
  1. Definition
    00656 0 76200 0 00222 427M3B3 RDS146 TAPE 2 TO READ TIFGO FILE F3B04260
  2. Reference
    00673 2 00001 1 00656 440TIXM3B3,A,1 ERROR ROUTINE F3B04390
␣␣M3B4 = 445
  1. Definition
    00675 0 76000 0 00142 442M3B4 PSE98 INDICATE END OF TIFGO FILE F3B04410
  2. Reference
    00662 0 02000 0 00675 431TRAM3B4 EOF F3B04300
␣␣MASK = 626
  1. Definition
    01162+077777000000 632 MASK OCT77777000000 F3B06310
  2. References (7)
    00107−0 32000 0 01162 58ANAMASK TIFGO BUFFER F3B00570
    00143−0 32000 0 01162 87ANAMASK DOES NEXT INSTRUCTION IN TIFGO FILE F3B00860
    00205−0 32000 0 01162 122ANAMASK IS GREATER THAN PREVIOUS ONE F3B01210
    00263−0 32000 0 01162 169ANAMASK GREATER THAN ALPHA OF F3B01680
    00371−0 32000 0 01162 242ANAMASK TIFGO FILE BELONG TO CURRENT F3B02410
    00431−0 32000 0 01162 275ANAMASK FIRST FILE BELONG TO CURRENT F3B02740
    00734−0 32000 0 01162 475ANAMASK SAVE DECREMENT, INTERNAL FMLA. NO. F3B04740
␣␣ONED = 638
  1. Definition
    01176+000001000000 644ONED DEC1B17 F3B06430
  2. Reference
    01116 0 00000 0 01176 591PAT28 HTRONED 000000000001 F3B03900
␣␣PAT1 = 292
  1. Definition
    00444 0 50000 1 02523 287PAT1 CLACIB−3,1 ENTERED IN BLICK F3B02860
␣␣PAT2 = 293
  1. Definition
    00445 0 40200 0 01172 288PAT2 SUBL(TRA) TEST IF TRA INSTRUCTION F3B02870
␣␣PAT3 = 294
  1. Definition
    00446 0 10000 0 01137 289PAT3 TZERTN YES F3B02880
␣␣PAT4 = 566
  1. Definition
    01066 0 07400 4 01022 567PAT4 TSXCIT00,4 COMPILER FOR LOAD BUTTON SEQUENCE F3B05660
  2. Reference
    00447 0 02000 0 01066 290COR2 TRAPAT4 NO F3B02890
␣␣PAT5 = 567
  1. Definition
    01067 0 00000 0 01175 568PAT5 HTRZERO F3B05670
␣␣PAT6 = 568
  1. Definition
    01070 0 00000 0 01166 569PAT6 HTRL(RCD) RCD F3B05680
␣␣PAT7 = 569
  1. Definition
    01071 0 00000 0 01175 570PAT7 HTRZERO F3B05690
␣␣PAT8 = 570
  1. Definition
    01072 0 00000 0 01175 571PAT8 HTRZERO F3B05700
␣␣PAT9 = 571
  1. Definition
    01073 0 07400 4 01022 572PAT9 TSXCIT00,4 COMPILE INSTRUCTION F3B05710
␣␣READ = 319
  1. Definition
    00477 0 07400 4 00654 314READ TSXREADTF,4 TREAD TIFGO FILE F3B03130
  2. Reference
    00520 0 02000 0 00477 331TRAREAD EQUAL TO. READ NEXT ENTRY F3B03300
␣␣RET1 = 296
  1. Definition
    00450−0 63400 1 00454 291RET1 SXDN2,1 SAVE INDEX REG. NO. IN COMPARE INSTR. F3B02900
  2. Reference
    01140 0 02000 0 00450 609PAT46 TRARET1 BACK TO COMPLETE TERMINAL ROUTINE F3B06080
␣␣ZERO = 637
  1. Definition
    01175 0 00000 0 00000 643ZERO PZE F3B06420
  2. References (17)
    01067 0 00000 0 01175 568PAT5 HTRZERO F3B05670
    01071 0 00000 0 01175 570PAT7 HTRZERO F3B05690
    01072 0 00000 0 01175 571PAT8 HTRZERO F3B05700
    01074 0 00000 0 01175 573PAT10 HTRZERO F3B05720
    01076 0 00000 0 01175 575PAT12 HTRZERO F3B05740
    01077 0 00000 0 01175 576PAT13 HTRZERO F3B05750
    01101 0 00000 0 01175 578PAT15 HTRZERO F3B05770
    01106 0 00000 0 01175 583PAT20 HTRZERO F3B05820
    01110 0 00000 0 01175 585PAT22 HTRZERO F3B05840
    01113 0 00000 0 01175 588PAT25 HTRZERO F3B05870
    01115 0 00000 0 01175 590PAT27 HTRZERO F3B05890
    01120 0 00000 0 01175 593PAT30 HTRZERO F3B05920
    01122 0 00000 0 01175 595PAT32 HTRZERO F3B05940
    01123 0 00000 0 01175 596PAT33 HTRZERO F3B05950
    01127 0 00000 0 01175 600PAT37 HTRZERO F3B05990
    01132 0 00000 0 01175 603PAT40 HTRZERO F3B06020
    01135 0 00000 0 01175 606PAT43 HTRZERO F3B06050
␣AMASK = 627
  1. Definition
    01163+000000077777 633 AMASK OCT77777 F3B06320
  2. References (3)
    00743−0 32000 0 01163 483ANAAMASK SAVE ADDRESS AND STORE IN F3B04820
    00765−0 32000 0 01163 501ANAAMASK SAVE ADDRESS F3805000
    00776−0 32000 0 01163 510ANAAMASK SAVE ADDRESS F3B05000
␣CIT00 = 530
  1. Definition
    530COMPILING ROUTINE,CIT00 F3B05290
    01022−0 60000 0 01204 531CIT00 STQE1C SAVE CONTENTS OF MQ F3B05300
  2. References (23)
    00121 0 07400 4 01022 69TSXCIT00,C COMPILER F3B00680
    00162 0 07400 4 01022 103TSXCIT00,C COMPILER F3B01020
    00216 0 07400 4 01022 131TSXCIT00,C COMPILER F3B01300
    00241 0 07400 4 01022 151TSXCIT00,C COMPILER F3B01500
    00274 0 07400 4 01022 178TSXCIT00,C COMPILER F3B01770
    00323 0 07400 4 01022 202TSXCIT00,C COMPILER F3B02010
    00352 0 07400 4 01022 227TSXCIT00,C COMPILER F3B02260
    00412 0 07400 4 01022 260TSXCIT00,C F3B02590
    00510 0 07400 4 01022 323TSXCIT00,4 COMPILER F3B03220
    00533 0 07400 4 01022 342TSXCIT00,4 COMPILER F3B03410
    00747 0 07400 4 01022 487TSXCIT00,4 COMPILE INSTRUCTION-4 F3B04860
    00757 0 07400 4 01022 495M31035 TSXCIT00,4 TYPE I ENTRY F3B04940
    00770 0 07400 4 01022 504TSXCIT00,4 FOR NEXT INSTRUCTION F3B05030
    01002 0 07400 4 01022 514TSXCIT00,4 F3B05130
    01011 0 07400 4 01022 521M31063 TSXCIT00,4 COMPILE INSTRUCTION F3B05200
    01066 0 07400 4 01022 567PAT4 TSXCIT00,4 COMPILER FOR LOAD BUTTON SEQUENCE F3B05660
    01073 0 07400 4 01022 572PAT9 TSXCIT00,4 COMPILE INSTRUCTION F3B05710
    01100 0 07400 4 01022 577PAT14 TSXCIT00,4 F3B05760
    01105 0 07400 4 01022 582PAT19 TSXCIT00,4 F3B05810
    01112 0 07400 4 01022 587PAT24 TSXCIT00,4 F3B05860
    01117 0 07400 4 01022 592PAT29 TSXCIT00,4 F3B05910
    01124 0 07400 4 01022 597PAT34 TSXCIT00,4 F3B05960
    01131 0 07400 4 01022 602PAT39 TSXCIT00,4 F3B06010
␣CIT01 = 538
  1. Definition
    01032 0 70000 1 02526 539CIT01 CPYCIB,1 REFILL BUFFER F3B05380
  2. Reference
    01035 3 00001 2 01032 542CIT03 TXHCIT01,2,1 F3B05410
␣CIT02 = 540
  1. Definition
    01034 1 00001 2 01035 541CIT02 TXICIT03,2,1 F3B05400
  2. Reference
    01033 1 77777 1 01034 540TXICIT02,1,−1 RESET COUNTS FOR FIRST ENTRY IN BUFFER F3B05390
␣CIT03 = 541
  1. Definition
    01035 3 00001 2 01032 542CIT03 TXHCIT01,2,1 F3B05410
  2. Reference
    01034 1 00001 2 01035 541CIT02 TXICIT03,2,1 F3B05400
␣CIT04 = 542
  1. Definition
    01036 0 53400 1 01145 543CIT04 LXAM1CON+4,1 COUNT OF 4 IN IR1 F3B05420
  2. References (2)
    01026 3 77634 2 01036 535TXHCIT04,2,−100 TEST IF LESS THAN 100 AND GREATER F3B05340
    01027−3 00000 2 01036 536TXLCIT04,2,0 THAN ZERO . IF SO. COMPILE INSTRUCTION F3B033S0
␣CIT05 = 545
  1. Definition
    01041 0 50000 4 00000 546CIT05 CLA0,4 LINKAGE FROM MAIN ROUTINE PLUS 1 F3B05430
  2. References (4)
    01040 0 62100 0 01041 545STACIT05 F3B05440
    01045 0 50000 0 01041 550CLACIT05 F3B05490
    01047 0 62100 0 01041 552STACIT05 TO GET NEXT WORD F3B05310
    01051 2 00001 1 01041 554CIT07 TIXCIT05,1,1 F3B05530
␣CIT06 = 547
  1. Definition
    A01043 0 50000 0 00000 548CIT06 CLA FIRST PARAMETER. 2ND.) 3RD.) AND4TH. F3B03470
  2. Reference
    01042 0 62100 0 01043 547STACIT06 F3B05460
␣CIT07 = 553
  1. Definition
    01051 2 00001 1 01041 554CIT07 TIXCIT05,1,1 F3B05530
  2. References (2)
    00741 0 10000 0 01057 481CQR3 TZECIT07+6 TYPE 1 ENTRY NEGATIVE F3B04800
    01050 1 77777 2 01051 553TXICIT07,2,−1 DECREASE COUNT IN IR1 AND 2 BY ONE F3B05520
␣COMP1 = 327
  1. Definition
    00507 2 00001 4 00504 322COMP1 TIXCOMP+1,4,1 F3B03210
  2. Reference
    00506 1 77777 2 00507 321TXICOMP1,2,−1 F3B03200
␣FCOMP = 342
  1. Definition
    00526 0 53400 4 01145 337FCOMP LXAL(4),4 SET UP COUNT AND F0UR WORSD OF ENTRY F3B03360
  2. References (3)
    00524 0 02000 0 00526 335TRAFCOMP NO F3B03340
    00532 2 00001 4 00527 341FCOMP1 TIXFCOMP+1,4,1 F3B03400
    00542 0 02000 0 00526 349TRAFCOMP F3B03480
␣FFLWC = 656
  1. Definition
    660SENSE LITE 97 ON FOR END OF FIRST FILE F3B06580
    01220 0 00000 0 00000 661FFLWC FIRST FILE WORD COUNT F3B06590
  2. References (7)
    00170 0 34000 0 01220 109CASFFLWC TO TEST IF FIRST FILE IS NOW EMPPTY F3B01080
    00224 0 34000 0 01220 137CASFFLWC IS EMPTY F3B01360
    00247 0 34000 0 01220 157CASFFLWC WITH BUFFER SIZE F3B01560
    00302 0 34000 0 01220 184CASFFLWC TEST IF FIRST FILE BUFFER F3B01830
    00420 0 34000 0 01220 266CASFFLWC WITH BUFFER SIZE F3B02650
    00541 0 34000 0 01220 348CASFFLWC AND COMPARE TO FIRST FILE WORD COUNT F3B03470
    00712−0 63400 1 01220 456SXDFFLWC,A SAVE LOCAT0N WORD OF FIRST FILE F3B04550
␣FREAD = 338
  1. Definition
    00522 0 07400 4 00700 333FREAD TSXREADFF,4 READ FIRST FILE F3B03320
  2. References (2)
    00502 0 02000 0 00522 317TRAFREAD YES F3B03160
    00543 0 02000 0 00522 350TRAFREAD F3B03490
␣L(1D) = 617
  1. Definition
    01151+000001000000 623L(1D) DEC1B17 F3B06220
  2. Reference
    00102 0 40000 0 01151 53ADDL(1D) ADD ONE TO DECREMENT F3B00520
␣L(2D) = 639
  1. Definition
    01177+000002000000 645L(2D) DEC2B17 F3B06440
  2. Reference
    01104 0 00000 0 01177 581PAT18 HTRL(2D) 000002000000 F3B05800
␣L(6H) = 618
  1. Definition
    01152+060000000000 624L(6H) OCT60000000000 F3B06230
  2. References (2)
    00762 0 00000 0 01152 498HTRL(6H) +060000000000 F3B04970
    01014 0 00000 0 01152 524HTRL(6H) +060000000000 F3B05230
␣L(7M) = 640
  1. Definition
    01200+000000000007 646L(7M) DEC7 F3B06450
  2. Reference
    01111 0 00000 0 01200 586PAT23 HTRL(7M) 7 PLUS LOC. NO. OF RCD INSTR. F3B05850
␣M1CON = 609
  1. Definition
    01141 615 M1CON SYNL(0) F3B06140
  2. References (4)
    01031 0 53400 1 01141 538LXAM1CON,1 SET COUNT IN IR 1 T0 ZERO F3B05370
    01036 0 53400 1 01145 543CIT04 LXAM1CON+4,1 COUNT OF 4 IN IR1 F3B05420
    01037 0 50000 0 01142 544CLAM1CON+1 F3B05430
    01046 0 40000 0 01142 551ADDM1CON+1 F3B05500
␣PAT10 = 572
  1. Definition
    01074 0 00000 0 01175 573PAT10 HTRZERO F3B05720
␣PAT11 = 573
  1. Definition
    01075 0 00000 0 01167 574PAT11 HTRL(CPY) CPY F3B05730
␣PAT12 = 574
  1. Definition
    01076 0 00000 0 01175 575PAT12 HTRZERO F3B05740
␣PAT13 = 575
  1. Definition
    01077 0 00000 0 01175 576PAT13 HTRZERO F3B05750
␣PAT14 = 576
  1. Definition
    01100 0 07400 4 01022 577PAT14 TSXCIT00,4 F3B05760
␣PAT15 = 577
  1. Definition
    01101 0 00000 0 01175 578PAT15 HTRZERO F3B05770
␣PAT16 = 578
  1. Definition
    01102 0 00000 0 01170 579PAT16 HTRL(XIT) XIT F3B05780
␣PAT17 = 579
  1. Definition
    01103 0 00000 0 01173 580PAT17 HTRL(15H) +170000000000 F3B05790
␣PAT18 = 580
  1. Definition
    01104 0 00000 0 01177 581PAT18 HTRL(2D) 000002000000 F3B05800
␣PAT19 = 581
  1. Definition
    01105 0 07400 4 01022 582PAT19 TSXCIT00,4 F3B05810
␣PAT20 = 582
  1. Definition
    01106 0 00000 0 01175 583PAT20 HTRZERO F3B05820
␣PAT21 = 583
  1. Definition
    01107 0 00000 0 01171 584PAT21 HTRL(HPR) HPR F3B05830
␣PAT22 = 584
  1. Definition
    01110 0 00000 0 01175 585PAT22 HTRZERO F3B05840
␣PAT23 = 585
  1. Definition
    01111 0 00000 0 01200 586PAT23 HTRL(7M) 7 PLUS LOC. NO. OF RCD INSTR. F3B05850
␣PAT24 = 586
  1. Definition
    01112 0 07400 4 01022 587PAT24 TSXCIT00,4 F3B05860
␣PAT25 = 587
  1. Definition
    01113 0 00000 0 01175 588PAT25 HTRZERO F3B05870
␣PAT26 = 588
  1. Definition
    01114 0 00000 0 01167 589PAT26 HTRL(CPY) CPY F3B05880
␣PAT27 = 589
  1. Definition
    01115 0 00000 0 01175 590PAT27 HTRZERO F3B05890
␣PAT28 = 590
  1. Definition
    01116 0 00000 0 01176 591PAT28 HTRONED 000000000001 F3B03900
␣PAT29 = 591
  1. Definition
    01117 0 07400 4 01022 592PAT29 TSXCIT00,4 F3B05910
␣PAT30 = 592
  1. Definition
    01120 0 00000 0 01175 593PAT30 HTRZERO F3B05920
␣PAT31 = 593
  1. Definition
    01121 0 00000 0 01170 594PAT31 HTRL(XIT) XIT F3B05930
␣PAT32 = 594
  1. Definition
    01122 0 00000 0 01175 595PAT32 HTRZERO F3B05940
␣PAT33 = 595
  1. Definition
    01123 0 00000 0 01175 596PAT33 HTRZERO F3B05950
␣PAT34 = 596
  1. Definition
    01124 0 07400 4 01022 597PAT34 TSXCIT00,4 F3B05960
␣PAT35 = 597
  1. Definition
    01125 0 00000 0 01174 598PAT35 HTRL(LOC) +003777000370 F3B05970
␣PAT36 = 598
  1. Definition
    01126 0 00000 0 01171 599PAT36 HTRL(HPR) HPR F3B05980
␣PAT37 = 599
  1. Definition
    01127 0 00000 0 01175 600PAT37 HTRZERO F3B05990
␣PAT38 = 600
  1. Definition
    01130 0 00000 0 01201 601PAT38 HTRL(1.7) 000001000007 F3B06000
␣PAT39 = 601
  1. Definition
    01131 0 07400 4 01022 602PAT39 TSXCIT00,4 F3B06010
␣PAT40 = 602
  1. Definition
    01132 0 00000 0 01175 603PAT40 HTRZERO F3B06020
␣PAT41 = 603
  1. Definition
    01133 0 00000 0 01172 604PAT41 HTRL(TRA) TRA TO FINAL HALT F3B06030
␣PAT42 = 604
  1. Definition
    01134 0 00000 0 01174 605PAT42 HTRL(LOC) F3B06040
␣PAT43 = 605
  1. Definition
    01135 0 00000 0 01175 606PAT43 HTRZERO F3B06050
␣PAT44 = 606
  1. Definition
    01136−0 53400 1 01207 607PAT44 LXDBBOX,1 RESTORE COUNT IN IR1 F3B06060
␣PAT46 = 608
  1. Definition
    01140 0 02000 0 00450 609PAT46 TRARET1 BACK TO COMPLETE TERMINAL ROUTINE F3B06080
␣PMASK = 629
  1. Definition
    01165−300000000000 635 PMASK OCT700000000000 F3806340
  2. Reference
    00740−0 32000 0 01165 480ANAPMASK SAVE SIGN OF SECOND WD. OF ENTRY F3B04700
␣TFGWC = 650
  1. Definition
    656SENSE LITE 98 ON FOR END OF TIFGO FILE F3B06540
    01212 0 00000 0 00000 657TFGWC TIFGO WORD COUNT F3B06530
  2. References (6)
    00127 0 34000 0 01212 75CASTFGWC WITH BUFFER SIZE F3B00740
    00331 0 34000 0 01212 208CASTFGWC WITH BUFFER SIZE F3B02070
    00360 0 34000 0 01212 233CASTFGWC WITH BUFFER S1ZE F3B02320
    00437 0 34000 0 01212 281CASTFGWC F3B02800
    00516 0 34000 0 01212 329CASTFGWC COMPARE TO CURRENT FMLA. NO. F3B03280
    00666−0 63400 2 01212 435SXDTFGWC,B NO F3B04340
␣WRITE = 357
  1. Definition
    00545−0 53400 1 01207 352WRITE LXDBBOX,1 TWOS COMPLIMENT OF NO. OF ENTRIES F3B03510
  2. Reference
    00525 0 02000 0 00545 336TRAWRITE YES F3B03350
FCOMP1 = 346
  1. Definition
    00532 2 00001 4 00527 341FCOMP1 TIXFCOMP+1,4,1 F3B03400
  2. Reference
    00531 1 77777 1 00532 340TXIFCOMP1,1,−1 F3B03390
FFLBUF = 1266
  1. Definition
    02362 669FFLBUF BSS100 FIRST FILE BUFFER F3B06670
  2. References (17)
    00104 0 50000 1 02362 55 C6 CLAFFLBUF,A OBTAIN ALPHA FOR NEXT CIT IN IST FILE BUFFER F3B00340
    00153 0 50000 1 02362 96 G2 CLAFFLBUF,A ENTRY IN FIRST FILE BUFFER F3B00950
    00156 0 50000 1 02362 99 G4 CLAFFLBUF,A FIRST F3B00980
    00201 0 50000 1 02362 118 G8 CLAFFLBUF,A TEST IF NEXT FIRST FILE ENTRY F3B01170
    00204 0 50000 1 02362 121 G9 CLAFFLBUF,A TEST IF NEXT FIRST FILE ALPHA F3B01200
    00212 0 50000 1 02362 127 G10 CLAFFLBUF,A ENTRY IN FIRST FILE BUFFER, SET F3B01260
    00235 0 50000 1 02362 147 E3 CLAFFLBUF,A FIRST F3B01460
    00257 0 50000 1 02362 165 F1 CLAFFLBUF,A DOES NEXT INSTRUCTION IN F3B01640
    00262 0 50000 1 02362 168 F2 CLAFFLBUF,A TEST KF PRESENT ALPHA IS F3B01670
    00270 0 50000 1 02362 174 F3 CLAFFLBUF,A PREPARE TO COMPILE THIS INSTRUCTION F3B01730
    00344 0 60100 1 02362 221STOFFLBUF,A SAVE NEW LOCATION F3B02200
    00400−0 60200 1 02362 250ORSFFLBUF,A INSTRUCTION F3B02490
    00406 0 50000 1 02362 256 L7 CLAFFLBUF,A FIRST F3B02530
    00430 0 50000 1 02362 274 M3 CLAFFLBUF,A DOES NEXT INSTRUCTION IN F3B02730
    00527 0 50000 1 02362 338CLAFFLBUF,1 F3B03370
    00704 0 70000 1 02362 450M3A1 CPYFFLBUF,A COPY FIRST FILE INTO BUFFER F3B04490
    02703 0 34000 0 02362 680CASFFLBUF F3B06690
FFLCFN = 657
  1. Definition
    01221 0 00000 0 00000 662FFLCFN CURRENT FORMULA NUM FOR FIRST FILE INSTR F3B06600
  2. References (8)
    00105 0 62200 0 01221 56STDFFLCFN F3B00550
    00111 0 34000 0 01221 60CASFFLCFN COMPARE FIRST FILE T0 TIFGO FILE F3B00590
    00154 0 62200 0 01221 97STDFFLCFN STORE INTERNAL FORMULA NO. FOR ENTRY F3B00960
    00206 0 34000 0 01221 123CASFFLCFN INTERNAL FORMULA NUMBER F3B01220
    00264 0 34000 0 01221 170CASFFLCFN PREVIOUS CIT F3B01690
    00432 0 34000 0 01221 276CASFFLCFN COMPILED BLOCK F3B02750
    00735 0 40200 0 01221 476SUBFFLCFN FIRST FILE LOCATION NO. F3B04750
    02707 0 62200 0 01221 684STDFFLCFN F3B06694
FFLCOM = 658
  1. Definition
    01222 663FFLCOM BSS4 FIRST FILE COMPILER F3B06610
  2. References (40)
    00157 0 60100 4 01226 100STOFFLCOM+4,C FILE F3B00990
    00163 0 00000 0 01222 104HTRFFLCOM F3B01030
    00164 0 00000 0 01223 105HTRFFLCOM+1 F3B01040
    00165 0 00000 0 01224 106HTRFFLCOM+2 F3B01050
    00166 0 00000 0 01225 107HTRFFLCOM+3 F3B01060
    00213 0 60100 4 01226 128STOFFLCOM+4,C UP FOUR WORDS OF ENTRY F3B01270
    00217 0 00000 0 01222 132HTRFFLCOM F3B01310
    00220 0 00000 0 01223 133HTRFFLCOM+1 F3B01320
    00221 0 00000 0 01224 134HTRFFLCOM+2 F3B01330
    00222 0 00000 0 01225 135HTRFFLCOM+3 F3B01340
    00236 0 60100 4 01226 148STOFFLCOM+4,C FILE F3B01470
    00242 0 00000 0 01222 152HTRFFLCOM F3B01510
    00243 0 00000 0 01223 153HTRFFLCOM+1 F3B01520
    00244 0 00000 0 01224 154HTRFFLCOM+2 F3B01530
    00245 0 00000 0 01225 155HTRFFLCOM+3 F3B01540
    00271 0 60100 4 01226 175STOFFLCOM+4,C SET UP FOUR WORDS F3B01740
    00275 0 00000 0 01222 179HTRFFLCOM F3B01780
    00276 0 00000 0 01223 180HTRFFLCOM+1 F3B01790
    00277 0 00000 0 01224 181HTRFFLCOM+2 F3B01800
    00300 0 00000 0 01225 182HTRFFLCOM+3 F3B01810
    00407 0 60100 4 01226 257STOFFLCOM+4,C FILE F3B02560
    00413 0 00000 0 01222 261HTRFFLCOM F3B02600
    00414 0 00000 0 01223 262HTRFFLCOM+1 F3B02610
    00415 0 00000 0 01224 263HTRFFLCOM+2 F3B02620
    00416 0 00000 0 01225 264HTRFFLCOM+3 F3B02630
    00530 0 60100 4 01226 339STOFFLCOM+4,4 F3B03380
    00534 0 00000 0 01222 343HTRFFLCOM F3B03420
    00535 0 00000 0 01223 344HTRFFLCOM+1 F3B03430
    00536 0 00000 0 01224 345HTRFFLCOM+2 F3B03440
    00537 0 00000 0 01225 346HTRFFLCOM+3 F3B03450
    00744 0 60100 0 01225 484STOFFLCOM+3 4TH WORD OF FIRST FILE COMPILER F3B04830
    00746 0 60100 0 01224 486STOFFLCOM+2 3RD. WORD OF COMPILER F3B04850
    00752 0 00000 0 01224 490HTRFFLCOM+2 F3B04890
    00753 0 00000 0 01225 491HTRFFLCOM+3 F3B04900
    00767 0 60100 0 01224 503STOFFLCOM+2 IN 3RD. WORD OF COMPILER F3B05020
    00773 0 00000 0 01224 507HTRFFLCOM+2 12(8) PLUS ADDRESS F3805060
    00777 0 60100 0 01225 511STOFFLCOM+3 STORE IN 4TH. WORD OF COMPILED INSTR. F3805100
    01001 0 60100 0 01224 513STOFFLCOM+2 WORD OF INSTRUCTION IN COMPILER F3805120
    01005 0 00000 0 01224 517HTRFFLCOM+2 12(8) PLUS ADDDRESS F3B05160
    01006 0 00000 0 01225 518HTRFFLCOM+3 ADDRESS F3B05170
FIXCON = 664
  1. Definition
    01230 667FIXCON SYNTSXCOM F3B06650
  2. References (11)
    00601 0 70000 0 01226 380CPYFIXCON−2 DRUM CHECK SUM CHCHECKING F3B03790
    00602 0 70000 0 01227 381CPYFIXCON−1 F3B03800
    00603 0 50000 0 01226 382CLAFIXCON−2 WORD COUNT F3B03810
    00604 0 40200 0 01227 383SUBFIXCON−1 CHECK SUM F3B03820
    00611 0 50000 0 01226 388CLAFIXCON−2 WORD COUNT F3B03870
    00623 0 50000 1 01230 398M32055 CLAFIXCON,1 FIRST ENTRY F3B03970
    00624 0 40200 1 01231 399SUBFIXCON+1,1 CHECK SUM F3B03980
    00635 0 50000 0 01226 408CLAFIXCON−2 F3B04070
    00637 0 60100 0 01226 410STOFIXCON−2 CHECK SUMS FOR WRITING OUT ON TAPE 2 F3B04090
    00640 0 70000 0 01226 411CPYFIXCON−2 F3B04100
    00642 0 70000 2 01230 413M32070 CPYFIXCON,2 F3B04120
L(1.7) = 641
  1. Definition
    01201+000001000007 647L(1.7) OCT1000007 F3B06460
  2. Reference
    01130 0 00000 0 01201 601PAT38 HTRL(1.7) 000001000007 F3B06000
L(10H) = 619
  1. Definition
    01153+120000000000 625L(10H) OCT120000000000 F3B06240
  2. Reference
    00766−0 50100 0 01153 502ORAL(10H) ADD 120000000000 F3B05010
L(12H) = 620
  1. Definition
    01154+140000000000 626L(12H) OCT140000000000 F3B06250
  2. Reference
    01000−0 50100 0 01154 512ORAL(12H) ADD 12(8) AND DTORE IN 3RD. F3B05110
L(15H) = 635
  1. Definition
    01173+170000000000 641L(15H) OCT170000000000 F3B06400
  2. Reference
    01103 0 00000 0 01173 580PAT17 HTRL(15H) +170000000000 F3B05790
L(370) = 643
  1. Definition
    01203+000000000370 649L(370) OCT370 F3B06475
  2. Reference
    00343 0 40000 0 01203 220ADDL(370) 370(8) TO LOC. WORD OF FIRST FILE F3B02190
L(5.4) = 621
  1. Definition
    01155+000004000004 627L(5.4) OCT4000004 F3B06260
  2. References (2)
    00763 0 00000 0 01155 499HTRL(5.4) 000004000004 F3B04980
    01015 0 00000 0 01155 525HTRL(5.4) 000004000004 F3B05240
L(704) = 615
  1. Definition
    01147+000000001300 621L(704) DEC704 F3B06200
  2. Reference
    00032 0 46000 0 01147 12LDAL(704) DRUM ADDRESS F3B00110
L(706) = 616
  1. Definition
    01150+000000001302 622L(706) DEC706 F3B06210
  2. Reference
    00053 0 46000 0 01150 29LDAL(706) DRUM ADDRESS F3B00280
L(CPY) = 631
  1. Definition
    01167 234770000000 637L(CPY) BCD1CPY000 F3B06360
  2. References (2)
    01075 0 00000 0 01167 574PAT11 HTRL(CPY) CPY F3B05730
    01114 0 00000 0 01167 589PAT26 HTRL(CPY) CPY F3B05880
L(HPR) = 633
  1. Definition
    01171 304751000000 639L(HPR) BCD1HPR000 F3B06380
  2. References (2)
    01107 0 00000 0 01171 584PAT21 HTRL(HPR) HPR F3B05830
    01126 0 00000 0 01171 599PAT36 HTRL(HPR) HPR F3B05980
L(LOC) = 636
  1. Definition
    01174+003777000370 642L(LOC) OCT3777000370 F3B06410
  2. References (2)
    01125 0 00000 0 01174 598PAT35 HTRL(LOC) +003777000370 F3B05970
    01134 0 00000 0 01174 605PAT42 HTRL(LOC) F3B06040
L(LXD) = 622
  1. Definition
    01156 436724000000 628L(LXD) BCD1LXD000 F3B06270
  2. References (2)
    00751 0 00000 0 01156 489HTRL(LXD) LXD INSTRUCTION F3B04880
    01013 0 00000 0 01156 523HTRL(LXD) LXD F3B05220
L(LXP) = 625
  1. Definition
    01161 436747000000 631L(LXP) BCD1LXP000 F3B06300
  2. Reference
    01004 0 00000 0 01161 516HTRL(LXP) LXP F3B05150
L(RCD) = 630
  1. Definition
    01166 512324000000 636L(RCD) BCD1RCD000 F3B06330
  2. Reference
    01070 0 00000 0 01166 569PAT6 HTRL(RCD) RCD F3B05680
L(SXD) = 623
  1. Definition
    01157 626724000000 629L(SXD) BCD1SXD000 F3B06280
  2. Reference
    00761 0 00000 0 01157 497HTRL(SXD) SXD F3B04960
L(TRA) = 634
  1. Definition
    01172 635121000000 640L(TRA) BCD1TRA000 F3B06300
  2. References (2)
    00445 0 40200 0 01172 288PAT2 SUBL(TRA) TEST IF TRA INSTRUCTION F3B02870
    01133 0 00000 0 01172 604PAT41 HTRL(TRA) TRA TO FINAL HALT F3B06030
L(TSX) = 624
  1. Definition
    01160 636267000000 630L(TSX) BCD1TSX000 F3B06290
  2. Reference
    00772 0 00000 0 01160 506HTRL(TSX) TSX F3B05050
L(XIT) = 632
  1. Definition
    01170 673163000000 638L(XIT) BCD1XIT000 F3806370
  2. References (2)
    01102 0 00000 0 01170 579PAT16 HTRL(XIT) XIT F3B05780
    01121 0 00000 0 01170 594PAT31 HTRL(XIT) XIT F3B05930
M30000 = 24
  1. Definition
    9READ TSXCOM INTO HIGH SPEED STORAGE F3B00080
    00030 0 53400 4 01202 10M30000 LXAM3ECTR,4 ERORR COUNT IN IR 4 F3B00090
  2. Reference
    D00040 2 00000 4 00031 18TIXM30000+1,4 NOT EQUAL, TRY 4 MORE TIMES F3B00170
M30010 = 34
  1. Definition
    00042 0 53400 4 01202 20M30010 LXAM3ECTR,4 ERROR COUNT IN IR4 F3B00190
  2. References (2)
    00037 0 10000 0 00042 17TZEM30010 EQUAL F3B00160
    00071 2 00001 4 00043 43TIXM30010+1,4,1 NOT EQUAL) BACK TO TRY 4 MORE T IMES F3B00420
M30020 = 45
  1. Definition
    00055 0 70000 1 00000 31M30020 CPY0,1 TSXCOM TABLE INTO STOORAGE F3B00300
  2. References (3)
    00051 0 62100 0 00055 27STAM30020 F3B00260
    00054 1 00001 1 00055 30TXIM30020,1,1 INCCREMENT 8B 1 F3B00290
    00056 2 00001 1 00055 32TIXM30020,1,1 COPY LOOP F3B00310
M30025 = 49
  1. Definition
    00061 0 36100 1 01230 35M30025 ACLTSXCOM,1 COMPUTE NEW CHECK SUMS AND COMPARE F3B00340
  2. References (3)
    00050 0 40000 0 00061 26ADDM30025 INIT1AL ADDRESS F3B00250
    00062 1 77777 1 00063 36TXIM30025+2,1,−1 TO GIVEN CHECK SUM F3B00350
    00063 2 00001 2 00061 37TIXM30025,2,1 F3B00360
M30050 = 59
  1. Definition
    00073 0 02000 0 02673 45M30050 TRATSXPT1 F3B00440
  2. References (6)
    00045 0 10000 0 00073 23TZEM30050 NO TSX INSTRUCTION F3B00220
    00070 0 10000 0 00073 42TZEM30050 END. CHECK SUMS AGREE F3B00410
    02701 0 02000 0 00076 678TRAM30050+3 F3B06688
    02704 0 02000 0 00076 681TRAM30050+3 F3B06691
    02705 0 02000 0 00076 682TRAM30050+3 F3B06692
    02711 0 02000 0 00076 686TRAM30050+3 F3B06696
M31000 = 468
  1. Definition
    466TSXCOM TABLE SEARCH F3B04650
    00724−0 63400 1 01211 467M31000 SXDE3M3,1 SAVE LINKAGE OF FIRST FILE BUFFER F3B04660
  2. References (5)
    00177 0 07400 4 00724 116TSXM31000,C YES, GO TO TSX COM TABLE SEARCH F3B01150
    00203 0 07400 4 00724 120TSXM31000,C NO F3B01190
    00261 0 07400 4 00724 167TSXM31000,C TSX COM TABLE SEARCH F3B01660
    00312 0 07400 4 00724 193 H1 TSXM31000,C READ TIFGO FILE F3B01920
    02710 0 07400 4 00724 685TSXM31000,4 F3B06695
M31005 = 471
  1. Definition
    00727 0 50000 0 01226 470M31005 CLATSXCOM−2 TEST WORD COUNT OF CHECK SUM F3B04690
  2. References (2)
    00756 0 02000 0 00727 494TRAM31005 BACK TO SEARCH REMAING ENTRIES F3B04930
    01016 0 02000 0 00727 526TRAM31005 CONT1 UE TABLE SEARCH F3B05230
M31015 = 479
  1. Definition
    478CUR FIRST FILE FMLA NO APPEARS IN TSXCOM F3B04770
    00737−0 50000 1 01231 479M31015 CALTSXCOM+1,1 F3B04780
M31030 = 493
  1. Definition
    00755−0 63400 1 01226 493M31030 SXDTSXCOM−2,1 SAVE NEW WORD COUNT F3B04920
  2. References (2)
    00754 1 77776 1 00755 492TXIM31030,1,−2 STEP UP COUNT FOR NEXT TSXCOM ENTRY F3B04910
    01062 1 77776 1 00755 563TXIM31030,1,−2 F3B05620
M31035 = 495
  1. Definition
    00757 0 07400 4 01022 495M31035 TSXCIT00,4 TYPE I ENTRY F3B04940
  2. Reference
    01064 0 02000 0 00757 565TRAM31035 F3B05640
M31050 = 509
  1. Definition
    00775 0 50000 1 01231 509M31050 CLATSXCOM+1,1 SECOND WORD F3B05080
M31063 = 521
  1. Definition
    01011 0 07400 4 01022 521M31063 TSXCIT00,4 COMPILE INSTRUCTION F3B05200
  2. Reference
    01007 1 77776 1 01010 519TXIM31063−1,1,−2 RESET IR1 FOR NEXT ENTRY F3B05180
M31080 = 527
  1. Definition
    01017−0 53400 1 01211 527M31080 LXDE3M3,1 END OF TSXCOM TABLE SEARCH F3B05260
  2. References (2)
    00731 0 10000 0 01017 472TZEM31080 CHECK SUM EQUALS WORD COUNT F3B04710
    00736−0 10000 0 01017 477TNZM31080 NOT EQUAL. NO TSXCOM ENTRY F3B04760
M32000 = 302
  1. Definition
    00456−0 53400 4 07322 297M32000 LXD3794,4 WRITE DO FILE C + FORTRAN FUNCTION FILE AS 2ND FILE F3B02960
M32005 = 304
  1. Definition
    00460 0 76400 0 00222 299M32005 BST146 F3B02980
  2. References (2)
    00457 1 00003 4 00460 298TXIM32005,4,3 POSITION TAPE 2 T0 READ DO FILE C F3B02970
    00461 2 00001 4 00460 300TIXM32005,4,1 F3B02990
M32010 = 370
  1. Definition
    00562 0 76200 0 00222 365M32010 RDS146 WRITE ASC0 0VER DO FILE C ON TAPE 2 F3B03640
M32020 = 380
  1. Definition
    00574 0 70000 1 07325 375M32020 CPY3797,1 ASC0 TABLR F3B03740
  2. References (3)
    00572 0 40000 0 00574 373ADDM32020 INITIAL ADDRESS F3B03720
    00573 0 62100 0 00574 374STAM32020 INITIALIZE COPY ADDRESS F3803730
    00575 2 00001 1 00574 376TIXM32020,1,1 F3B03750
M32030 = 383
  1. Definition
    00577 0 53400 4 01202 378M32030 LXAM3ECTR,4 ERROR COUNT F3B03770
  2. References (2)
    00567 0 10000 0 00576 370TZEM32030−1 NO ASC0 ENTRIES F3B03690
    00606 2 00001 4 00600 385TIXM32030+1,4,1 TRY 4 MORE TIMES F3B03840
M32040 = 392
  1. Definition
    00610 0 53400 4 01202 387M32040 LXAM3ECTR,4 ERROR COUNT F3B03860
  2. References (2)
    00605 0 10000 0 00610 384TZEM32040 CORRECTP F3B03830
    00626 2 00001 4 00611 401TIXM32040+1,4,1 TRY 4 MORE TIMES F3B04000
M32050 = 400
  1. Definition
    00620 0 70000 1 00000 395M32050 CPY0,1 F3B03940
  2. References (2)
    00615 0 62100 0 00620 392STAM32050 F3B03910
    00621 2 00001 1 00620 396TIXM32050,1,1 F3B03950
M32055 = 403
  1. Definition
    00623 0 50000 1 01230 398M32055 CLAFIXCON,1 FIRST ENTRY F3B03970
  2. References (2)
    00614 0 40000 0 00623 391ADDM32055 INITIAL ADDRESS F3B03900
    00631 2 00002 2 00623 404TIXM32055,2,2 NEXT ENTRY F3B04030
M32060 = 408
  1. Definition
    00630 1 77776 1 00631 403M32060 TXIM32060+1,1,−2 SKIP OVER CHECK SUM F3B04020
  2. References (2)
    00625 0 10000 0 00630 400TZEM32060 CORRECT F3B03990
    00630 1 77776 1 00631 403M32060 TXIM32060+1,1,−2 SKIP OVER CHECK SUM F3B04020
M32065 = 412
  1. Definition
    00634 0 76600 0 00222 407M32065 WRS146 WRITE FIXCON ON TAPE 2 F3B04060
  2. Reference
    00612 0 10000 0 00634 389TZEM32065 NO FIXCON ENTRIES F3B03880
M32070 = 418
  1. Definition
    00642 0 70000 2 01230 413M32070 CPYFIXCON,2 F3B04120
  2. References (3)
    00632−0 63400 1 00644 405SXDM32070+2,1 END OF TABLE COUNT F3B04040
    00643 1 77776 2 00644 414TXIM32070+2,2,−2 F3B04130
    D00644 3 00000 2 00642 415TXHM32070,2 F3B04140
M32075 = 421
  1. Definition
    00645 0 77000 0 00222 416M32075 WEF146 WRITE END OF FILE AFTER FIXCON F3B04150
  2. References (2)
    00641 0 10000 0 00645 412TZEM32075 NO FIXCON ENTRY F3B04110
    00650 2 00001 4 00647 419TIXM32075+2,4,1 F3B04180
M3ECTR = 642
  1. Definition
    01202+000000000005 648M3ECTR DEC5 F3B06470
  2. References (6)
    00030 0 53400 4 01202 10M30000 LXAM3ECTR,4 ERORR COUNT IN IR 4 F3B00090
    00042 0 53400 4 01202 20M30010 LXAM3ECTR,4 ERROR COUNT IN IR4 F3B00190
    00577 0 53400 4 01202 378M32030 LXAM3ECTR,4 ERROR COUNT F3B03770
    00610 0 53400 4 01202 387M32040 LXAM3ECTR,4 ERROR COUNT F3B03860
    00655 0 53400 1 01202 426LXAM3ECTR,1 ERROR COUNT F3B04250
    00701 0 53400 2 01202 447LXAM3ECTR,B ERROR COUNT F3B04460
READFF = 448
  1. Definition
    445SU8ROUTINE FOR READING A RECORD OF FIRST FILE F3B04440
    00700−0 63400 2 01210 446READFF SXDE2M3,B SAVE COUNT IN IR 2 FOR LINKAGE F3B04450
  2. References (8)
    00075 0 07400 4 00700 48TSXREADFF,C FIRST FILE BUFFERS F3B00470
    00174 0 07400 4 00700 113 G7 TSXREADFF,C F3B01120
    00230 0 07400 4 00700 141 G12 TSXREADFF,C READ IN TO REFILL BUFFER F3B01400
    00253 0 07400 4 00700 161 E4 TSXREADFF,C READ FIRST FILE F3B01600
    00306 0 07400 4 00700 188 F5 TSXREADFF,C READ FIRST FILE F3B01870
    00424 0 07400 4 00700 270 M1 TSXREADFF,C F3B02690
    00522 0 07400 4 00700 333FREAD TSXREADFF,4 READ FIRST FILE F3B03320
    02675 0 07400 4 00700 674TSXREADFF,4 F3B06684
READTF = 428
  1. Definition
    423M3 CLOSED SU8ROUTINES F3B04220
    424SUBROUTINE FOR READING A RECORD OF TIFGO FILE F3804230
    00654−0 63400 1 01211 425READTF SXDE3M3,A SAVE LINKAGE IN IR 1 F3B04240
  2. References (6)
    00074 0 07400 4 00654 47TSXREADTF,C INITIALIZE TIFGO FILE BUFFER F3B00460
    00133 0 07400 4 00654 79 C3 TSXREADTF,C READ TIFGO FILE INTO BUFFER F3B00780
    00335 0 07400 4 00654 212 H5 TSXREADTF,C BUFFER NOW EMPTY, READ NEXT BLOCK F3B02110
    00364 0 07400 4 00654 237 K1 TSXREADTF,C F3B02360
    00477 0 07400 4 00654 314READ TSXREADTF,4 TREAD TIFGO FILE F3B03130
    02674 0 07400 4 00654 673TSXREADTF,4 F3B06683
TFGBUF = 1166
  1. Definition
    02216 668TFGBUF BSS100 TIFGO BUFFER F3B06660
  2. References (12)
    00106 0 50000 2 02216 57CLATFGBUF,B OBTAIN FOR NEXT CIT AND SAVE IN F3B00560
    00115 0 50000 2 02216 65 C2 CLATFGBUF,B SET UP FOR WORDS F3B00640
    00137 0 50000 2 02216 83 C7 CLATFGBUF,B WORD COUNT LESS THAN BUFFER SIZE F3B00820
    00142 0 50000 2 02216 86CLATFGBUF,B NO F3B00850
    00317 0 50000 2 02216 198 H4 CLATFGBUF,B TIFGO F3B01970
    00337 0 50000 2 02216 215 J1 CLATFGBUF,B TEST IF LOC. WORD OF TIFGO FILE IS F3B02140
    00342 0 60100 2 02216 219STOTFGBUF,B SAVE LOCATION WORD F3B02180
    00346 0 50000 2 02216 223 J3 CLATFGBUF,B TIFGO F3B02220
    00370 0 50000 2 02216 241 K3 CLATFGBUF,B DOES NEXT INSTRUCTION IN F3B02400
    00377−0 50000 2 02216 249 L2 CALTFGBUF,B WITH FIRST FILE F3B02480
    00504 0 50000 2 02216 319CLATFGBUF,2 SET UP FOUR WORDS FOR COMPILATION F3B03180
    00660 0 70000 2 02216 429M3B1 CPYTFGBUF,B COPY TIFGO FILE FROM TAPE INTO BUFFER F3B04280
TFGCFN = 651
  1. Definition
    01213 0 00000 0 00000 658TFGCFN CURRENT FORMULA NUM FOR TIFGO INSTRUCTION F3806560
  2. References (3)
    00110 0 62200 0 01213 59STDTFGCFN F3B00580
    00144 0 34000 0 01213 88CASTFGCFN BELONG TO CURRENT COMPILED BLOCK F3B00870
    00372 0 34000 0 01213 243CASTFGCFN COMPILED BLOCK F3B02420
TFGCOM = 652
  1. Definition
    01214 659TFGCOM BSS4 TIFGO COMPILER F3806570
  2. References (20)
    00116 0 60100 4 01220 66STOTFGCOM+4,C F3B00650
    00122 0 00000 0 01214 70HTRTFGCOM F3B00690
    00123 0 00000 0 01215 71HTRTFGCOM+1 F3B00700
    00124 0 00000 0 01216 72HTRTFGCOM+2 F3B00710
    00125 0 00000 0 01217 73HTRTFGCOM+3 F3B00720
    00320 0 60100 4 01220 199STOTFGCOM+4,C FILE F3B01980
    00324 0 00000 0 01214 203HTRTFGCOM F3B02020
    00325 0 00000 0 01215 204HTRTFGCOM+1 F3B02030
    00326 0 00000 0 01216 205HTRTFGCOM+2 F3B02040
    00327 0 00000 0 01217 206HTRTFGCOM+3 F3B02050
    00347 0 60100 4 01220 224STOTFGCOM+4,C FILE F3B02230
    00353 0 00000 0 01214 228HTRTFGCOM F3B02270
    00354 0 00000 0 01215 229HTRTFGCOM+1 F3802280
    00355 0 00000 0 01216 230HTRTFGCOM+2 F3B02290
    00356 0 00000 0 01217 231HTRTFGCOM+3 F3B02300
    00505 0 60100 4 01220 320STOTFGCOM+4,4 F3B03190
    00511 0 00000 0 01214 324HTRTFGCOM F3B03230
    00512 0 00000 0 01215 325HTRTFGCOM+1 F3B03240
    00513 0 00000 0 01216 326HTRTFGCOM+2 F3B03250
    00514 0 00000 0 01217 327HTRTFGCOM+3 F3B03260
TSXCOM = 664
  1. Definition
    01230 666TSXCOM BSS502 F3B06640
  2. References (26)
    00033 0 70000 0 01226 13CPYTSXCOM−2 WORD COUNT OF TSXCOM TABLE F3B00120
    00034 0 70000 0 01227 14CPYTSXCOM−1 CHECK SUM OF WORD COUNT F3B00130
    00035 0 50000 0 01226 15CLATSXCOM−2 WD. COUNT F3B00140
    00036 0 40200 0 01227 16SUBTSXCOM−1 CHECK SUM F3B00150
    00043 0 50000 0 01226 21CLATSXCOM−2 WORD COUNT F3B00200
    00061 0 36100 1 01230 35M30025 ACLTSXCOM,1 COMPUTE NEW CHECK SUMS AND COMPARE F3B00340
    00064−0 63400 1 01227 38SXDTSXCOM−1,1 F3B00370
    00065 0 60200 0 01226 39SLWTSXCOM−2 F3B00380
    00066 0 50000 0 01226 40CLATSXCOM−2 F3B00390
    00067 0 40200 1 01230 41SUBTSXCOM,1 F3B00400
    00727 0 50000 0 01226 470M31005 CLATSXCOM−2 TEST WORD COUNT OF CHECK SUM F3B04690
    00730 0 40200 0 01227 471SUBTSXCOM−1 F3B04700
    00732−0 53400 1 01226 473LXDTSXCOM−2,1 WORD COUNT IN IR1 F3B04720
    00733 0 50000 1 01230 474CLATSXCOM,1 FIRST ENTRY F3B04730
    00737−0 50000 1 01231 479M31015 CALTSXCOM+1,1 F3B04780
    00742 0 50000 1 01230 482CLATSXCOM,1 TYPE 2 ENTRY F3B04810
    00745 0 50000 1 01231 485CLATSXCOM+1,1 SECOND WORD OF ENTRY F3B04840
    00755−0 63400 1 01226 493M31030 SXDTSXCOM−2,1 SAVE NEW WORD COUNT F3B04920
    00764 0 50000 1 01231 500CLATSXCOM+1,1 SECOND WORD OF ENTRY F3B04990
    00775 0 50000 1 01231 509M31050 CLATSXCOM+1,1 SECOND WORD F3B05080
    01010−0 63400 1 01226 520SXDTSXCOM−2,1 SAVE WORD COUNT F3B05190
    01057 0 50000 1 01231 560CLATSXCOM+1,1 F3B05590
    01230 667FIXCON SYNTSXCOM F3B06650
    02673 0 60200 0 01226 672TSXPT1 SLWTSXCOM−2 F3B06682
    02702 0 50000 0 01230 679TSXPT2 CLATSXCOM F3B06689
    02706 0 50000 0 01230 683CLATSXCOM F3B06693
TSXPT1 = 1467
  1. Definition
    02673 0 60200 0 01226 672TSXPT1 SLWTSXCOM−2 F3B06682
  2. Reference
    00073 0 02000 0 02673 45M30050 TRATSXPT1 F3B00440
TSXPT2 = 1474
  1. Definition
    02702 0 50000 0 01230 679TSXPT2 CLATSXCOM F3B06689
  2. Reference
    02677 0 02000 0 02702 676TRATSXPT2 F3B06686
WRITE1 = 362
  1. Definition
    00552 0 70000 1 02526 357WRITE1 CPYCIB,1 REMAINDER OF BUFFER ONTO TAPE 4 F3B03560
  2. Reference
    D00554 3 00000 1 00552 359WRITE2 TXHWRITE1,1 F3B03580
WRITE2 = 364
  1. Definition
    D00554 3 00000 1 00552 359WRITE2 TXHWRITE1,1 F3B03580
  2. References (3)
    00546−3 00000 1 00555 353TXLWRITE2+1,1,0 F3B03520
    00550−0 63400 1 00554 355SXDWRITE2,1 F3B03540
    00553 1 77777 1 00554 358TXIWRITE2,1,−1 F3B03570