␣␣␣␣␣D = 123
  1. Definition
    00173 0 00000 0 00000 100 D HTR0 F6B00950
  2. External references (7)
    00315 0 60100 0 00173 91STOD IN EQUIVALENCE SENTENCE. F6C00750
    00316 0 56000 0 00173 92LDQD COMPARE WITH MAXD AND STORE LARGER IN MAXD. F6C00760
    00213 0 60100 0 00173 12STOD COMPUTE ADDRESS OF F6G00070
    00227 0 56000 0 00173 24LDQD WILL FOLLOW THE MOVED F6G00190
    00231 0 50000 0 00173 26CLAD ALLOWS FOR IFN F6G00210
    00540 0 62100 0 00173 230STAD FROM TIV TABLE. F6G02230
    00570 0 40200 0 00173 254SUBD REDUCE LCTR BY LENGTH F6G02470
␣␣␣␣␣I = 31577
  1. Definition
    75531 170 I BES300 F6B01550
␣␣␣␣␣L = 31867
  1. Definition
    76173 171 L BES290 F6B01560
  2. External references (4)
    00313 0 50000 2 76173 87 SSF CLAL,2 IF WORD IN SENT.=ARRAY NAME IN SIZE TABLE, CLA F6C00730
    00455−0 70000 1 76173 185CADL,1 COPY ARRAY LENGTH INTO L,1 F6C01680
    00565 0 50200 2 76173 265 UP10 CLSL,2 REDUCE LCTR BY LENGTH OF ARRAY F6C02400
    00612 0 40200 1 76173 173SUBL,1 F6D01540
␣␣␣␣B1 = 152
  1. Definition
    00230 0 02000 0 00260 128 B1 TRABPCH1 GO SKIP BCD FILE F6B01230
␣␣␣␣B2 = 153
  1. Definition
    00231 0 76200 0 00222 129 B2 RTB2 POSITION TAPE TWO F6B01240
  2. References (3)
    00235 0 02000 0 00231 133TRAB2 F6B01280
    00236 2 00001 1 00231 134 B3 TIXB2,1,1 F6B01290
    00266 0 02000 0 00231 157TRAB2 F6B01448
␣␣␣␣B3 = 158
  1. Definition
    00236 2 00001 1 00231 134 B3 TIXB2,1,1 F6B01290
  2. Reference
    00234 0 02000 0 00236 132TRAB3 F6B01270
␣␣␣␣EA = 124
  1. Definition
    00174 0 00000 0 00000 101 EA HTR0 F6B00960
  2. External references (25)
    00230 0 50000 0 00174 28CLAEA DO SO. F6C00200
    00332 0 60100 0 00174 104STOEA F6C00880
    00337 0 40200 0 00174 109SUBEA RETURN FROM SDEV IF FOUND IN DEV TABLE. DEA F6C00930
    00543 0 60100 0 00174 244STOEA STORE LOCATION COUNTER IN EA. F6C02220
    00570 0 60100 0 00174 268STOEA STORE CURRENT LCTR IN EA. F6C02430
    00433 0 60100 0 00174 47 A42 STOEA STORE PROGRAM COUNTER IN EA. F6D00410
    00542 0 60000 0 00174 125 A11 STZEA EQUIV. VARIABLE IS A SUBROUTINE ARGUMENT F6D01130
    00563 0 60100 0 00174 147 SEA STOEA F6D01310
    00331 0 60000 0 00174 101STZEA SET EA=0 F6E00890
    00311 0 50000 0 00174 77CLAEA F6F00700
    00334 0 60100 0 00174 96STOEA SET EA TO ALL 7 S. F6F00791
    00342 0 50000 0 00174 102CLAEA ALREADY IN DEV. ENTER F6F00797
    00350 0 60000 0 00174 108 GOHD STZEA RESET EA TO ZERO. F6F00803
    00304 0 60100 0 00174 69STOEA F6G00640
    00413 0 62100 0 00174 142 SA2 STAEA STORE IN EA ADDRESS LEFT IN AC FROM 1 OF ABOVE,F6G01350
    00440 0 50000 0 00174 164 SYNOP CLAEA FOR SYN OP, F6G01570
    00252 0 60100 0 00174 41STOEA CLEAR EA, F6N00380
    00336 0 62100 0 00174 94 SA2 STAEA STORE LOCATION IN ADORESS OF EA. F6N00900
    00356 0 40000 0 00174 110ADDEA F6N01060
    00360 0 50000 0 00174 112CLAEA LOCATION GREATER THAN PGBK F6N01080
    00515 0 50000 0 00174 205 SYNOP CLAEA OP IS SYN. F6N02010
    00544 0 62100 0 00174 228STAEA IN TIV TABLE. RETURN WITH LOCATION F6N02240
    00545 0 50000 0 00174 229CLAEA IN ADDRESS. TEST ADDRESS. F6N02250
    00556 0 62100 0 00174 238 SL4 STAEA CHECK STORED LOCATION (FROM TIV). F6N02340
    00557 0 50000 0 00174 239CLAEA EQUAL PROG CTR F6N02350
␣␣␣␣L1 = 118
  1. Definition
    00166 0 00000 0 00000 95 L1 HTR0 F6B00900
  2. External references (23)
    00432 0 50000 0 00166 46CLAL1 F6D00400
    00442 0 50000 0 00166 55 A40 CLAL1 STORE PROGRAM COUNTER IN PROG BREAK. F6D00480
    00445 0 60100 0 00166 58STOL1 F6D00510
    00243 0 60000 0 00166 36STZL1 SET PROGRAM BREAK=0 F6G00310
    00412 0 50000 0 00166 141 SA8 CLAL1 PROG COUNTE(I15) F6G01340
    00424 0 50000 0 00166 152 ORDOP CLAL1 OP NOT SYN OR BSS. F6G01450
    00427 0 60100 0 00166 155STOL1 F6G01480
    00431 0 50000 0 00166 157 BSSOP CLAL1 FOR BSS OP, F6G01500
    00435 0 40000 0 00166 161ADDL1 F6G01540
    00436 0 60100 0 00166 162STOL1 F6G01550
    00211 0 40200 0 00166 11SUBL1 F6J00090
    00214 0 50000 0 00166 14CLAL1 COMPUTE NEW PROGRAM F6J00120
    00233 0 34000 0 00166 30CASL1 LOC LESS THAN L3. IS IT GREATER THAN L1. F6J00270
    00251 0 34000 0 00166 44CASL1 LOC LESS THAN L3. IS IT GREATER THAN OR EQUAL F6J00410
    00270 0 34000 0 00166 60CASL1 F6J00560
    00215 0 60100 0 00166 12STOL1 CLEAR L1 AND L2. F6N00090
    00335 0 50000 0 00166 93 SAB CLAL1 SA(1) EQUAL 15, SET LOCATION EQUAL L1. F6N00890
    00412 0 50000 0 00166 138CLAL1 UPDATE PROG CTR F6N01340
    00415 0 60100 0 00166 141STOL1 F6N01370
    00475 0 50000 0 00166 189 ST4 CLAL1 SET ADDRESS PART OF F6N01850
    00503 0 50000 0 00166 195 BSSOP CLAL1 OP IS BSS. F6N01910
    00510 0 40000 0 00166 200ADDL1 STORE NEW ADDRESS F6N01960
    00511 0 60100 0 00166 201STOL1 FOR LOADING. F6N01970
␣␣␣␣L2 = 119
  1. Definition
    00167 0 00000 0 00000 96 L2 HTR0 F6B00910
  2. External references (16)
    00443 0 60100 0 00167 56STOL2 F6D00490
    00244 0 60000 0 00167 37STZL2 SET PROGRAM COUNTER=0 F6G00320
    00425 0 60100 0 00167 153STOL2 F6G01460
    00432 0 60100 0 00167 158STOL2 F6G01510
    00441 0 60100 0 00167 165STOL2 SET L2 EQUAL F6G01580
    00457 0 50000 0 00167 179 SL8 CLAL2 YES, PUT L2 AS LOCATION F6G01720
    00462 0 50000 0 00167 182 SL5 CLAL2 PUT L2 IN AS F6G01750
    00505 0 50000 0 00167 201 LIB1 CLAL2 STORE L2 IN ADDRESS OF DOLSI. F6G01940
    00510 0 50000 0 00167 204 LIB2 CLAL2 STORE L2 IN DECREMENT OF DOLSI F6G01970
    00515 0 50000 0 00167 209CLAL2 OF INTERNAL FORMULA F6G02020
    00216 0 60100 0 00167 13STOL2 F6N00100
    00413 0 60100 0 00167 139STOL2 AND PROGRAM BREAK F6N01350
    00504 0 60100 0 00167 196STOL2 STORE PROGRAM COUNTER, F6N01920
    00516 0 60100 0 00167 206STOL2 SET PROG CTR EQUAL ADDRESS F6N02020
    00547 0 50000 0 00167 231 SL8 CLAL2 ZERO. PUT L2 IN TIV TABLE AS LOCATION. F6N02270
    00560 0 40200 0 00167 240 SL5 SUBL2 IF NOT EQUAL TO L2, GO TO ERROR HALT. F6N02360
␣␣␣␣L3 = 125
  1. Definition
    00175 0 00000 0 00000 102 L3 HTR0 F6B00970
  2. External references (9)
    00401 0 60100 0 00175 20STOL3 IN L3 F6D00150
    00226 0 40200 0 00175 25SUBL3 I.E. SEE IF LOCATION OF SYMBOL IS IN RANGE OF F6E00210
    00215 0 40000 0 00175 15ADDL3 BREAK AND STORE. F6J00130
    00230 0 34000 0 00175 26CASL3 F6J00240
    00246 0 34000 0 00175 41CASL3 YES, TEV ENTRIES. IS LOCATION BETWEEN L3 ANO L1F6J00380
    00265 0 34000 0 00175 57CASL3 F6J00530
    00320 0 50000 0 00175 85CLAL3 F6J00800
    00271 0 34000 0 00175 62 J6 CASL3 IS DEV ENTRY IN COMMON. F6K00550
    00216 0 50000 0 00175 18CLAL3 TWOS COMPLEMENT OF LENGTH OF UPPER F6L00160
␣␣␣ARG = 111
  1. Definition
    00157 0 00000 0 00000 88 ARG HTR0 F6B00830
  2. References (3)
    00123 0 60200 0 00157 60SLWARG F6B00550
    00131 0 62100 0 00157 66STAARG F6B00610
    00132 0 34000 0 00157 67CASARG F6B00620
␣␣␣CH1 = 154
  1. Definition
    00232 0 70000 0 00253 130 CH1 CPYERAS F6B01250
  2. Reference
    00233 0 02000 0 00232 131TRACH1 AT THE BEGINNING OF FILE FIVE. F6B01260
␣␣␣DEA = 30987
  1. Definition
    74413 167 DEA BES900 F6B01520
  2. Local reference
    00152 0 50000 2 74413 83 ADEV CLADEA,2 F6B00780
  3. External references (11)
    00231 0 60100 2 74413 29STODEA,2 ENTRY IS MADE INTO MIDDLE OF DEV. F6C00210
    00235−0 50000 2 74414 33CALDEA+1,2 F6C00250
    00236 0 60200 2 74413 34SLWDEA,2 F6C00260
    00225 0 50000 1 74413 24 CNW CLADEA,1 TEST FOR COMMON, F6E00200
    00246 0 50000 1 74413 43 CNA CLADEA,1 T0 GET BCD IMAGE OF DECIMAL LOCATION. F6E00370
    00312 0 60200 2 74413 78SLWDEA,2 F6F00710
    00316−0 50000 2 74414 82CALDEA+1,2 F6F00750
    00317 0 60200 2 74413 83SLWDEA,2 F6F00760
    00343 0 60100 2 74413 103STODEA,2 LOCATION AS ALL 7S. F6F00798
    00211−0 75400 1 74413 10 LDEA PXDDEA,1 ENTRIES IN DEV F6G00050
    00222 0 50000 1 74413 19 MDAL CLADEA,1 MOVE LOCATIONS TO F6G00140
␣␣␣DEV = 32767
  1. Definition
    77777 172 DEV BES900 F6B01570
  2. Local reference
    00146 0 34000 2 77777 79 TDEV CASDEV,2 F6B00740
  3. External references (10)
    00227 0 60200 2 77777 27SLWDEV,2 TO BE MADE ON END OF TABLE, F6C00190
    00233−0 50000 2 00000 31 EDEV4 CALDEV+1,2 UNTIL SPACE IS MADE FOR NEW ENTRY. F6C00230
    00234 0 60200 2 77777 32SLWDEV,2 F6C00240
    00402 0 60200 0 77777 142SLWDEV WORD OF 1S INTO DEV. F6C01250
    00234 0 56000 1 77777 32LDQDEV,1 SELECT SYMBOL AND F6E00270
    00310 0 60200 2 77777 76SLWDEV,2 F6F00690
    00314−0 50000 2 00000 80 EDEV4 CALDEV+1,2 M0VE TABLE F6F00730
    00315 0 60200 2 77777 81SLWDEV,2 ENTRIES. F6F00740
    00233 0 56000 1 77777 28 TV4 LDQDEV,1 DEV ENTRY IS IN TRANSFER VECTOR SO LIST IT. F6K00250
    00276 0 56000 1 77777 67 ME7 LDQDEV,1 TAPE 2 BUFFER INDEX NOT 0. LOAD APPROPRIATE F6K00600
␣␣␣ECS = 29487
  1. Definition
    71457 165 ECS BES300 F6B01501
  2. External references (7)
    00246−0 70000 1 71456 43 ECC CADECS−1,1 COPY VARIABLE NAME INTO ECS-1 ETC F6C00350
    00302 0 50000 1 71457 75 LID CLAECS,1 BRING A WORD OF SENTENCE INTO AC. F6C00640
    00333 0 50000 1 71457 105 DES CLAECS,1 CURRENT WORD OF EQUIV SENTENCE. F6C00890
    00515 0 50000 1 71456 218 UP20 CLAECS−1,1 COMPARE VARIABLE NAME FROM EQUIV SENTENCE F6C02000
    00513 0 50000 1 71456 99 A9 CLAECS−1,1 COMPARE A WORD OF EQUIV SENTENCE F6D00900
    00530 0 50000 0 71456 114 ME30 CLAECS−1 SEARCH DEV TABLE FOR AN EQUIV. NAME. F6D01030
    00545 0 50000 1 71457 128CLAECS,1 STORE EQUIV VARIABLE IN DEV AND F6D01160
␣␣␣ME2 = 133
  1. Definition
    00205 0 00001 0 00001 110 ME2 1,0,1 F6B01050
␣␣␣ONE = 114
  1. Definition
    00162+000000000001 91 ONE DEC0000000001 F6B00860
  2. External references (21)
    00212 0 50000 0 00162 10CLAONE F6S00070
    00220 0 50000 0 00162 16 ASKER CLAONE SWITCH 2 DOWN (OR UP BUT FILES TO DO) F6S00130
    00324 0 50000 0 00162 84CLAONE F6S00810
    00311 0 50000 0 00162 85 NSZ CLAONE IF NO WORD IN SENTENCE IS AN ARRAY, F6C00710
    00352 0 40000 0 00162 121ADDONE PLUS F6C01040
    00563 0 50200 0 00162 262 UP07 CLSONE IF NOT IN SIZE TABLE, REDUCE LCTR BY ONE. I.E. F6C02380
    00444 0 40000 0 00162 57ADDONE INCREASE PROGRAM COUNTER BY 1. F6D00500
    00250 0 53400 4 00162 45LXAONE,4 F6E00390
    00232 0 40000 0 00162 27ADDONE TABLE TO BE STORED F6G00220
    00240−0 40000 0 00162 33SBMONE TEV TABLE F6G00280
    00426 0 40000 0 00162 154ADDONE UPDATE L1 BY 1. F6G01470
    00572 0 40200 0 00162 256SUBONE MODIFY LOCATION COUNTER. F6G02490
    00310 0 53400 4 00162 77LXAONE,4 F6H00710
    00371 0 40000 0 00162 128ADDONE LISTED PLUS ONE.(TO BE USED BY RECORD 110). F6H01200
    00305 0 53400 4 00162 73LXAONE,4 IN LOC TO BCD F6I00660
    00212 0 40000 0 00162 12ADDONE F6J00100
    00364 0 53400 1 00162 121 SUB LXAONE,1 F6J01160
    00406 0 53400 4 00162 139LXAONE,4 CONVERT LOCATION TO BCD IMAGE OF ITS F6K01320
    00372 0 50000 0 00162 122 LIB40 CLAONE F6N01180
    00402 0 50000 0 00162 130CLAONE F6N01260
    00414 0 40000 0 00162 140ADDONE FOR ALL OPS. F6N01360
␣␣␣STS = 31277
  1. Definition
    75055 169 STS BES290 F6B01540
  2. External references (6)
    00305 0 34000 2 75055 79 SSZ CASSTS,2 OTHERWISE, COMPARE A WORD OF EQUIV SENT WITH F6C00670
    00454−0 70000 1 75055 184 DTC CADSTS,1 COPY ARRAY NAME INTO STS,1 F6C01670
    00557 0 34000 2 75055 257 UP08 CASSTS,2 WITH ARRAY NAME FROM SIZE TABLE F6C02340
    00564 0 50000 1 75055 148 DDS CLASTS,1 F6D01320
    00577 0 50000 1 75055 160 A20 CLASTS,1 TO SEE IF ARRAY NAME IS A SUBROUTINE ARG. F6D01430
    00642 0 50000 1 75055 199CLASTS,1 F6D01703
␣␣␣SW1 = 127
  1. Definition
    00177 0 00000 0 00000 104 SW1 HTR0 F6B00990
  2. Reference
    00240 0 70000 0 00177 136CPYSW1 COPY SENSE SWITCH SETTINGS F6B01310
␣␣␣SW2 = 128
  1. Definition
    00200 0 00000 0 00000 105 SW2 HTR0 F6B01000
  2. Local reference
    00241 0 70000 0 00200 137CPYSW2 I.E. FIRST RECORD OF FILE 5. F6B01320
  3. External reference
    00213 0 34000 0 00200 11CASSW2 TEST SENSE SWITCH TWO. F6S00080
␣␣␣SW3 = 129
  1. Definition
    00201 0 00000 0 00000 106 SW3 HTR0 F6B01010
  2. Local reference
    00242 0 70000 0 00201 138CPYSW3 F6B01330
  3. External reference
    00221 0 34000 0 00201 17CASSW3 TEST SENSE SWITCH THREE. F6S00140
␣␣␣SW4 = 130
  1. Definition
    00202 0 00000 0 00000 107 SW4 HTR0 F6B01020
  2. Local reference
    00243 0 70000 0 00202 139CPYSW4 F6B01340
  3. External reference
    00325 0 34000 0 00202 85CASSW4 F6S00820
␣␣␣SW5 = 131
  1. Definition
    00203 0 00000 0 00000 108 SW5 HTR0 F6B01030
  2. Reference
    00244 0 70000 0 00203 140CPYSW5 F6B01350
␣␣␣TIV = 1100
  1. Definition
    A 02114 163 TIV BSS F6B01490
  2. Local references (2)
    00130 0 50000 2 02114 65 TTIV CLATIV,2 F6B00600
    00136 0 50000 2 02114 71 ATIV CLATIV,2 RETURN WITH COMPLETE OLD TIV ENTRY F6B00660
  3. External references (13)
    00247 0 60100 0 02114 40STOTIV ENTRIES. F6G00350
    00250 0 60200 0 02115 41SLWTIV+1 F6G00360
    00355 0 62100 2 02114 110STATIV,2 IS LONGER F6G01050
    00460 0 62100 2 02114 180STATIV,2 IN TIV TABLE. F6G01730
    00537−0 50000 2 02114 229CALTIV,2 YES, OBTAIN LENGTH F6G02220
    00571 0 62100 2 02114 255STATIV,2 STORE AS LOCATION IN TIV. F6G02480
    00602 0 62100 2 02114 264STATIV,2 RETURN F6G02570
    00651 0 60200 2 02114 303SLWTIV,2 F6G02960
    00653−0 50000 2 02113 305 ETIV4 CALTIV−1,2 F6G02980
    00654 0 60200 2 02114 306SLWTIV,2 F6G02990
    00262 0 50000 1 02114 54 A10 CLATIV,1 YES. TEST TIV. F6J00500
    00277 0 62100 1 02114 68STATIV,1 F6J00630
    00550 0 62100 2 02114 232STATIV,2 F6N02280
␣␣␣TWO = 115
  1. Definition
    00163+000000000002 92 TWO DEC0000000002 F6B00870
  2. External references (3)
    00504 0 50000 0 00163 209CLATWO F6C01910
    00476 0 50000 0 00163 86CLATWO F6D00770
    00337 0 50000 0 00163 95CLATWO SET RBIT AS RELOCATABLE. F6N00910
␣␣ADD1 = 138
  1. Definition
    T00212−0 75400 0 00000 114 ADD1 PXD NUMBER OF F6B01090
  2. Reference
    00213 0 46000 0 00212 115LDAADD1 ENTRIES IN F6B01100
␣␣ADD2 = 147
  1. Definition
    00223 0 00000 0 00000 123 ADD2 HTR0 F6B01180
  2. Reference
    00216 0 70000 0 00223 118CPYADD2 F6B01130
␣␣ADD3 = 148
  1. Definition
    00224−0 53400 1 00165 124 ADD3 LXDEIFN,1 F6B01190
  2. Reference
    00220 0 10000 0 00224 120TZEADD3 F6B01150
␣␣ADD4 = 150
  1. Definition
    00226−0 63400 1 00165 126 ADD4 SXDEIFN,1 F6B01210
  2. Reference
    00225 1 00001 1 00226 125TXIADD4,1,1 F6B01200
␣␣ADD5 = 173
  1. Definition
    00255 0 00000 0 00017 149 ADD5 HTR15 F6B01440
  2. Reference
    00210 0 53400 2 00255 112 START LXAADD5,2 SET DRUM ERROR COUNTER TO 15 F6B01070
␣␣ADD6 = 137
  1. Definition
    00211 0 76200 0 00304 113 ADD6 RDR4 SELECT DRUM 4. F6B01080
  2. Reference
    00221 2 00001 2 00211 121TIXADD6,2,1 F6B01160
␣␣ADDR = 116
  1. Definition
    00164 0 00000 0 77777 93 ADDR HTR−1 F6B00880
  2. External references (13)
    00413−0 53400 4 00164 151LXDADDR,4 F6C01340
    00513−0 53400 1 00164 216LXDADDR,1 SET XR1,2=0 F6C01980
    00514−0 53400 2 00164 217 UP22 LXDADDR,2 F6C01990
    00535−0 53400 1 00164 238 UP01 LXDADDR,1 ASSIGN UPPER F6C02160
    00431−0 53400 1 00164 45LXDADDR,1 SET COUNTER FOR WORDS PROCESSED TO ZERO. F6D00390
    00463−0 53400 4 00164 75LXDADDR,4 SET COUNTER=0, F6D00660
    00511−0 53400 1 00164 97LXDADDR,1 F6D00880
    00512−0 53400 2 00164 98 A8 LXDADDR,2 SET XRS 1+2=0 F6D00890
    00575−0 53400 2 00164 158LXDADDR,2 SET COUNTER=0 F6D01410
    00260 0 53400 4 00164 49LXAADDR,4 COUNTER SET=-1 F6G00440
    00271−0 53400 4 00164 58LXDADDR,4 SET WORD COUNTER=0 F6G00530
    00226 0 53400 4 00164 21LXAADDR,4 CIT TAPE 4. F6N00180
    00237−0 53400 4 00164 30LXDADDR,4 F6N00270
␣␣ADEV = 106
  1. Definition
    00152 0 50000 2 74413 83 ADEV CLADEA,2 F6B00780
  2. Local reference
    00150 0 02000 0 00152 81TRAADEV ENTRY FOUND F6B00760
  3. External references (6)
    00215 0 62100 0 00152 14STAADEV IT TO END OF F6G00090
    00233−0 40000 0 00152 28 MVIF SBMADEV IN DECREMENT OF DEA F6G00230
    00225 0 50000 0 00152 22CLAADEV INITIALIZE ADDRESSES WITH INITIAL F6H00180
    00222 0 50000 0 00152 20CLAADEV YES. COMPUTE ADORESS OF F6J00180
    00216 0 50000 0 00152 14CLAADEV PRINT TRANSFER VECTOR F6K00120
    00257 0 50000 0 00152 51 LIB38 CLAADEV STORE INITIAL LOCATION OF DEA TABLE IN AOORESS F6K00450
␣␣ATEV = 75
  1. Definition
    00113−0 75400 2 00000 52 ATEV PXD0,2 CONTROLS ENTRY POINT OF SEARCH F6B00470
  2. Reference
    00111 0 02000 0 00113 50TRAATEV FOUND. F6B00450
␣␣ATIV = 94
  1. Definition
    00136 0 50000 2 02114 71 ATIV CLATIV,2 RETURN WITH COMPLETE OLD TIV ENTRY F6B00660
  2. Reference
    00134 0 02000 0 00136 69TRAATIV F6B00640
␣␣DEVA = 110
  1. Definition
    00156 0 00001 0 00002 87 DEVA 2,0,**+1 F6B00820
  2. External references (8)
    00220 0 40000 0 00156 20ADDDEVA UPDATE DEVS F6C00120
    00222 0 62200 0 00156 22STDDEVA F6C00140
    00223 0 40000 0 00156 23ADDDEVA UPDATE THE EDEV3 TEST TO NEXT F6C00150
    00212 0 50000 0 00156 11CLADEVA IF PREVIOUS ENTRIES, UPDATE DECREMENT OF EDEV3 F6F00060
    00213 0 40000 0 00156 12ADDDEVA WHICH WILL CONTAIN THE MAX. POWER OF 2 EX- F6F00070
    00301 0 40000 0 00156 69ADDDEVA F6F00620
    00303 0 62200 0 00156 71STDDEVA F6F00640
    00304 0 40000 0 00156 72ADDDEVA F6F00650
␣␣DEVL = 109
  1. Definition
    00155−3 00000 2 00146 86 DEVL TXLTDEV,2,**+0 CONTAINS TABLE LENGTH F6B00810
  2. Local reference
    00142 0 56000 0 00155 75 SDEV LDQDEVL ENTER HERE TO SEARCH DEV F6B00700
  3. External references (9)
    00213−0 53400 2 00155 15LXDDEVL,2 F6C00070
    00215−0 63400 2 00155 17 EDEV2 SXDDEVL,2 MUST STARTING PT OF NEXT SEARCH BE F6C00090
    00216−0 53400 1 00155 17LXDDEVL,1 TABLE LENGTH OF DEV. F6E00130
    00274−0 53400 2 00155 64LXDDEVL,2 F6F00570
    00276−0 63400 2 00155 66 EDEV2 SXDDEVL,2 F6F00590
    00210−0 53400 1 00155 9 MDEA LXDDEVL,1 COMPUTE NUMBER OF F6G00040
    00220−0 53400 1 00155 18LXDDEVL,1 ANY SYMBOLS IN DEV. F6J00160
    00223−0 53400 1 00155 19LXDDEVL,1 SET DEA TABLE COUNTER. F6K00170
    00247−0 53400 1 00155 42 J4 LXDDEVL,1 ANY DEV ENTRIES. F6K00370
␣␣DEVS = 108
  1. Definition
    00154 0 00000 0 00004 85 DEVS 4,0,**+0 F6B00800
  2. Local references (2)
    00144 0 53400 1 00154 77LXADEVS,1 CONTROLS HOPPING WITHIN DEV F6B00720
    00145−0 53400 2 00154 78LXDDEVS,2 SELECTS THE ITEM FOR COMPARISON. F6B00730
  3. External references (5)
    00217−0 50000 0 00154 19CALDEVS YES. F6C00110
    00221 0 60200 0 00154 21SLWDEVS F6C00130
    00210−0 53400 1 00154 9LXDDEVS,1 F6F00040
    00300−0 50000 0 00154 68CALDEVS F6F00610
    00302 0 60200 0 00154 70SLWDEVS F6F00630
␣␣EIFN = 117
  1. Definition
    00165 0 00000 0 00000 94 EIFN HTR0 F6B00890
  2. Local references (3)
    00214 0 70000 0 00165 116CPYEIFN EXTERNAL INTERNAL F6B01110
    00224−0 53400 1 00165 124 ADD3 LXDEIFN,1 F6B01190
    00226−0 63400 1 00165 126 ADD4 SXDEIFN,1 F6B01210
  3. External references (2)
    00225 0 50000 0 00165 22 PREP CLAEIFN COMPUTE ADDRESS FOR F6G00170
    00674−0 53400 2 00165 322LXDEIFN,2 F6G03123
␣␣ERAS = 171
  1. Definition
    00253 0 00000 0 00000 147 ERAS HTR0 F6B01420
  2. References (2)
    00232 0 70000 0 00253 130 CH1 CPYERAS F6B01250
    00261 0 70000 0 00253 152CPYERAS F6B01443
␣␣FOUR = 172
  1. Definition
    00254 0 00000 0 00004 148 FOUR HTR4 F6B01430
␣␣LCTR = 121
  1. Definition
    00171 0 00000 0 77462 98 LCTR HTR−206 F6B00930
  2. External references (19)
    00323 0 50000 0 00171 97CLALCTR EXHAUSTED. F6C00810
    00325 0 60100 0 00171 99STOLCTR F6C00830
    00330 0 50000 0 00171 102CLALCTR COMPUTE ABSOLUTE LOCATION OF WORD IN SENT., F6C00860
    00344 0 50000 0 00171 114CLALCTR AT END OF SENTENCE, REDUCE LCTR BY MAXD. F6C00980
    00346 0 60100 0 00171 116STOLCTR F6C01000
    00542 0 50000 0 00171 243CLALCTR F6C02210
    00566 0 40000 0 00171 266 UP11 ADDLCTR REDUCE LCTR F6C02410
    00567 0 60100 0 00171 267STOLCTR F6C02420
    00400 0 50000 0 00171 19CLALCTR SAVE UPPER BREAK F6D00140
    00562 0 50000 0 00171 146CLALCTR STORE LCTR IN EA. F6D01300
    00611 0 50000 0 00171 171CLALCTR SUBTRACT LENGTH OF ARRAY FROM LCTR AND STORE INF6D01530
    00613 0 60100 0 00171 174STOLCTR F6D01550
    00617 0 50000 0 00171 179CLALCTR F6D01590
    00531 0 40200 0 00171 223SUBLCTR OF ENTRIES IN TEV AND F6G02160
    00532 0 60200 0 00171 224SLWLCTR STORE IN LTEV. F6G02170
    00567 0 50000 0 00171 253 CIVL CLALCTR TYPE1,7,12 F6G02460
    00573 0 60100 0 00171 257STOLCTR F6G02500
    00210 0 50000 0 00171 10CLALCTR F6J00080
    00216 0 40200 0 00171 16SUBLCTR F6J00140
␣␣LIFN = 120
  1. Definition
    00170 0 00000 0 00000 97 LIFN HTR0 F6B00920
  2. External references (4)
    00216 0 62100 0 00170 15STALIFN DEV TABLE. F6G00100
    00227 0 50000 0 00170 24CLALIFN F6H00200
    00246 0 50000 0 00170 38CLALIFN SET AT INITIALIZATION OF FIRST PASS. EQUALS F6I00350
    00211 0 50000 0 00170 8CLALIFN STORE IFN TABLE ADDRESS. F6N00050
␣␣LTEV = 122
  1. Definition
    00172 0 00000 0 00000 99 LTEV HTR0 F6B00940
  2. Local reference
    00115 0 40000 0 00172 54ADDLTEV F6B00490
  3. External references (4)
    00533 0 60200 0 00172 225SLWLTEV F6G02180
    00243 0 50000 0 00172 38 A5 CLALTEV TEST LTEV ( LOCATION OF FIRST SYMBOL IN TEV) F6J00350
    00256 0 60100 0 00172 50STOLTEV AND STORE NEW LOCATION IN LTEV. F6J00460
    00341 0 40000 0 00172 102ADDLTEV F6K00950
␣␣PGBK = 126
  1. Definition
    00176 0 00000 0 00000 103 PGBK HTR0 F6B00980
  2. External references (5)
    00217 0 60100 0 00176 17STOPGBK F6J00150
    00306 0 50000 0 00176 75CLAPGBK F6J00700
    00214 0 40000 0 00176 16ADDPGBK ADD LENGTH OF LOWER STORAGE IN ADDRESS. F6L00140
    00361 0 40200 0 00176 113SUBPGBK F6N01090
    00364 0 40200 0 00176 116SUBPGBK ADDRESS GREATER THAN PGBK. F6N01120
␣␣SDEV = 98
  1. Definition
    00142 0 56000 0 00155 75 SDEV LDQDEVL ENTER HERE TO SEARCH DEV F6B00700
  2. External references (12)
    00334 0 07400 4 00142 106TSXSDEV,4 SEARCH DEV TABLE F6C00900
    00546 0 07400 4 00142 247TSXSDEV,4 SEE IF IN DEV TABLE F6C02250
    00436 0 07400 4 00142 50TSXSDEV,4 TO SEE IF NAME SELECTED IS IN DEV TABLE. YES, F6D00440
    00522 0 07400 4 00142 107 A13 TSXSDEV,4 F6D00970
    00531 0 07400 4 00142 115TSXSDEV,4 F6D01040
    00546 0 07400 4 00142 129TSXSDEV,4 STORE LOCATION AS ZERO. F6D01170
    00566 0 07400 4 00142 150TSXSDEV,4 GO TO SEARCH DEV TABLE FOR ARRAY NAME F6D01340
    00252 0 07400 4 00142 44TSXSDEV,4 DEV TABLE F6F00390
    00337 0 07400 4 00142 99TSXSDEV,4 GO SEARCH DEV FOR IT. F6F00794
    00373 0 07400 4 00142 125TSXSDEV,4 SEARCH DEV TABLE. F6G01190
    00250 0 07400 4 00142 41TSXSDEV,4 DEV TABLE. F6H00370
    00310 0 07400 4 00142 71TSXSDEV,4 OBTAIN LOC FROM F6N00680
␣␣SOPR = 768
  1. Definition
    01400 160 SOPR BSS12 F6B01460
  2. External references (2)
    01400 9ORGSOPR F6M00040
    00351 0 07400 4 01400 105 ORDOP TSXSOPR,4 SEARCH FOR OP. F6N01010
␣␣SRCH = 31
  1. Definition
    00037 1 00037 2 00037 8 SRCH TXI*,2,* OR TXL TDEV,2,0 OR TXH TTIV,2,-2 F6B00030
  2. Local references (31)
    00043 1 20000 2 00037 12TXISRCH,2,+8192 FOR A TABLE WITH N F6B00070
    00044 1 60000 2 00037 13TXISRCH,2,−8192 ENTRIES, THE SEARCH IS F6B00080
    00045 1 10000 2 00037 14TXISRCH,2,+4096 COMMENCED AT THE 2**XTH F6B00090
    00046 1 70000 2 00037 15TXISRCH,2,−4096 ENTRY, THE LATTER BEING THE F6B00100
    00047 1 04000 2 00037 16TXISRCH,2,+2048 LARGEST POWER OF 2 F6B00110
    00050 1 74000 2 00037 17TXISRCH,2,−2048 LESS THAN N. F6B00120
    00051 1 02000 2 00037 18TXISRCH,2,+1024 THEN. DEPENDING ON THE RESULTS F6800130
    00052 1 76000 2 00037 19TXISRCH,2,−1024 OF THE COMPARISON, THE SEARCH F6B00140
    00053 1 01000 2 00037 20TXISRCH,2,+512 STEPS UP, OR DOWN, BY F6B00150
    00054 1 77000 2 00037 21TXISRCH,2,−512 2**(X-1), AND MAKES F6B00160
    00055 1 00400 2 00037 22TXISRCH,2,+256 A NEW COMPARISON WITH THAT F6B00170
    00056 1 77400 2 00037 23TXISRCH,2,−256 ENTRY F6B00180
    00057 1 00200 2 00037 24TXISRCH,2,+128 IF THIS STEP OVERREACHES THE F6B00190
    00060 1 77600 2 00037 25TXISRCH,2,−128 END OF THE TABLE, IT IS TRAPPED F6B00200
    00061 1 00100 2 00037 26TXISRCH,2,+64 BY THE TXL OR TXH INSTRUCTIONS F6B00210
    00062 1 77700 2 00037 27TXISRCH,2,−64 IN SRCH F6B00220
    00063 1 00040 2 00037 28TXISRCH,2,+32 F6B00230
    00064 1 77740 2 00037 29TXISRCH,2,−32 F6B00240
    00065 1 00020 2 00037 30TXISRCH,2,+16 F6B00250
    00066 1 77760 2 00037 31TXISRCH,2,−16 INDEX REGISTER 1, WHICH F6B00260
    00067 1 00010 2 00037 32TXISRCH,2,+8 CONTAINS 2(X+3) SELECTS THE F6B00270
    00070 1 77770 2 00037 33TXISRCH,2,−8 APPROPRIATE TXI IN THIS LIST, F6B00280
    00071 1 00004 2 00037 34TXISRCH,2,+4 TO MAKE THE NEXT LEAP F6B00290
    00072 1 77774 2 00037 35TXISRCH,2,−4 FORWARDS OR BACKWARDS IN F6B00300
    00073 1 00002 2 00037 36TXISRCH,2,+2 THE TABLE. F6B00310
    00074 1 77776 2 00037 37TXISRCH,2,−2 F6B00320
    00075 1 00001 2 00037 38TXISRCH,2,+1 INDEX REGISTER 2 SELECTS THE F6B00330
    00076 1 77777 2 00037 39TXISRCH,2,−1 TABLE ENTRY FOR COMPARISON. F6B00340
    00104−0 60000 0 00037 45STQSRCH TABLE F6B00400
    00125−0 60000 0 00037 62STQSRCH F6B00570
    00143−0 60000 0 00037 76STQSRCH TABLE F6B00710
  3. External reference
    01401−0 60000 0 00037 11STQSRCH F6M00060
␣␣STEV = 67
  1. Definition
    00103 0 56000 0 00120 44 STEV LDQTEVL ENTER HERE TO SEARCH TEV. F6B00390
  2. External references (2)
    00374 0 07400 4 00103 126TSXSTEV,4 NOT IN. GO TO SEARCH TEV TABLE. F6G01200
    00311 0 07400 4 00103 72TSXSTEV,4 TEV OR DEV. F6N00690
␣␣STIV = 81
  1. Definition
    00121 0 76700 0 00017 58 STIV ALS15 ENTER HERE TO SEARCH TIV. F6B00530
  2. External references (7)
    00345 0 07400 4 00121 102TSXSTIV,4 ASSIGN CONSTANTS(5). ASSEMBLE SYMBOL AND F6G00970
    00361 0 07400 4 00121 114 SA7 TSXSTIV,4 PUT IN TIV TABLE F6G01090
    00455 0 07400 4 00121 177TSXSTIV,4 IS SYMBOL IN TIV. F6G01700
    00473 0 07400 4 00121 191TSXSTIV,4 NO F6G01840
    00276 0 07400 4 00121 61 SA7 TSXSTIV,4 TIV. F6N00580
    00532 0 07400 4 00121 218TSXSTIV,4 F6N02140
    00542 0 07400 4 00121 226TSXSTIV,4 F6N02220
␣␣TDEV = 102
  1. Definition
    00146 0 34000 2 77777 79 TDEV CASDEV,2 F6B00740
  2. Local reference
    00155−3 00000 2 00146 86 DEVL TXLTDEV,2,**+0 CONTAINS TABLE LENGTH F6B00810
  3. External reference
    00214−0 40000 0 00146 13SBMTDEV DEA TABLE TO MOVE F6G00080
␣␣TEVL = 80
  1. Definition
    00120−3 00000 2 00107 57 TEVL TXLTTEV,2,**+0 F6B00520
  2. Local reference
    00103 0 56000 0 00120 44 STEV LDQTEVL ENTER HERE TO SEARCH TEV. F6B00390
  3. External references (5)
    00525−0 53400 1 00120 219 EOF LXDTEVL,1 AT END OF CIT TAPE. F6G02120
    00610−0 53400 2 00120 270LXDTEVL,2 F6G02630
    00612−0 63400 2 00120 272 ETEV2 SXDTEVL,2 F6G02650
    00244−0 53400 1 00120 39LXDTEVL,1 SET XR1 WITH WD. COUNT OF TEV ENTRIES. F6J00360
    00324−0 53400 1 00120 89 J1 LXDTEVL,1 ANY TEV ENTRIES. F6K00820
␣␣TEVS = 79
  1. Definition
    00117 0 00000 0 00004 56 TEVS 4,0,**+0 F6B00510
  2. Local references (2)
    00105 0 53400 1 00117 46LXATEVS,1 CONTROLS HOPP1NG WITHIN TEV. F6B00410
    00106−0 53400 2 00117 47LXDTEVS,2 SELECTS ITEM FOR COMPARISON. F6B00420
  3. External references (2)
    00614−0 50000 0 00117 274CALTEVS F6G02670
    00616 0 60200 0 00117 276SLWTEVS F6G02690
␣␣TIVL = 97
  1. Definition
    00141 3 77776 2 00130 74 TIVL TXHTTIV,2,**−2 F6B00690
  2. Local reference
    00124 0 56000 0 00141 61LDQTIVL F6B00560
  3. External references (4)
    00534−0 53400 2 00141 226 DIVL LXDTIVL,2 ANY ENTRIES IN TIV TABLE. F6G02190
    00634−0 53400 2 00141 290LXDTIVL,2 F6G02830
    00636−0 63400 2 00141 292 ETIV2 SXDTIVL,2 F6G02850
    00257−0 53400 1 00141 51 A6 LXDTIVL,1 ANY SYMBOLS IN TIV. F6J00470
␣␣TIVS = 96
  1. Definition
    00140 0 77777 0 00004 73 TIVS 4,0,**−1 F6B00680
  2. Local references (2)
    00126 0 53400 1 00140 63LXATIVS,1 F6B00580
    00127−0 53400 2 00140 64LXDTIVS,2 F6B00590
  3. External references (2)
    00641−0 50000 0 00140 295CALTIVS F6G02880
    00643 0 60200 0 00140 297SLWTIVS F6G02900
␣␣TTEV = 71
  1. Definition
    U00107 0 34000 2 48 TTEV CASTEV,2 F6B00430
  2. Local reference
    00120−3 00000 2 00107 57 TEVL TXLTTEV,2,**+0 F6B00520
  3. External references (2)
    00237 0 62100 0 00107 32STATTEV COMPUTING ADDRESS OF F6G00270
    00332 0 50000 0 00107 95 D1 CLATTEV SET ADDRESS OF D5 EQUAL TO LOCATION OF F6K00880
␣␣TTIV = 88
  1. Definition
    00130 0 50000 2 02114 65 TTIV CLATIV,2 F6B00600
  2. Reference
    00141 3 77776 2 00130 74 TIVL TXHTTIV,2,**−2 F6B00690
␣␣ZERO = 113
  1. Definition
    00161+000000000000 90 ZERO DEC0000000000 F6B00850
␣ABSOP = 1100
  1. Definition
    02114 162 ABSOP BES160 F6B01480
  2. External references (2)
    01410−0 50000 2 02114 19 OPRF CALABSOP,2 SELECT ABS0LUTE OP AND RETURN F6M00130
    01720 148ORGABSOP−N F6M01420
␣BPCH1 = 176
  1. Definition
    00260 0 76200 0 00202 151 BPCH1 RTD2 SKIP A BCD FILE. F6B01442
  2. References (2)
    00230 0 02000 0 00260 128 B1 TRABPCH1 GO SKIP BCD FILE F6B01230
    00264 0 02000 0 00260 155TRABPCH1 END OF RECORD F6B01445
␣DOLSI = 132
  1. Definition
    00204+077777077777 109 DOLSI OCT077777077777 F6B01040
  2. External references (6)
    00377 0 50000 0 00204 130 LIB3 CLADOLSI SET LOCATION EQUAL TO ADDR. PART OF DOLSI F6G01230
    00401 0 50000 0 00204 132 LIB4 CLADOLSI F6G01250
    00506 0 62100 0 00204 202STADOLSI F6G01950
    00512 0 62200 0 00204 206STDDOLSI F6G01990
    00314 0 50000 0 00204 75 LIB10 CLADOLSI LOCATION FROM ADDRESS OF DOLSI. F6N00720
    00316 0 50000 0 00204 77 LIB11 CLADOLSI F6N00740
␣ENTRY = 112
  1. Definition
    00160 0 00000 0 00000 89 ENTRY HTR0 F6B00840
  2. Local reference
    00122 0 60200 0 00160 59SLWENTRY F6B00540
  3. External references (8)
    00212 0 60100 0 00160 14STOENTRY SAVE ITEM TO BE ENTERED F6C00060
    00226−0 50000 0 00160 26CALENTRY OF ENTRY. IF TEST SHOWS THAT ENTRY F6C00180
    00273 0 60100 0 00160 63STOENTRY F6F00560
    00307−0 50000 0 00160 75CALENTRY F6F00680
    00463 0 62100 0 00160 183STAENTRY LOCATION AND STORE F6G01760
    00607 0 60100 0 00160 269STOENTRY F6G02620
    00623−0 50000 0 00160 281CALENTRY F6G02740
    00650−0 50000 0 00160 302CALENTRY F6G02950
␣IFTXH = 34
  1. Definition
    00042 1 77776 1 00101 11 IFTXH TXIRAISE,1,−2 F6B00060
  2. Reference
    00040 0 16200 0 00042 9TQPIFTXH OR TXL TTEV DEPENDING ON TABLE AND F6B00040
␣LOCV3 = 183
  1. Definition
    00267+000000000003 158 LOCV3 DEC3 F6B01449
  2. Reference
    00265 0 53400 1 00267 156 PREPR LXALOCV3,1 F6B01447
␣LOWER = 66
  1. Definition
    00102 0 02000 1 00102 43 LOWER TRALOWER,1 F6B00380
  2. Local references (5)
    00041 1 77776 1 00102 10TXILOWER,1,−2 ON DIRECTION OF TABLE. F6B00050
    00102 0 02000 1 00102 43 LOWER TRALOWER,1 F6B00380
    00112 1 77776 1 00102 51TXILOWER,1,−2 NOT FOUND. CONTINUE SEARCH F6B00460
    00133 1 77776 1 00102 68TXILOWER,1,−2 F6B00630
    00151 1 77776 1 00102 82TXILOWER,1,−2 NOT FOUND. CONTINUE SEARCH. F6B00770
  3. External reference
    01405 1 77776 1 00102 16TXILOWER,1,−2 NO, SELECT NEW OP FROM 0P TABLE. F6M00100
␣NOTIN = 63
  1. Definition
    00077 0 02000 4 00001 40 NOTIN TRA1,4 END OF SEARCH. F6B00350
  2. Reference
    00100 1 77777 2 00077 41TXINOTIN,2,−1 F6B00360
␣PREPR = 181
  1. Definition
    00265 0 53400 1 00267 156 PREPR LXALOCV3,1 F6B01447
  2. Reference
    00263 0 02000 0 00265 154TRAPREPR END OF FILE F6B01445
␣RAISE = 65
  1. Definition
    00101 0 02000 1 00101 42 RAISE TRARAISE,1 F6B00370
  2. Local references (5)
    00042 1 77776 1 00101 11 IFTXH TXIRAISE,1,−2 F6B00060
    00101 0 02000 1 00101 42 RAISE TRARAISE,1 F6B00370
    00110 1 77776 1 00101 49TXIRAISE,1,−2 NOT FOUND. CONTINUE SEARCH F6B00440
    00135 1 77776 1 00101 70TXIRAISE,1,−2 F6B00650
    00147 1 77776 1 00101 80TXIRAISE,1,−2 NOT FOUND CONTINUE SEARCH F6B00750
  3. External reference
    01407 1 77776 1 00101 18TXIRAISE,1,−2 F6M00120
␣START = 136
  1. Definition
    00210 0 53400 2 00255 112 START LXAADD5,2 SET DRUM ERROR COUNTER TO 15 F6B01070
␣SYMOP = 940
  1. Definition
    01654 161 SYMOP BES160 F6B01470
  2. External references (2)
    01404 0 34000 2 01654 15 OPRT CASSYMOP,2 F6M00090
    01460 23ORGSYMOP−N F6M00170
␣UPPER = 30087
  1. Definition
    72607 166 UPPER BES600 F6B01510
  2. External references (20)
    00414 0 70000 4 72606 152 UP16 CPYUPPER−1,4 READ IN COMMON TABLE. F6C01350
    00423 0 50000 0 72605 159CLAUPPER−2 STORE WORD COUNT OF COMMON F6C01420
    00506 0 50000 0 72605 211CLAUPPER−2, IF WORD COUNT OF COMMON TABLE F6C01930
    00516 0 34000 2 72604 219CASUPPER−3,2 WITH WORD IN COMMON F6C02010
    00536 0 50000 0 72605 239CLAUPPER−2 XR1 WILL CONATIN COUNT OF COMMON WDS PROCESSED.F6C02170
    00544 0 50000 1 72604 245 UP24 CLAUPPER−3,1 A COMMON ENTRY INTO AC. F6C02230
    00556 0 50000 1 72604 256CLAUPPER−3,1 COMPARE COMMON SYMBOL JUST ENTERED IN DEV TABLEF6C02330
    00405 0 70000 0 72605 24CPYUPPER−2 F6D00190
    00406 0 70000 0 72605 25CPYUPPER−2 LOAD INDEX REG 1 WITH WORD COUNT OF F6D00200
    00407−0 53400 1 72605 26 A23 LXDUPPER−2,1 TRANSFER VECTOR TABLE. F6D00210
    00415−0 70000 1 72605 32 A30 CADUPPER−2,1 F6D00270
    00426 0 50000 0 72605 42 A25 CLAUPPER−2 REDUCE WD COUNT OF TRANSFER VECTOR BY ONE F6D00360
    00434 0 50000 1 72604 48CLAUPPER−3,1 SELECT A TRANSFER VECTOR NAME. F6D00420
    00464 0 70000 4 72606 76 A4 CPYUPPER−1,4 ANO READ SUBDEF TABLE. F6D00670
    00501 0 50000 0 72605 89 A6 CLAUPPER−2 LEAVES WD CT. OF SENT. IN XR1. F6D00800
    00514 0 34000 2 72603 100CASUPPER−4,2 WITH LIST OF ARGUMENTS IN SUBDEF TABLE. F6D00910
    00600 0 34000 2 72603 161CASUPPER−4,2 F6D01440
    00631 0 50000 0 72605 190 DPCH1 CLAUPPER−2 F6D01691
    00325 0 50000 0 72605 89 FPCH1 CLAUPPER−2 WORD COUNT OF SUBDEF TABLE. F6F00784
    00336 0 50000 1 72604 98CLAUPPER−3,1 SELECT ARGUMENT. F6F00793