␣␣␣␣AX = 779
  1. Definition
    A01413 0 00000 0 00000 506 AX HTR F2405030
  2. References (2)
    00506−0 63400 1 01413 37SXDAX,1 F2400340
    00512−0 53400 1 01413 41LXDAX,1 F2400380
␣␣␣␣BX = 780
  1. Definition
    A01414 0 00000 0 00000 507 BX HTR F2405040
  2. References (2)
    00505−0 63400 2 01414 36 ENTRY SXDBX,2 F2400330
    00511−0 53400 2 01414 40LXDBX,2 LOAD VALUE. F2400370
␣␣␣␣C1 = 457
  1. Definition
    00711 0 76200 0 00302 169 C1 RDS194 . F2401650
  2. Reference
    00733 2 00001 2 00711 187 C6 TIXC1,2,1 ERROR. TRY TO READ 3 TIMES. F2401830
␣␣␣␣C2 = 467
  1. Definition
    00723 0 62200 0 01071 179 C2 STDFC08+1 FIXCON SEARCH ROUTINE F2401750
  2. Reference
    00732 0 02000 0 00723 186TRAC2 STORE ZERO AS END TEST F2401820
␣␣␣␣C4 = 469
  1. Definition
    00725 0 76200 0 00302 181 C4 RDS194 FIXCON IS EMPTY. F2401770
  2. Reference
    00720 0 10000 0 00725 176TZEC4 YES F2401720
␣␣␣␣C6 = 475
  1. Definition
    00733 2 00001 2 00711 187 C6 TIXC1,2,1 ERROR. TRY TO READ 3 TIMES. F2401830
  2. Reference
    00716−0 10000 0 00733 174TNZC6 ERROR. F2401700
␣␣␣␣S2 = 408
  1. Definition
    00630 0 50000 0 00177 119 S2 CLAWRKSC+3 F2401150
  2. Reference
    00616 0 10000 0 00630 109TZES2 NO SYMBOL PRESENT F2401050
␣␣␣␣S3 = 421
  1. Definition
    00645 0 50000 0 00201 132 S3 CLAWRKSC+5 TEST FOR 3RD SUBSCRIPT F2401280
  2. Reference
    00631 0 10000 0 00645 120TZES3 TRA IF NO 2ND SUBSC, SYMBOL F2401160
␣␣␣AD1 = 769
  1. Definition
    A01401 0 00000 0 00000 496 AD1 HTR F2404930
  2. References (9)
    00537 0 60100 0 01401 62STOAD1 ITS CHECKSUM ON DRUM, IN F2400590
    00540 0 70000 0 01401 63CPYAD1 ITS ORIGINAL POSITION, AT THE F2400600
    00541 0 70000 0 01401 64CPYAD1 BEGINNING. F2400610
    01062 0 60100 0 01401 282STOAD1 AND ODD NUMBERED ENTRIES. F2402780
    01067 0 46000 0 01401 287LDAAD1 F2402830
    01103 0 50000 0 01401 299CLAAD1 ADJUST DRUM ADDRESS F2402950
    01105 0 60100 0 01401 301STOAD1 F2402970
    01121 0 60100 0 01401 313STOAD1 F2403090
    01123 0 46000 0 01401 315LDAAD1 WRITE NEW FIXCON AND F2403110
␣␣␣BOB = 132
  1. Definition
    00204 13 BOB BSS152 F2400100
  2. References (5)
    00501 0 50000 2 00204 32REPETE CLABOB,2 SELECT TABLE IRV ENTRY. F2400290
    00515 0 50000 2 00204 44CLABOB,2 REDUNDANT. F2400410
    00761 0 70000 2 00434 210 CPY CPYBOB+152,2 READ 150 TABLE ENTRIES. F2402060
    00774 0 36100 4 00204 221ACCSUH ACLBOB,4 FORM LOGICAL CHECKSUM OF F2402170
    01001 0 40200 4 00204 226SUBBOB,4 DRUM CHECKSUM FOLLOWS LAST ENTRY. F2402220
␣␣␣BST = 362
  1. Definition
    00552 0 76400 0 00222 73 BST BST146 THAT THIS BLOCK COMPILED. F2400700
  2. References (2)
    00551 1 00003 1 00552 72TXIBST,1,3 UNTIL 1ST CIT RECORD F2400690
    00553 2 00001 1 00552 74TIXBST,1,1 F2400710
␣␣␣CIB = 24
  1. Definition
    00030 11 CIB BSS100 F2400080
  2. References (2)
    01030 0 70000 1 00030 251 CIT01 CPYCIB,1 F2402470
    01036 0 60100 2 00030 257STOCIB,2 F2402530
␣␣␣CIT = 525
  1. Definition
    238ROUT1NE WRITES CIT BUFFER 0N TAPE ,IF FULL, THEN ENTERS F2402340
    239NEW CIT INTO BUFFER. F2402350
    01015−0 63400 1 01046 240 CIT SXDE2C,1 F2402360
  2. References (5)
    00602 0 07400 4 01015 97TSXCIT,4 ENTER INSTR. IN CIT F2400930
    00614 0 07400 4 01015 107TSXCIT,4 ENTER INSTR. IN CIT F2401030
    00705 0 07400 4 01015 164TSXCIT,4 ENTER IN CIT TABLE F2401600
    00745 0 07400 4 01015 197TSXCIT,4 FENTER IN CIT TABLE. F2401930
    01321 0 07400 4 01015 448 LXC30 TSXCIT,4 MAKE CIT ENTRY. F2404450
␣␣␣CPY = 497
  1. Definition
    00761 0 70000 2 00434 210 CPY CPYBOB+152,2 READ 150 TABLE ENTRIES. F2402060
  2. Reference
    00762 2 00001 2 00761 211TIXCPY,2,1 F2402070
␣␣␣E2C = 550
  1. Definition
    A01046 0 00000 0 00000 265 E2C HTR F2402610
  2. References (2)
    01015−0 63400 1 01046 240 CIT SXDE2C,1 F2402360
    01042−0 53400 1 01046 261LXDE2C,1 F2402570
␣␣␣E3C = 551
  1. Definition
    A01047 0 00000 0 00000 266 E3C HTR F2402620
  2. References (2)
    01016−0 63400 2 01047 241SXDE3C,2 F2402370
    01043−0 53400 2 01047 262LXDE3C,2 RELOAD INDEX REGS, F2402580
␣␣␣END = 368
  1. Definition
    00560 0 76200 0 00221 79 END RDS145 SKIP OVER DIAGNOSTIC RECORD ON SYSTEM TAPE
  2. Reference
    00556 0 10000 0 00560 77TZEEND IT HELD BEFORE THE F2400740
␣␣␣LXC = 687
  1. Definition
    412ROUTINE COMPILES SETS OF INSTRUCTIONS, GIVEN STARTING LOCN. F2404090
    413OF APPROPRIATE SKELETON IN ACC., AND NO. OF INSTR. IN IRA F2404100
    01257−0 63400 4 01313 414 LXC SXDLXC19,4 F2404110
  2. References (3)
    00627 0 07400 4 01257 118TSXLXC,4 +(1 AREADY IN ERASABLE) F2401140
    00644 0 07400 4 01257 131TSXLXC,4 + THAT ALREADY COMPUTED. F2401270
    00663 0 07400 4 01257 146TSXLXC,4 + THAT ALREADY COMPUTED. F2401420
␣␣␣RDS = 492
  1. Definition
    00754 0 76200 0 00303 205 RDS RDS195 F2402010
  2. Reference
    01005 2 00001 1 00754 230 EROR TIXRDS,1,1 TRY TO READ THREE MORE TIMES. F2402260
␣␣␣TIX = 510
  1. Definition
    00776 2 00001 2 00774 223 TIX TIXACCSUH,2,1 F2402190
  2. Reference
    00775 1 77777 4 00776 222TXITIX,4,−1 ENTRIES F2402180
␣␣1CNT = 519
  1. Definition
    A01007 0 00000 0 00000 232 1CNT HTR F2402280
  2. References (7)
    00476−0 53400 1 01007 29LXD1CNT,1 LOAD IRA WITH NO. OF IRV ENTRIES F2400260
    00712 0 70000 0 01007 170CPY1CNT READ FIXCON WD.CT F2401660
    00714 0 50000 0 01007 172CLA1CNT F2401680
    00717 0 50000 0 01007 175CLA1CNT IS FIXCON EMPTY. F2401710
    00757 0 70000 0 01007 208CPY1CNT READ WD. CT. OF TABLE. F2402040
    00763 0 50000 0 01007 212CLA1CNT DOES WD. CT AGREE F2402080
    00766−0 53400 2 01007 215LXD1CNT,2 YES. F2402110
␣␣2CNT = 520
  1. Definition
    A01010 0 00000 0 00000 233 2CNT HTR F2402290
  2. References (4)
    00713 0 70000 0 01010 171CPY2CNT AND ITS CHECKSUM F2401670
    00715 0 40200 0 01010 173SUB2CNT TEST FOR READING ERROR. F2401690
    00760 0 70000 0 01010 209CPY2CNT READ WD. CT. CHECKSUM. F2402050
    00764 0 40200 0 01010 213SUB2CNT WITH ITS CHECKSUM. F2402090
␣␣BBOX = 549
  1. Definition
    01045 0 00000 0 00000 264 BBOX HTR0 CIT BUFFER CT. INITIALLY ZERO F2402600
  2. References (5)
    00664−0 53400 4 01045 147COMP55 LXDBBOX,4 F2401430
    00666−0 63400 4 01045 149SXDBBOX,4 F2401450
    01017−0 53400 2 01045 242LXDBBOX,2 COMPLEMENT OF CURRENT BUFFER CT. F2402380
    01021−0 53400 2 01045 244 CITSP LXDBBOX,2 F2402400
    01041−0 63400 2 01045 260SXDBBOX,2 SAVE CIT BUFFER COUNT F2402560
␣␣BCD2 = 782
  1. Definition
    01416+020000000000 509 BCD2 OCT020000000000 F2405060
  2. Reference
    01130−0 50100 0 01416 320ORABCD2 2 IN DEC.=2) FOR FIXCON TABLE, F2403160
␣␣COSE = 672
  1. Definition
    395COSE ROUTINE FORMS NAME OF EACH NONTRIVIAL COEFF. IN FIXCON F2403920
    396TABLE, AND SETS SENSE LIGHTS ACCORDINGLY. F2403930
    01240 0 53400 1 01435 397 COSE LXAL(6),1 INDEX TO SELECT SUBSCRIPTS IN TURN F2403940
  2. Reference
    00566 0 07400 4 01240 85TSXCOSE,4 OBTAIN NAME OF IOEFF. IN FIXCON. F2400810
␣␣DIAG = 4
  1. Definition
    00004 535 DIAG EQU4 F2405305
  2. References (5)
    00734 0 07400 4 00004 188TSXDIAG,4 DRUM 2 READING ERROR FIVE TIMES. F2401840
    01006 0 07400 4 00004 231TSXDIAG,4 DRUM 3 READING ERROR FIVE TIMES. F2402270
    01076 0 07400 4 00004 294TSXDIAG,4 OBVIATED BY TLQ. F2402900
    01141 0 07400 4 00004 329STOPFC TSXDIAG,4 DRUM 2 READING ERROR FIVE TIMES. F2403250
    01231 0 07400 4 00004 388TSXDIAG,4 DRUM 4 READING ERROR 5 TIMES. F2403850
␣␣EROR = 517
  1. Definition
    01005 2 00001 1 00754 230 EROR TIXRDS,1,1 TRY TO READ THREE MORE TIMES. F2402260
  2. References (2)
    00765−0 10000 0 01005 214TNZEROR NO. ERROR. F2402100
    01002−0 10000 0 01005 227TNZEROR NOT EQUAL F2402230
␣␣FC02 = 561
  1. Definition
    01061 0 50000 0 01142 281 FC02 CLAORIGIN INITIALISE AD1 T0 SELECT 1ST ENTRY F2402770
  2. Reference
    01140 2 00001 4 01061 328TIXFC02,4,1 ERROR. TRY 3 TIMES. F2403240
␣␣FC04 = 565
  1. Definition
    01065 0 50000 0 01406 285 FC04 CLAERDRM1 REQD. FIXCON F2402810
  2. Reference
    D01107−3 00000 0 01065 303 FC29 TXLFC04,0 TRA TO MAKE 2ND PASS. SAVED IRA IN DEC F2402990
␣␣FC08 = 568
  1. Definition
    01070 0 70000 0 01407 288 FC08 CPYCPYWD1 F2402840
  2. References (5)
    00532 0 50000 0 01071 57CLAFC08+1 FIXCON WORD COUNT F2400540
    00723 0 62200 0 01071 179 C2 STDFC08+1 FIXCON SEARCH ROUTINE F2401750
    01101 1 00002 1 01070 297 FC24 TXIFC08,1,2 INCREASE COUNT OF WORDS TESTED. F2402930
    01113−0 53400 1 01071 307LXDFC08+1,1 F2403030
    01115−0 63400 1 01071 309 FC42 SXDFC08+1,1 STORE AS NEW TEST. F2403050
␣␣FC18 = 575
  1. Definition
    D01077−3 00000 0 01135 295 FC18 TXLFC60,0 SAVED IRB IN DECR. MATCH FOUND. F2402910
  2. References (2)
    01055−0 63400 2 01077 277SXDFC18,2 F2402730
    01132−0 53400 2 01077 322LXDFC18,2 IN ADDRESS. F2403180
␣␣FC20 = 576
  1. Definition
    01100 0 70000 0 01405 296 FC20 CPYERDRM FALSE COPY, NO MATCH F2402920
  2. Reference
    D01111−3 00000 0 01100 305 FC34 TXLFC20,0 DECR, CONTAINS ROUTINE LINKAGE. F2403010
␣␣FC24 = 577
  1. Definition
    01101 1 00002 1 01070 297 FC24 TXIFC08,1,2 INCREASE COUNT OF WORDS TESTED. F2402930
  2. Reference
    D01071 3 00000 1 01102 289TXHFC24+1,1 DECR IS WD.CT OF FIXCON TABLE (INITFX) F2402850
␣␣FC28 = 582
  1. Definition
    01106 0 53400 1 01430 302 FC28 LXAL(1),1 INITIALISE COUNT THROUGH TABLE F2402980
␣␣FC29 = 583
  1. Definition
    D01107−3 00000 0 01065 303 FC29 TXLFC04,0 TRA TO MAKE 2ND PASS. SAVED IRA IN DEC F2402990
  2. References (2)
    01054−0 63400 1 01107 276FIXCON SXDFC29,1 F2402720
    01131−0 53400 1 01107 321LXDFC29,1 AND ENTRY NO WITHIN TABLE, F2403170
␣␣FC30 = 584
  1. Definition
    01110 0 70000 0 01405 304 FC30 CPYERDRM FALSE COPY. F2403000
  2. Reference
    01073 0 04000 0 01110 291TLQFC30 TRA IF ENTRY DOES NOT MATCH FIXCON F2402870
␣␣FC34 = 585
  1. Definition
    D01111−3 00000 0 01100 305 FC34 TXLFC20,0 DECR, CONTAINS ROUTINE LINKAGE. F2403010
  2. References (2)
    01056−0 63400 4 01111 278SXDFC34,4 F2402740
    01133−0 53400 4 01111 323LXDFC34,4 RESTORE INDEX. F2403190
␣␣FC40 = 586
  1. Definition
    01112 0 60100 0 01407 306 FC40 STOCPYWD1 SEARCH COMPLETED. NO MATCH. F2403020
  2. Reference
    01102−2 00001 2 01112 298TNXFC40,2,1 BOTH PASSES ARE COMPLETED. F2402940
␣␣FC42 = 589
  1. Definition
    01115−0 63400 1 01071 309 FC42 SXDFC08+1,1 STORE AS NEW TEST. F2403050
  2. Reference
    01114 1 00001 1 01115 308TXIFC42,1,1 INCREASE FIXCON WD. COUNT AND F2403040
␣␣FC50 = 598
  1. Definition
    01126−0 75400 1 00000 318 FC50 PXD0,1 FORM NAME OF CONSTANT F2403140
  2. Reference
    01137 0 10000 0 01126 327TZEFC50 DRUM READ CQRRECTLY. F2403230
␣␣FC60 = 605
  1. Definition
    01135 0 50000 0 01407 325 FC60 CLACPYWD1 MATCH FOUND. TEST DRUM READ. F2403210
  2. Reference
    D01077−3 00000 0 01135 295 FC18 TXLFC60,0 SAVED IRB IN DECR. MATCH FOUND. F2402910
␣␣L(0) = 791
  1. Definition
    01427 0 00000 0 00000 518 L(0) HTR0 F2405150
  2. References (12)
    00500−0 53400 2 01427 31LXDL(0),2 BEGIN WITH FIRST TABLE BOB ENTRY. F2400280
    00675 0 50000 0 01427 156CLAL(0) TO STORE THE RESULTS OF F2401520
    00726 0 70000 0 01427 182CPYL(0) SET FIRST FOUR LOCATIONS F2401780
    00727 0 70000 0 01427 183CPYL(0) TO F2401790
    00730 0 70000 0 01427 184CPYL(0) ZERO. F2401800
    00731 0 70000 0 01427 185CPYL(0) F2401810
    00735 0 50000 0 01427 189LINKTR CLAL(0) F2401850
    01027 0 53400 1 01427 250LXAL(0),1 WRITE CIT BUFFER ON TAPE. F2402460
    01063 0 53400 1 01427 283LXAL(0),1 INITIALISE COUNT THROUGH TABLE F2402790
    01265 0 50000 0 01427 420 LXC08 CLAL(0) SET CIT SYMBOLIC LOCN. TO ZERO F2404170
    01277 0 50000 0 01427 430CLAL(0) F2404270
    01317 0 50000 0 01427 446CLAL(0) STORE ZERO AS F2404430
␣␣L(1) = 792
  1. Definition
    01430 0 00000 0 00001 519 L(1) HTR1 F2405160
  2. References (3)
    00470 0 50000 0 01430 23START1 CLAL(1) SAVE STATUS OF SENSE-LIGHT3 F2400200
    01024 0 40000 0 01430 247ADDL(1) UPDATE CIT RECORD COUNT. F2402430
    01106 0 53400 1 01430 302 FC28 LXAL(1),1 INITIALISE COUNT THROUGH TABLE F2402980
␣␣L(2) = 793
  1. Definition
    01431 0 00000 0 00002 520 L(2) HTR2 F2405170
  2. References (3)
    00721 0 40200 0 01431 177SUBL(2) F2401730
    01064 0 53400 2 01431 284LXAL(2),2 INITIALISES FOR TWO FIXCON PASSES F2402800
    01104 0 40000 0 01431 300ADDL(2) TO TEST EVEN NUMBERED ENTRIES F2402960
␣␣L(3) = 794
  1. Definition
    01432 0 00000 0 00003 521 L(3) HTR3 F2405180
  2. References (2)
    00574 0 50000 0 01432 91CLAL(3) WITH ZERO TAG, F2400870
    01241 0 53400 2 01432 398LXAL(3),2 INITIALISE SENSE LT. SELECTION. F2403950
␣␣L(4) = 795
  1. Definition
    01433 0 00000 0 00004 522 L(4) HTR4 F2405190
  2. References (2)
    00620 0 53400 1 01433 111LXAL(4),1 INDEX FOR NO. OF COMPILED INSTR. F2401070
    01034 0 53400 1 01433 255 CIT04 LXAL(4),1 F2402510
␣␣L(5) = 796
  1. Definition
    01434 0 00000 0 00005 523 L(5) HTR5 F2405193
  2. References (4)
    00710 0 53400 2 01434 168INITFX LXAL(5),2 LOAD READING ERROR COUNTER. F2401640
    00752 0 53400 1 01434 203RDRM LXAL(5),1 LOAD ERROR COUNTER. F2401990
    01060 0 53400 4 01434 280LXAL(5),4 INITIALIZE DRUM ERROR COUNTER. F2402760
    01144 0 53400 1 01434 335LXAL(5),1 INITIALIZE DRUM ERROR COUNTER. F2403310
␣␣L(6) = 797
  1. Definition
    01435 0 00000 0 00006 524 L(6) HTR6 F2405200
  2. References (3)
    00636 0 53400 1 01435 125LXAL(6),1 6 INSTR. TO BE COMPILED F2401210
    00655 0 53400 1 01435 140LXAL(6),1 6 INSTR. TO BE COMPILED F2401360
    01240 0 53400 1 01435 397 COSE LXAL(6),1 INDEX TO SELECT SUBSCRIPTS IN TURN F2403940
␣␣RDRM = 490
  1. Definition
    202ROUTINE READS AND CHECKS TABLE IRV (ALSO CALLED BOB) F2401980
    00752 0 53400 1 01434 203RDRM LXAL(5),1 LOAD ERROR COUNTER. F2401990
  2. Reference
    00474 0 07400 4 00752 27 START TSXRDRM,4 READ TABLE IRV (BOB ALSO) F2400240
␣␣TAG1 = 766
  1. Definition
    A01376 0 00000 0 00000 493 TAG1 HTR F2404900
  2. References (3)
    00504 0 62100 0 01376 35STATAG1 IN TAG1. F2400320
    00521 0 40200 0 01376 48SUBTAG1 THROUGH F2400450
    00525 0 60100 0 01376 52STOTAG1 F2400490
␣␣TAG2 = 767
  1. Definition
    A01377 0 00000 0 00000 494 TAG2 HTR F2404910
  2. References (2)
    00520 0 62100 0 01377 47STATAG2 THE INSTRUCTIONS FROM HERE F2400440
    00524 0 50000 0 01377 51CLATAG2 REDUNDANT. F2400480
␣␣TEST = 332
  1. Definition
    00514−2 00001 1 00531 43 TEST TNXFINISH,1,1 END OF TABLE IRV. F2400400
  2. References (2)
    00513 1 77777 2 00514 42TXITEST,2,−1 STEP DOWN COUNT THROUGH TABLE IRV. F2400390
    00530 0 02000 0 00513 55TRATEST−1 F2400520
␣1XB0X = 770
  1. Definition
    A01402 0 00000 0 00000 497 1XB0X HTR F2404940
  2. References (3)
    00562−0 63400 1 01402 81COMPIL SXD1XB0X,1 F2400770
    00670−0 53400 1 01402 151LXD1XB0X,1 LOADING VALUE FOR SUBSCRIPT COMB. F2401470
    00671−0 53400 2 01402 152LXD1XB0X,2 F2401480
␣2XB0X = 771
  1. Definition
    A01403 0 00000 0 00000 498 2XB0X HTR F2404950
  2. Reference
    00563−0 63400 2 01403 82SXD2XB0X,2 F2400780
␣6ONES = 786
  1. Definition
    01422−370000000000 513 6ONES OCT770000000000 F2405100
  2. References (4)
    00572−0 32000 0 01422 89ANA6ONES F2400850
    00607−0 32000 0 01422 102ANA6ONES STO 1)+3 F2400980
    01302−0 32000 0 01422 433ANA6ONES SYMBOLIC ADDRESS OF THE TYPE F2404300
    01311−0 50000 0 01422 440CAL6ONES PLACING ADDEND IN REL. ADDRESS F2404370
␣BCD10 = 784
  1. Definition
    01420+120000000000 511 BCD10 OCT120000000000 F2405080
  2. Reference
    00600−0 50100 0 01420 95ORABCD10 F2400910
␣BCD14 = 783
  1. Definition
    01417+140000000000 510 BCD14 OCT140000000000 F2405070
  2. Reference
    00703−0 50100 0 01417 162ORABCD14 F2401580
␣BIT01 = 787
  1. Definition
    01423−200000000000 514 BIT01 OCT600000000000 F2405110
  2. Reference
    01304−0 32000 0 01423 435ANABIT01 STORAGE F2404320
␣CIL00 = 552
  1. Definition
    01050 267 CIL00 BSS1 SYMBOLIC LOCN OF CIT F2402630
  2. References (6)
    00601 0 60100 0 01050 96STOLOC STOCIL00 10)+NAME1 F240A920
    00613 0 60100 0 01050 106STOCIL00 F2401020
    00676 0 60100 0 01050 157STOCIL00 THE SUBROUTINE COMPILATION IN F2401530
    00736 0 60100 0 01050 190STOCIL00 THIS ROUTINE COMPILES F2401860
    01035 0 50000 1 01054 256 CIT05 CLACIL00+4,1 STORE 4WD CIT IN 8UFFER. F2402520
    01266 0 60100 0 01050 421STOCIL00 F2404180
␣CIL01 = 553
  1. Definition
    01051 268 CIL01 BSS1 OP.DAND DEC. OF CIT. F2402640
  2. References (5)
    00570 0 60100 0 01051 87STOCIL01 THIS ROUTINE COMPILES F2400830
    00604 0 60100 0 01051 99STOCIL01 THIS ROUTINE COMPILES THE F2400950
    00701 0 60100 0 01051 160STOCIL01 F2401560
    00741 0 60100 0 01051 193STOCIL01 ROUTINE. F2401890
    01272−0 60000 0 01051 425STQCIL01 STORE OPERATION F2404220
␣CIL02 = 554
  1. Definition
    01052 269 CIL02 BSS1 SYMBOLIC ADDRESS OF CIT F2402650
  2. References (9)
    00573 0 60100 0 01052 90STOCIL02 CLA 6)+3, F2400860
    00611 0 60100 0 01052 104STOCIL02 1 IN ERASABLE STORAGE F2401000
    00704 0 60100 0 01052 163STOCIL02 F2401590
    00737 0 60100 0 01052 191STOCIL02 INSTRUCTION FOR RETURN F2401870
    01276 0 60100 0 01052 429STOCIL02 OF CIT. F2404260
    01301−0 50000 0 01052 432CALCIL02 TEST FOR A COT F2404290
    01306−0 50000 0 01052 437CALCIL02 YES. SEPARATE ADDRESS LEAVING THE F2404340
    01312 0 32000 0 01052 441ANSCIL02 POSITION. F2404380
    01320 0 60100 0 01052 447STOCIL02 SYMBOLIC ADDRESS. F2404440
␣CIL03 = 555
  1. Definition
    01053 270 CIL03 BSS1 REL. ADDRESS AND TAG. F2402660
  2. References (7)
    00576 0 60100 0 01053 93STOCIL03 TOGETHER WITH A SYMBOLIC F2400890
    00610−0 63400 1 01053 103SXDCIL03,1 THESE COMPILED INSTR. PLACE F2400990
    00677 0 60100 0 01053 158STOCIL03 THE TAG NAME. F2401540
    00743 0 60100 0 01053 195STOCIL03 F2401910
    01300 0 60100 0 01053 431STOCIL03 SET CIT TAG TO ZERO. F2404280
    01310 0 62200 0 01053 439STDCIL03 ADDRESS POSN. ALONE, AND F2404360
    01316 0 60100 0 01053 445STOCIL03 STORE ADDRESS IN CIT REL. ADDRESS. F2404420
␣CIT01 = 536
  1. Definition
    01030 0 70000 1 00030 251 CIT01 CPYCIB,1 F2402470
  2. Reference
    01033 3 00001 2 01030 254 CIT03 TXHCIT01,2,1 TEST FOR BUFFER END F2402500
␣CIT02 = 538
  1. Definition
    01032 1 00001 2 01033 253 CIT02 TXICIT03,2,1 STEP BUFFER COUNT BACK TO ZERO F2402490
  2. Reference
    01031 1 77777 1 01032 252TXICIT02,1,−1 F2402480
␣CIT03 = 539
  1. Definition
    01033 3 00001 2 01030 254 CIT03 TXHCIT01,2,1 TEST FOR BUFFER END F2402500
  2. Reference
    01032 1 00001 2 01033 253 CIT02 TXICIT03,2,1 STEP BUFFER COUNT BACK TO ZERO F2402490
␣CIT04 = 540
  1. Definition
    01034 0 53400 1 01433 255 CIT04 LXAL(4),1 F2402510
  2. References (2)
    01020 3 77634 2 01034 243TXHCIT04,2,−100 BUFFER NEITHER FULL NOR ZERO F2402390
    01022−3 00000 2 01034 245TXLCIT04,2,0 TRA IF BUFFER CT ZERO F2402410
␣CIT05 = 541
  1. Definition
    01035 0 50000 1 01054 256 CIT05 CLACIL00+4,1 STORE 4WD CIT IN 8UFFER. F2402520
  2. Reference
    01040 2 00001 1 01035 259 CIT07 TIXCIT05,1,1 F2402550
␣CIT07 = 544
  1. Definition
    01040 2 00001 1 01035 259 CIT07 TIXCIT05,1,1 F2402550
  2. Reference
    01037 1 77777 2 01040 258TXICIT07,2,−1 UPDATE CIT BUFFER COUNT F2402540
␣CITSP = 529
  1. Definition
    01021−0 53400 2 01045 244 CITSP LXDBBOX,2 F2402400
  2. Reference
    00542 0 07400 4 01021 65TSXCITSP,4 WRITE CIT BUFFER ON TAPE F2400620
␣COSE5 = 675
  1. Definition
    01243 0 50000 1 00202 400 COSE5 CLAWRKSC+6,1 SELECT A S.C. COEFF. F2403970
  2. Reference
    01254 2 00001 2 01243 409COSE10 TIXCOSE5,2,1 REPEAT FOR ALL SUBSCRIPTS. F2404060
␣ENTRY = 325
  1. Definition
    00505−0 63400 2 01414 36 ENTRY SXDBX,2 F2400330
  2. Reference
    00526 0 02000 0 00505 53TRAENTRY F2400500
␣EQUAL = 343
  1. Definition
    00527 0 07400 4 00674 54 EQUAL TSXSTOTP,4 F2400510
  2. Reference
    00522 0 10000 0 00527 49TZEEQUAL TRA ENTRY F2400460
␣ERDRM = 773
  1. Definition
    A01405 0 00000 0 00000 500 ERDRM HTR F2404970
  2. References (3)
    01074 0 70000 0 01405 292CPYERDRM FALSE COPY. F2402880
    01100 0 70000 0 01405 296 FC20 CPYERDRM FALSE COPY, NO MATCH F2402920
    01110 0 70000 0 01405 304 FC30 CPYERDRM FALSE COPY. F2403000
␣ERLXC = 778
  1. Definition
    A01412 0 00000 0 00000 505 ERLXC HTR F2405020
  2. References (2)
    01260 0 60100 0 01412 415STOERLXC SAVE LOCATION OF INSTR. SKELETON. F2404120
    01263 0 40000 0 01412 418ADDERLXC FORM ADDRESS WHICH GIVES F2404150
␣KLX02 = 798
  1. Definition
    01436 0 00000 0 01327 525 KLX02 HTRLX102 SKELETON KEYS F2405210
  2. Reference
    00624 0 50000 0 01436 115COMP20 CLAKLX02 NO. COMPILE INSTR TO COMPUTE F2401110
␣KLX03 = 800
  1. Definition
    01440 0 00000 0 01347 527 KLX03 HTRLX116 F2405230
  2. Reference
    00641 0 50000 0 01440 128CLAKLX03 YES. 8 INSTR. COMPILED TO F2401240
␣KLX05 = 802
  1. Definition
    01442 0 00000 0 01365 529 KLX05 HTRLX130 F2405250
  2. Reference
    00660 0 50000 0 01442 143CLAKLX05 YES, COMPILE D1D2*C3S3-D1D2+ F2401390
␣L1304 = 524
  1. Definition
    01014 0 00000 0 02430 237L1304 HTR1304 ORG OF WD. CT OF TABLE IRV F2402330
  2. Reference
    00756 0 46000 0 01014 207LDAL1304 DRUM ADDRESS OF TABLE IS 1304 F2402030
␣L1DEC = 785
  1. Definition
    01421+000001000000 512 L1DEC OCT000001000000 F2405090
  2. References (2)
    00535 0 40000 0 01421 60ADDL1DEC F2400570
    01245 0 40200 0 01421 402SUBL1DEC F2403990
␣LINK1 = 522
  1. Definition
    A01012 0 00000 0 00000 235 LINK1 HTR F2402310
  2. References (7)
    00564−0 63400 4 01012 83SXDLINK1,4 SAVE LINKAGE F2400790
    00672−0 53400 4 01012 153LXDLINK1,4 F2401490
    00744−0 63400 4 01012 196SXDLINK1,4 F2401920
    00746−0 53400 4 01012 198LXDLINK1,4 F2401940
    00753−0 63400 4 01012 204SXDLINK1,4 SAVE ENTRY PT. F2402000
    00770−0 53400 4 01012 217LXDLINK1,4 YES. RETURN TO F2402130
    01003−0 53400 4 01012 228LXDLINK1,4 DRUM READ CORRECTLY. F2402240
␣LINK2 = 772
  1. Definition
    A01404 0 00000 0 00000 499 LINK2 HTR F2404960
  2. References (2)
    00674−0 63400 4 01404 155 STOTP SXDLINK2,4 ROUTINE COMPILES THE INSTR. F2401510
    00706−0 53400 4 01404 165LXDLINK2,4 F2401610
␣LINKC = 777
  1. Definition
    A01411 0 00000 0 00000 504 LINKC HTR F2405010
  2. References (2)
    01242−0 63400 4 01411 399SXDLINKC,4 F2403960
    01255−0 53400 4 01411 410LXDLINKC,4 F2404070
␣LOGWD = 521
  1. Definition
    A01011 0 00000 0 00000 234 LOGWD HTR F2402300
  2. References (2)
    00777 0 60200 0 01011 224SLWLOGWD F2402200
    01000 0 50000 0 01011 225CLALOGWD COMPUTED CHECKSUM. F2402210
␣LX100 = 725
  1. Definition
    01325 0 00451 2 34321 452 LX100 HTR14545,2,OR000+13 CLA. THESE WORDS F2404490
␣LX102 = 727
  1. Definition
    01327 0 00435 2 34321 454 LX102 HTR14545,2,OR000+1 CLA. CODING F2404510
  2. Reference
    01436 0 00000 0 01327 525 KLX02 HTRLX102 SKELETON KEYS F2405210
␣LX105 = 731
  1. Definition
    01333 0 00435 4 32450 458 LX105 HTR13608,4,OR000+1 LDQ. BY THE LXC F2404550
  2. Reference
    01437 0 00000 0 01333 526KLX021 HTRLX105 FOR LXC ROUTINE. F2405220
␣LX110 = 737
  1. Definition
    01341 0 00440 4 32450 464 LX110 HTR13608,4,OR000+4 LDQ. F2404610
  2. Reference
    01441 0 00000 0 01341 528KLX031 HTRLX110 F2405240
␣LX116 = 743
  1. Definition
    01347 0 00440 4 32450 470 LX116 HTR13608,4,OR000+4 LDQ. INSTRUCTIONS. F2404670
  2. Reference
    01440 0 00000 0 01347 527 KLX03 HTRLX116 F2405230
␣LX124 = 751
  1. Definition
    01357 0 00461 4 32450 478 LX124 HTR13608,4,OR000+21 LDQ. THE NEGATIVE F2404750
  2. Reference
    01443 0 00000 0 01357 530KLX051 HTRLX124 F2405260
␣LX130 = 757
  1. Definition
    01365 0 00461 4 32450 484 LX130 HTR13608,4,OR000+21 LDQ. F2404810
  2. Reference
    01442 0 00000 0 01365 529 KLX05 HTRLX130 F2405250
␣LXC08 = 693
  1. Definition
    01265 0 50000 0 01427 420 LXC08 CLAL(0) SET CIT SYMBOLIC LOCN. TO ZERO F2404170
  2. Reference
    01322 2 00001 1 01265 449TIXLXC08,1,1 RETURN FOR NEXT SKELETON INST. F2404460
␣LXC10 = 695
  1. Definition
    01267 0 56000 1 00000 422 LXC10 LDQ0,1 SELECT NEXT SKELETAL WORD. F2404190
  2. Reference
    01264 0 62100 0 01267 419STALXC10 APPROPRIATE SKELETAL WORDS. F2404160
␣LXC15 = 701
  1. Definition
    A01275 0 50000 0 00000 428 LXC15 CLA ADDR. IS LOCATION OF SYMBOLIC ADDRESS F2404250
  2. Reference
    01274 0 62100 0 01275 427STALXC15 CIT IS SYMBOLIC ADDRESS TYPE. F2404240
␣LXC19 = 715
  1. Definition
    D01313−3 00000 0 01321 442 LXC19 TXLLXC30,0 UNCOND. TRANSFER LINKAGE INDECR. F2404390
  2. References (2)
    01257−0 63400 4 01313 414 LXC SXDLXC19,4 F2404110
    01323−0 53400 4 01313 450LXDLXC19,4 SKELET0N COMPLETED. F2404470
␣LXC20 = 716
  1. Definition
    01314 0 76700 0 00022 443 LXC20 ALS18 CIT IS SHIFT TYPE INSTRUCTION F2404400
  2. Reference
    01273−0 12000 0 01314 426TMILXC20 CIT IS SHIFT TYPE INSTRUCTIQN. F2404230
␣LXC30 = 721
  1. Definition
    01321 0 07400 4 01015 448 LXC30 TSXCIT,4 MAKE CIT ENTRY. F2404450
  2. References (3)
    01303 0 10000 0 01321 434TZELXC30 1)+3 OR6)+2 ERASABLE F2404310
    01305−0 10000 0 01321 436TNZLXC30 NO F2404330
    D01313−3 00000 0 01321 442 LXC19 TXLLXC30,0 UNCOND. TRANSFER LINKAGE INDECR. F2404390
␣NAME1 = 765
  1. Definition
    A01375 0 00000 0 00000 492 NAME1 HTR F2404890
  2. References (3)
    00502 0 62100 0 01375 33STANAME1 PUT SUBCOM NAME IN NAME 1. F2400300
    00577 0 50000 0 01375 94CLANAME1 LOCATION OF F2400900
    00702 0 50000 0 01375 161CLANAME1 STO 12)+ NAME1 F2401570
␣OR000 = 284
  1. Definition
    00434 14 OR000 BSS28 F2400110
  2. References (45)
    00571 0 50000 0 00451 88CLAOR000+13 THE INSTRUCTION F2400840
    00605 0 50000 0 00466 100CLAOR000+26 INSTRUCTION. F2400960
    00617 0 60100 0 00435 110STOOR000+1 SAVE S1 FOR LXC ROUTINE F2401060
    00632 0 60100 0 00440 121STOOR000+4 SAVE S2 FOR LXC ROUTINE. F2401170
    00635 0 60100 0 00443 124STOOR000+7 AND STORE FOR LXC ROUTINE. F2401200
    00647 0 60100 0 00461 134STOOR000+21 STORE FOR LXC ROUTINE. F2401300
    00654 0 60100 0 00464 139STOOR000+24 LXC ROUTINE. F2401350
    01252 0 60100 2 00450 407STOOR000+12,2 STORE NAME OF FIXCON ENTRY. F2404040
    01325 0 00451 2 34321 452 LX100 HTR14545,2,OR000+13 CLA. THESE WORDS F2404490
    01326 0 00466 6 26346 453HTR11494,6,OR000+26 STO. CONSTITUTE THE F2404500
    01327 0 00435 2 34321 454 LX102 HTR14545,2,OR000+1 CLA. CODING F2404510
    01330 0 00451 6 26422 455HTR11538,6,OR000+13 SUB. SKELETONS, F2404520
    01331 0 00466 2 12424 456HTR5396,2,OR000+26 ADD. AND ARE F2404530
    01332 0 00466 6 26346 457HTR11494,6,OR000+26 SO0. CALLED UPON F2404540
    01333 0 00435 4 32450 458 LX105 HTR13608,4,OR000+1 LDQ. BY THE LXC F2404550
    01334 0 00445 4 44770 459HTR18936,4,OR000+9 MPY. ACCORDING F2404560
    01336 0 00451 6 26422 461HTR11538,6,OR000+13 SUB. DIFFERENT F2404580
    01337 0 00466 2 12424 462HTR5396,2,OR000+26 ADD. COMPUTATIONS F2404590
    01340 0 00466 6 26346 463HTR11494,6,OR000+26 STO. REQUIRED. F2404600
    01341 0 00440 4 32450 464 LX110 HTR13608,4,OR000+4 LDQ. F2404610
    01342 0 00443 4 44770 465HTR18936,4,OR000+7 MPY. THE TAG AND F2404620
    01344 0 00443 6 26422 467HTR11538,6,OR000+7 SUB. THE BCD F2404640
    01345 0 00466 2 12424 468HTR5396,2,OR000+26 ADD. EQUIVALENTS OF F2404630
    01346 0 00466 6 26346 469HTR11494,6,OR000+26 STO. THE CIT F2404660
    01347 0 00440 4 32450 470 LX116 HTR13608,4,OR000+4 LDQ. INSTRUCTIONS. F2404670
    01350 0 00446 4 44770 471HTR18936,4,OR000+10 MPY. THE SYMBOLIC F2404680
    01352 0 00443 4 44770 473HTR18936,4,OR000+7 MPY. THE LOCATIONS F2404700
    01354 0 00443 6 26422 475HTR11538,6,OR000+7 SUB. ADDRESSES IN F2404720
    01355 0 00466 2 12424 476HTR5396,2,OR000+26 ADD. THE CIT F2404730
    01356 0 00466 6 26346 477HTR11494,6,OR000+26 STO. F2404740
    01357 0 00461 4 32450 478 LX124 HTR13608,4,OR000+21 LDQ. THE NEGATIVE F2404750
    01360 0 00464 4 44770 479HTR18936,4,OR000+24 MPY. PREFIX INDICATES F2404760
    01362 0 00464 6 26422 481HTR11538,6,OR000+24 SUB. ABSOLUTE ADDRESS F2404780
    01363 0 00466 2 12424 482HTR5396,2,OR000+26 ADD. F2404790
    01364 0 00466 6 26346 483HTR11494,6,OR000+26 STO. F2404800
    01365 0 00461 4 32450 484 LX130 HTR13608,4,OR000+21 LDQ. F2404810
    01366 0 00447 4 44770 485HTR18936,4,OR000+11 MPY. F2404820
    01370 0 00464 4 44770 487HTR18936,4,OR000+24 MPY. F2404840
    01372 0 00464 6 26422 489HTR11538,6,OR000+24 SUB. F2404860
    01373 0 00466 2 12424 490HTR5396,2,OR000+26 ADD. F2404870
    01374 0 00466 6 26346 491HTR11494,6,OR000+26 STO. F2404880
    M 00450 531 OR012 SYNOR000+12 F2405270
    M 00451 532 OR013 SYNOR000+13 F2405280
    M 00456 533 OR018 SYNOR000+18 F2405290
    M 00466 534 OR026 SYNOR000+26 F2405300
␣OR012 = 296
  1. Definition
    M 00450 531 OR012 SYNOR000+12 F2405270
␣OR013 = 297
  1. Definition
    M 00451 532 OR013 SYNOR000+13 F2405280
␣OR018 = 302
  1. Definition
    M 00456 533 OR018 SYNOR000+18 F2405290
␣OR026 = 310
  1. Definition
    M 00466 534 OR026 SYNOR000+26 F2405300
␣RELTG = 489
  1. Definition
    00751+000001000004 201 RELTG OCT000001000004 F2401970
  2. Reference
    00742 0 50000 0 00751 194CLARELTG TRA1,4 F2401900
␣START = 316
  1. Definition
    00474 0 07400 4 00752 27 START TSXRDRM,4 READ TABLE IRV (BOB ALSO) F2400240
  2. Reference
    00472 0 02000 0 00474 25TRASTART IN THIS BLOCK. F2400220
␣STOTP = 444
  1. Definition
    00674−0 63400 4 01404 155 STOTP SXDLINK2,4 ROUTINE COMPILES THE INSTR. F2401510
  2. References (2)
    00527 0 07400 4 00674 54 EQUAL TSXSTOTP,4 F2400510
    00667 0 07400 4 00674 150TSXSTOTP,4 COMPILE INSTRUCTION TO STORE F2401460
␣WRKSC = 124
  1. Definition
    00174 12 WRKSC BSS8 F2400090
  2. References (21)
    00615 0 50000 0 00175 108CLAWRKSC+1 TEST 1ST SUBSCRIPT SYMBOL F2401040
    00630 0 50000 0 00177 119 S2 CLAWRKSC+3 F2401150
    00633 0 50000 0 00202 122CLAWRKSC+6 OBTAIN SYMBOLIC ADDRESS F2401180
    00645 0 50000 0 00201 132 S3 CLAWRKSC+5 TEST FOR 3RD SUBSCRIPT F2401280
    00650 0 56000 0 00202 135LDQWRKSC+6 COMPUTE D1*D2, F2401310
    00651 0 20000 0 00203 136MPYWRKSC+7 AND OBTAIN F2401320
    01151 0 60100 4 00204 340SUB020 STOWRKSC+8,4 TO ZERO. F2403360
    01171 0 70000 0 00174 356CPYWRKSC DECR. C1, ADDR, C2 F2403520
    01173 0 70000 0 00200 358CPYWRKSC+4 FOR TAU 3, ADDR. C3. F2403540
    01174 0 70000 0 00175 359SUB040 CPYWRKSC+1 S1 F2403550
    01176 0 70000 0 00177 361CPYWRKSC+3 FOR TAU2 AND3, S2. F2403570
    01200 0 70000 0 00201 363CPYWRKSC+5 FOR TAU3, S0, ALS0 F2403590
    01201 0 70000 0 00202 364SUB050 CPYWRKSC+6 ADDRESS D2,0ECR.D1 F2403600
    01204−0 50000 0 00174 367CALWRKSC COMPUTE F2403630
    01205 0 36100 4 00203 368SUB070 ACLWRKSC+7,4 CHECKSUM. F2403640
    01215 0 50000 4 00203 376SUB080 CLAWRKSC+7,4 REARRANGE WORDS WRKSC F2403730
    01220 0 60100 4 00203 379STOWRKSC+7,4 NONBCD CHARACTERS F2403760
    01223 0 60100 0 00176 382STOWRKSC+2 C1,S1,C2,S2,C3,S3,D1,D2. F2403790
    01225 0 60100 0 00203 384SUB090 STOWRKSC+7 F2403810
    01243 0 50000 1 00202 400 COSE5 CLAWRKSC+6,1 SELECT A S.C. COEFF. F2403970
    01250 0 50000 1 00202 405CLAWRKSC+6,1 ENTER COEFF IN FIXCON IF F2404020
ACCSUH = 508
  1. Definition
    00774 0 36100 4 00204 221ACCSUH ACLBOB,4 FORM LOGICAL CHECKSUM OF F2402170
  2. Reference
    00776 2 00001 2 00774 223 TIX TIXACCSUH,2,1 F2402190
COMP20 = 404
  1. Definition
    00624 0 50000 0 01436 115COMP20 CLAKLX02 NO. COMPILE INSTR TO COMPUTE F2401110
  2. Reference
    00622 0 02000 0 00624 113TRACOMP20 NO F2401090
COMP30 = 406
  1. Definition
    00626 0 50000 0 01437 117COMP30 CLAKLX021 YES. COMPILE C1A1-1 F2401130
  2. References (2)
    00623 1 00002 1 00626 114TXICOMP30,1,2 YES. 6 INSTR. TO BE COMPILED F2401100
    00625 0 02000 0 00627 116TRACOMP30+1 S1-1+(1 ALREADY IN ERASABLE) F2401120
COMP40 = 419
  1. Definition
    00643 0 50000 0 01441 130COMP40 CLAKLX031 F2401260
  2. References (2)
    00640 0 02000 0 00643 127TRACOMP40 NO. COMPILE D1*S2-D1+ F2401230
    00642 1 00002 1 00644 129TXICOMP40+1,1,2 COMPUTE D1*S2*C3-D1+ F2401250
COMP50 = 434
  1. Definition
    00662 0 50000 0 01443 145COMP50 CLAKLX051 F2401410
  2. References (2)
    00657 0 02000 0 00662 142TRACOMP50 NO. COMPILE D1D2*S3-D1D2+ F2401380
    00661 1 00002 1 00663 144TXICOMP50+1,1,2 F2401400
COMP55 = 436
  1. Definition
    00664−0 53400 4 01045 147COMP55 LXDBBOX,4 F2401430
  2. References (2)
    00646 0 10000 0 00664 133TZECOMP55 SYMBOL. F2401290
    00665 1 00004 4 00666 148TXICOMP55+2,4,4 STEP UP CIT BUFFER COUNT F2401440
COMPIL = 370
  1. Definition
    00562−0 63400 1 01402 81COMPIL SXD1XB0X,1 F2400770
  2. Reference
    00510 0 07400 4 00562 39TSXCOMPIL,4 COMPILE SUBROUTINE FRO COMPUTING F2400360
COSE08 = 683
  1. Definition
    01253 2 00002 1 01254 408COSE08 TIXCOSE10,1,2 F2404050
  2. References (2)
    01244 0 10000 0 01253 401TZECOSE08 TRA IF NO SUBSC. IN THIS DIMENSION F2403980
    01246 0 10000 0 01253 403TZECOSE08 TRA IF COEFF. IS ONE. F2404000
COSE10 = 684
  1. Definition
    01254 2 00001 2 01243 409COSE10 TIXCOSE5,2,1 REPEAT FOR ALL SUBSCRIPTS. F2404060
  2. Reference
    01253 2 00002 1 01254 408COSE08 TIXCOSE10,1,2 F2404050
CPYWD1 = 775
  1. Definition
    A01407 0 00000 0 00000 502CPYWD1 HTR F2404990
  2. References (5)
    01070 0 70000 0 01407 288 FC08 CPYCPYWD1 F2402840
    01112 0 60100 0 01407 306 FC40 STOCPYWD1 SEARCH COMPLETED. NO MATCH. F2403020
    01124 0 70000 0 01407 316CPYCPYWD1 ITS CHECKSUM ON DRUM. F2403120
    01125 0 70000 0 01407 317CPYCPYWD1 F2403130
    01135 0 50000 0 01407 325 FC60 CLACPYWD1 MATCH FOUND. TEST DRUM READ. F2403210
CPYWD2 = 776
  1. Definition
    A01410 0 00000 0 00000 503CPYWD2 HTR F2405000
  2. References (3)
    01072 0 70000 0 01410 290CPYCPYWD2 READ CHECKSUM OF ENTRY F2402860
    01075 0 34000 0 01410 293CASCPYWD2 COMPARE WITH CHECKSUM. F2402890
    01136 0 40200 0 01410 326SUBCPYWD2 F2403220
DECMSK = 788
  1. Definition
    01424+077777000000 515DECMSK OCT077777000000 F2405120
  2. References (3)
    00534−0 32000 0 01424 59ANADECMSK ADJUST F1XCON WDRDCT F2400560
    01217−0 32000 0 01424 378ANADECMSK CONTAIN C1 AND C2,D1AND D2. F2403750
    01315−0 32000 0 01424 444ANADECMSK I.E. ABSOLUTE ADDRESS ONLY, F2404410
ERDRM1 = 774
  1. Definition
    A01406 0 00000 0 00000 501ERDRM1 HTR F2404980
  2. References (2)
    01057 0 60100 0 01406 279STOERDRM1 SAVE FIXCON. F2402750
    01065 0 50000 0 01406 285 FC04 CLAERDRM1 REQD. FIXCON F2402810
FINISH = 345
  1. Definition
    00531 0 07400 4 00735 56FINISH TSXLINKTR,4 FORM LAST SUBROUTINE RETURN, F2400530
  2. References (2)
    00475 0 02000 0 00542 28TRAFINISH+9 RETURN HERE IF NO ENTRIES. F2400250
    00514−2 00001 1 00531 43 TEST TNXFINISH,1,1 END OF TABLE IRV. F2400400
FIXCON = 556
  1. Definition
    271REQUIRED FIXCON IS IN ACC. WHEN THIS-ROUTINE IS F2402670
    272BEGUN. THE FIXCON TABLE IS SEARCHED AND IF FIXCON IS F2402680
    273NOT ALREADY THERE, IT IS ENTERED IN THE TABLE. F2402690
    274(SEARCH IS MADE IN TWO PASSES, ONE FOR EVEN ENTRIES, ONE F2402700
    275FOR ODD, FOR TIMING PURPOSES.)EXIT WITH NAME OF ENTRY IN ACC F2402710
    01054−0 63400 1 01107 276FIXCON SXDFC29,1 F2402720
  2. References (3)
    00634 0 07400 4 01054 123TSXFIXCON,4 OF D1 IN FIXCON TABLE F2401190
    00653 0 07400 4 01054 138TSXFIXCON,4 FIXCON, AND STORE FOR F2401340
    01251 0 07400 4 01054 406TSXFIXCON,4 NOT ALREADY THERE. F2404030
INITFX = 456
  1. Definition
    167ROUTINE FORMS END TEST FOR FIXCON SEARCH ROUTINE F2401630
    00710 0 53400 2 01434 168INITFX LXAL(5),2 LOAD READING ERROR COUNTER. F2401640
  2. Reference
    00477 0 07400 4 00710 30TSXINITFX,4 FORM END TEST FOR FIXC0O SEARCH F2400270
KLX021 = 799
  1. Definition
    01437 0 00000 0 01333 526KLX021 HTRLX105 FOR LXC ROUTINE. F2405220
  2. Reference
    00626 0 50000 0 01437 117COMP30 CLAKLX021 YES. COMPILE C1A1-1 F2401130
KLX031 = 801
  1. Definition
    01441 0 00000 0 01341 528KLX031 HTRLX110 F2405240
  2. Reference
    00643 0 50000 0 01441 130COMP40 CLAKLX031 F2401260
KLX051 = 803
  1. Definition
    01443 0 00000 0 01357 530KLX051 HTRLX124 F2405260
  2. Reference
    00662 0 50000 0 01443 145COMP50 CLAKLX051 F2401410
L(152) = 523
  1. Definition
    01013 0 00000 0 00230 236L(152) HTR152 LENGTH OF TABLE IRV, WD. CT., CHECKSUMS F2402320
  2. Reference
    T00755 0 53400 0 01013 206LXAL(152), 2 F2402020
L(CLA) = 790
  1. Definition
    01426 234321000000 517L(CLA) BCD1CLA000 F2405140
  2. Reference
    00567 0 50000 0 01426 86CLAL(CLA) F2400820
L(STO) = 789
  1. Definition
    01425 626346000000 516L(STO) BCD1STO000 F2405130
  2. References (2)
    00603 0 50000 0 01425 98CLAL(STO) F2400940
    00700 0 50000 0 01425 159CLAL(STO) THIS INSTRUCTION IS F2401550
L(TRA) = 488
  1. Definition
    00750 635121000000 200L(TRA) BCD1TRA000 F2401960
  2. Reference
    00740 0 50000 0 00750 192CLAL(TRA) TO THE FORTRAN MASTER F2401880
LINKTR = 477
  1. Definition
    00735 0 50000 0 01427 189LINKTR CLAL(0) F2401850
  2. References (3)
    00516 0 07400 4 00735 45TSXLINKTR,4 COMPILE SUBROUTINE RETURN. F2400420
    00523 0 07400 4 00735 50TSXLINKTR,4 ARE F2400470
    00531 0 07400 4 00735 56FINISH TSXLINKTR,4 FORM LAST SUBROUTINE RETURN, F2400530
ORIGIN = 610
  1. Definition
    01142 0 00000 0 00002 330ORIGIN HTR2 DRUM ORIGIN OF FIXCON TABLE. F2403260
  2. References (2)
    01061 0 50000 0 01142 281 FC02 CLAORIGIN INITIALISE AD1 T0 SELECT 1ST ENTRY F2402770
    01120 0 40000 0 01142 312ADDORIGIN DRUM WRITING. F2403080
PROCED = 506
  1. Definition
    T00772−0 75400 0 00000 219PROCED PXD0 TABLE IRV IS NOT EMPTY, F2402150
  2. Reference
    00767 3 00000 2 00772 216TXHPROCED,2,0 IS TABLE EMPTY. F2402120
RECCNT = 768
  1. Definition
    A01400 0 00000 0 00000 495RECCNT HTR F2404920
  2. References (5)
    00545 0 70000 0 01400 68CPYRECCNT WRITE CIT RECORDCOUNT AND F2400650
    00546 0 70000 0 01400 69CPYRECCNT CHECKSUM ON CIT TAPE F2400660
    00550 0 53400 1 01400 71LXARECCNT,1 BACKSPACE CIT TAPE F2400680
    01023 0 50000 0 01400 246CLARECCNT BUFFER IS ALREADY FULL. F2402420
    01025 0 60100 0 01400 248STORECCNT F2402440
REPETE = 321
  1. Definition
    00501 0 50000 2 00204 32REPETE CLABOB,2 SELECT TABLE IRV ENTRY. F2400290
  2. Reference
    00517 0 02000 0 00501 46TRAREPETE F2400430
SENSE1 = 781
  1. Definition
    A01415 0 00000 0 00000 508SENSE1 HTR F2405050
  2. References (2)
    00473 0 60100 0 01415 26STOSENSE1 F2400230
    00555 0 50000 0 01415 76CLASENSE1 RESET LIGHT 3 T0OTHE STATUS F2400730
START1 = 312
  1. Definition
    00470 0 50000 0 01430 23START1 CLAL(1) SAVE STATUS OF SENSE-LIGHT3 F2400200
STOLOC = 385
  1. Definition
    00601 0 60100 0 01050 96STOLOC STOCIL00 10)+NAME1 F240A920
STOPFC = 609
  1. Definition
    01141 0 07400 4 00004 329STOPFC TSXDIAG,4 DRUM 2 READING ERROR FIVE TIMES. F2403250
SUB010 = 614
  1. Definition
    01146 0 76200 0 00304 337SUB010 RDS196 SELECT TAU DRUM F2403330
  2. Reference
    01213 2 00001 1 01146 374TIXSUB010,1,1 IF ERROR, TRY FOUR MORE TIMES. F2403700
SUB020 = 617
  1. Definition
    01151 0 60100 4 00204 340SUB020 STOWRKSC+8,4 TO ZERO. F2403360
  2. Reference
    01152 2 00001 4 01151 341TIXSUB020,4,1 F2403370
SUB030 = 629
  1. Definition
    01165 0 40000 0 01236 352SUB030 ADDSUBES2 TAU ORIGIN + ENTRY N/.* F2403480
  2. Reference
    01166 2 00001 4 01165 353TIXSUB030,4,1 NUMBER OF WORDS PER ENTRY F2403490
SUB040 = 636
  1. Definition
    01174 0 70000 0 00175 359SUB040 CPYWRKSC+1 S1 F2403550
  2. Reference
    01172−3 00002 2 01174 357TXLSUB040,2,2 F2403530
SUB050 = 641
  1. Definition
    01201 0 70000 0 00202 364SUB050 CPYWRKSC+6 ADDRESS D2,0ECR.D1 F2403600
  2. Reference
    01177−3 00002 2 01201 362TXLSUB050,2,2 F2403580
SUB060 = 642
  1. Definition
    01202 0 70000 0 01235 365SUB060 CPYSUBES1 CHECKSUM. F2403610
  2. Reference
    01175−3 00001 2 01202 360TXLSUB060,2,1 F2403560
SUB070 = 645
  1. Definition
    01205 0 36100 4 00203 368SUB070 ACLWRKSC+7,4 CHECKSUM. F2403640
  2. Reference
    01206 2 00001 4 01205 369TIXSUB070,4,1 F2403650
SUB075 = 652
  1. Definition
    01214−0 53400 4 01233 375SUB075 LXDSUBORG+1,4 - F2403720
  2. Reference
    01212 0 10000 0 01214 373TZESUB075 TRA. IF CORRECT F2403690
SUB080 = 653
  1. Definition
    01215 0 50000 4 00203 376SUB080 CLAWRKSC+7,4 REARRANGE WORDS WRKSC F2403730
  2. Reference
    D01224−3 00000 0 01215 383SUB085 TXLSUB080,0 F2403800
SUB085 = 660
  1. Definition
    D01224−3 00000 0 01215 383SUB085 TXLSUB080,0 F2403800
  2. References (2)
    01143−0 63400 4 01224 334SUBCOM SXDSUB085,4 SAVE S.R. LINKAGE F2403300
    01226−0 53400 4 01224 385LXDSUB085,4 RESTORE LINKAGE INDEX F2403820
SUB090 = 661
  1. Definition
    01225 0 60100 0 00203 384SUB090 STOWRKSC+7 F2403810
  2. Reference
    01222−2 00006 4 01225 381TNXSUB090,4,6 AND ORDER OF ITEMS IS NOW F2403780
SUB100 = 664
  1. Definition
    01230 0 02000 4 00001 387SUB100 TRA1,4 RETURN F2403840
  2. Reference
    01227−3 00001 1 01231 386TXLSUB100+1,1,1 TRA IF READING ERROR. F2403830
SUBCOM = 611
  1. Definition
    331THIS ROUTINE, GIVEN A TAU TAG, OBTAINS THE CORR. F2403270
    332SUBSCR. COMBINATION FROM THE APPROPRIATE TAU TABLE F2403280
    333AND STORES IN P0SITION C1,S1,C2,S2,S3,S3,D1,D2. F2403290
    01143−0 63400 4 01224 334SUBCOM SXDSUB085,4 SAVE S.R. LINKAGE F2403300
  2. Reference
    00507 0 07400 4 01143 38TSXSUBCOM,4 READ TAU ENTRY FROM DRUM. F2400350
SUBES1 = 669
  1. Definition
    A01235 0 00000 0 00000 392SUBES1 HTR ERASABLE ST, FOR DRUM ADDR. F2403890
  2. References (6)
    01160 0 60100 0 01235 347STOSUBES1 WITHIN APPROPRIATE TAU TABLE. F2403430
    01164 0 40000 0 01235 351ADDSUBES1 FORM DRUM ADDRESS, WHICH EQUALS F2403470
    01167 0 62100 0 01235 354STASUBES1 (3 FOR TAU1,5 FOR TAU2,7 FORTAU3) F2403500
    01170 0 46000 0 01235 355LDASUBES1 SELECT TAU ENTRY. F2403510
    01202 0 70000 0 01235 365SUB060 CPYSUBES1 CHECKSUM. F2403610
    01211 0 40200 0 01235 372SUBSUBES1 READING ERROR. F2403680
SUBES2 = 670
  1. Definition
    A01236 0 00000 0 00000 393SUBES2 HTR ERASABLE ST, FO DRUM CHECK1 F2403900
  2. References (4)
    01162 0 60100 0 01236 349STOSUBES2 STORE TWICE TAU ENTRY NO. F2403450
    01165 0 40000 0 01236 352SUB030 ADDSUBES2 TAU ORIGIN + ENTRY N/.* F2403480
    01207 0 60200 0 01236 370SLWSUBES2 F2403660
    01210 0 50000 0 01236 371CLASUBES2 TEST FOR F2403670
SUBORG = 666
  1. Definition
    01232+000006001356 389SUBORG OCT000006001356 DECR. IS 6, ADDR. IS ORG TAU3 F2403860
  2. References (4)
    01147−0 53400 4 01234 338LXDSUBORG+2,4 INITIALIZE SUBSCRIPT COMBINATION F2403340
    01163 0 50000 4 01235 350CLASUBORG+3,4 SELECT APPROPRIATE TAU ORIGIN. F2403460
    01203−0 53400 4 01232 366LXDSUBORG,4 F2403620
    01214−0 53400 4 01233 375SUB075 LXDSUBORG+1,4 - F2403720
SUBTAG = 671
  1. Definition
    A01237 0 00000 0 00000 394SUBTAG HTR F2403910
  2. References (2)
    01145 0 60100 0 01237 336STOSUBTAG STORE TAU TAG NAME. F2403320
    01153 0 50000 0 01237 342CLASUBTAG THESE INSTRUCTIONS PLACE F2403380