␣␣␣CNL = 168
  1. Definition
    40 DECREMENT. F6I00361
    00250−0 53400 2 00301 41 CNL LXDLNC,2 SET COUNTER FOR 20-WORD RECORD F6I00370
  2. Reference
    TD00302 1 00000 0 00250 70 DCX TXICNL F6I00630
␣␣␣CNV = 199
  1. Definition
    00307 0 50000 0 00425 75 CNV CLATEN LOCATION. F6I00680
  2. Reference
    00314 1 00001 4 00307 80TXICNV,4,1 F6I00730
␣␣␣CNW = 169
  1. Definition
    00251−0 50000 0 00422 42 CNW CALBLANKS STORE BLANKS IN FIRST WORD OF 4-WORD ENTRY F6I00380
  2. Reference
    00277 2 00004 2 00251 66TIXCNW,2,4 MORE ENTRIES + STILL ROOM IN 20-WORD BLOCK, GO F6I00600
␣␣␣DCR = 195
  1. Definition
    00303−0 63400 4 00302 71 DCR SXDDCX,4 F6I00640
  2. References (2)
    00254 0 07400 4 00303 45TSXDCR,4 GO TO CONVERT EXTERNAL FORMULA NO. TO BCD IMAGEF6I00410
    00260 0 07400 4 00303 50TSXDCR,4 IMAGE OF ITS DEC. REPRESENTATION AND STORE IT F6I00450
␣␣␣DCX = 194
  1. Definition
    TD00302 1 00000 0 00250 70 DCX TXICNL F6I00630
  2. References (2)
    00303−0 63400 4 00302 71 DCR SXDDCX,4 F6I00640
    00322−0 53400 4 00302 86LXDDCX,4 F6I00790
␣␣␣DEC = 207
  1. Definition
    00317 0 76700 0 00006 83 DEC ALS6 F6I00760
  2. Reference
    00321 2 00001 4 00317 85TIXDEC,4,1 F6I00780
␣␣␣DIG = 346
  1. Definition
    00532 161 DIG BES6 F6I01180
  2. References (3)
    00313 0 60200 4 00532 79SLWDIG,4 STORE REMAINDERS. F6I00720
    00315−0 60000 4 00532 81 FIN STQDIG,4 F6I00740
    00320−0 50100 4 00532 84ORADIG,4 F6I00770
␣␣␣FIN = 205
  1. Definition
    00315−0 60000 4 00532 81 FIN STQDIG,4 F6I00740
  2. Reference
    00310 0 04000 0 00315 76TLQFIN F6I00690
␣␣␣LIN = 339
  1. Definition
    00523 160 LIN BSS1 F6I01170
  2. References (6)
    00252 0 60200 2 00524 43SLWLIN+1,2 F6I00390
    00255 0 60200 2 00525 46SLWLIN+2,2 OF ITS DECIMAL REPRESENTATION AND STORE IT IN F6I00420
    00261 0 60200 2 00526 51SLWLIN+3,2 IN 3RD WORD OF ENTRY. F6I00460
    00275 0 60200 2 00527 63SLWLIN+4,2 F6I00580
    00301 0 00024 0 00524 69 LNC LIN+1,,20 F6I00620
    00351 0 00030 0 00530 109 LNE LIN+5,,24 F6I01020
␣␣␣LNC = 193
  1. Definition
    00301 0 00024 0 00524 69 LNC LIN+1,,20 F6I00620
  2. Reference
    00250−0 53400 2 00301 41 CNL LXDLNC,2 SET COUNTER FOR 20-WORD RECORD F6I00370
␣␣␣LND = 230
  1. Definition
    00346 0 00000 0 00000 106 LND AND F6I00990
  2. References (4)
    00337 0 60100 0 00346 99STOLND FINAL RECORD. F6I00920
    00341 0 62100 0 00346 101STALND F6I00940
    00343 0 40200 0 00346 103SUBLND F6I00960
    00344 0 60100 0 00346 104STOLND F6I00970
␣␣␣LNE = 233
  1. Definition
    00351 0 00030 0 00530 109 LNE LIN+5,,24 F6I01020
  2. Reference
    00342 0 50000 0 00351 102CLALNE F6I00950
␣␣␣LOC = 278
  1. Definition
    00426+000000000000 115 LOC DEC0 F6I01080
  2. References (5)
    00262 0 53400 4 00426 52LXALOC,4 SET XR4 TO CURRENT INTERNAL FORMULA NUMBER. F6I00470
    00265 0 62100 0 00426 55STALOC LOC NOW CONTAINS LOCATION OF CURRENT INTERNAL F6I00500
    00266 0 50000 0 00426 56CLALOC FORMULA NUMBER. F6I00510
    00304 0 62100 0 00426 72STALOC TO CONVERT ADDRESS F6I00650
    00306 0 56000 0 00426 74LDQLOC IMAGE OF DECIMAL F6I00670
␣␣␣OCT = 186
  1. Definition
    00272 0 76700 0 00003 60 OCT ALS3 STORE IT IN THE F6I00550
  2. References (2)
    00271−0 14000 0 00272 59TNOOCT REPRESENTATION, AND F6I00540
    00274−0 14000 0 00272 62TNOOCT F6I00570
␣␣␣SUM = 347
  1. Definition
    00533 163 SUM BSS1 F6I01200
  2. References (3)
    00216−0 70000 0 00533 14CADSUM F6I00110
    00233 0 70000 0 00533 27CPYSUM F6I00240
    00235−0 70000 0 00533 29CADSUM F6I00260
␣␣␣SYM = 346
  1. Definition
    00532 162 SYM BSS1 F6I01190
␣␣␣TEN = 277
  1. Definition
    00425+000000000012 114 TEN DEC10 F6I01070
  2. References (2)
    00307 0 50000 0 00425 75 CNV CLATEN LOCATION. F6I00680
    00312 0 22100 0 00425 78DVPTEN DIVIDE BY TEN AND F6I00710
␣␣␣WLL = 222
  1. Definition
    00336−0 75400 2 00000 98 WLL PXD0,2 TO GET WORD COUNTERS FOR WRITING F6I00910
  2. Reference
    00276−2 00001 1 00336 64TNXWLL,1,1 TRANSFER WHEN ALL EIFN ENTRIES HAVE BEEN F6I00590
␣␣ENDS = 231
  1. Definition
    00347 0 76200 0 00221 107 ENDS RTB1 GO TO LOADER. F6I01000
  2. Reference
    D00224−3 00000 1 00347 20TXLENDS,1 ANY FORMULA NOS. NO, GO TO ENDS. F6I00170
␣␣FIFL = 179
  1. Definition
    U00263 0 50000 4 53 FIFL CLAIFN,4 F6I00480
  2. Reference
    00247 0 62100 0 00263 39STAFIFL LOCATION OF DEA TABLE WHICH HAS IFN TABLE IN F6I00360
␣␣POOP = 218
  1. Definition
    00332 0 70000 2 00332 94 POOP CPY*,2 F6I00870
  2. References (2)
    00330 0 62100 0 00332 92STAPOOP F6I00850
    00333 2 00001 2 00332 95TIXPOOP,2,1 F6I00880
␣6BITS = 276
  1. Definition
    00424+000000000077 113 6BITS OCT77 F6I01060
␣BLANK = 275
  1. Definition
    00423 000000000060 112 BLANK BCD100000␣ F6I01050
  2. Reference
    00270−0 50000 0 00423 58CALBLANK TO THE BCD IMAGE OF ITS OCTAL F6I00530
␣CEIFN = 153
  1. Definition
    00231−0 70000 2 02112 25 CEIFN CADTEIFN,2 NUMBERS INTO TEIFN-WD CT,..., TEIFN-1 F6I00220
  2. Reference
    00232 2 00001 2 00231 26TIXCEIFN,2,1 F6I00230
␣CHEAD = 320
  1. Definition
    A 00500 158 CHEAD BSS F6I01150
  2. Reference
    00245 0 00024 0 00500 37CHEAD,,20 F6I00340
␣EIFNA = 138
  1. Definition
    T00212−0 75400 0 00002 10 EIFNA PXD2 F6I00070
  2. Reference
    00213 0 46000 0 00212 11LDAEIFNA F6I00080
␣EIFTA = 151
  1. Definition
    T00227−0 75400 0 00004 23 EIFTA PXD4 READ INTERNAL- F6I00200
  2. Reference
    00230 0 46000 0 00227 24LDAEIFTA EXTERNAL FORMULA F6I00210
␣LEIFN = 147
  1. Definition
    00223−0 53400 3 02112 19 LEIFN LXDTEIFN,3 SET XR1+XR2=WD CT OF EIFN TABLE. F6I00160
  2. Reference
    00220 0 10000 0 00223 16TZELEIFN WORD COUNT OKAY. F6I00130
␣LIB30 = 150
  1. Definition
    00226 0 76200 0 00304 22 LIB30 RDR4 F6I00190
  2. Reference
    00240 2 00001 4 00226 32TIXLIB30,4,1 F6I00290
␣LOC15 = 279
  1. Definition
    00427 0 00000 0 00017 116 LOC15 HTR15 F6I01090
  2. References (2)
    00210 0 53400 4 00427 8LXALOC15,4 SET DRUM READ ERROR COUNTER. F6I00050
    00225 0 53400 4 00427 21LXALOC15,4 YES, SET READ ERROR COUNTER F6I00180
␣PEIFN = 162
  1. Definition
    00242 0 07400 4 00324 34 PEIFN TSXSPACE,4 COPY TITLE AND HEADING ON TAPE 2, F6I00310
  2. Reference
    00237 0 10000 0 00242 31TZEPEIFN TRANSFER IF OKAY. F6I00280
␣REIFN = 137
  1. Definition
    00211 0 76200 0 00304 9 REIFN RDR4 SELECT DRUM 4 TO READ EIFN TABLE. F6I00060
  2. Reference
    00221 2 00001 4 00211 17TIXREIFN,4,1 F6I00140
␣SPACE = 212
  1. Definition
    00324 0 76600 0 00202 88 SPACE WTD2 F6I00810
  2. References (2)
    00242 0 07400 4 00324 34 PEIFN TSXSPACE,4 COPY TITLE AND HEADING ON TAPE 2, F6I00310
    00244 0 07400 4 00324 36TSXSPACE,4 F6I00330
␣TEIFN = 1098
  1. Definition
    02112 164 TEIFN BES750 F6I01210
  2. References (5)
    00214−0 70000 0 02112 12CADTEIFN F6I00090
    00223−0 53400 3 02112 19 LEIFN LXDTEIFN,3 SET XR1+XR2=WD CT OF EIFN TABLE. F6I00160
    00231−0 70000 2 02112 25 CEIFN CADTEIFN,2 NUMBERS INTO TEIFN-WD CT,..., TEIFN-1 F6I00220
    00253−0 50000 1 02112 44CALTEIFN,1 SELECT EIFN TABLE ENTRY. F6I00400
    00256−0 50000 1 02112 48CALTEIFN,1 F6I00430
␣TITLE = 300
  1. Definition
    A 00454 137 TITLE BSS F6I01120
  2. Reference
    00243 0 00024 0 00454 35TITLE,,20 F6I00320
␣WRITE = 214
  1. Definition
    00326 0 76600 0 00202 90 WRITE WTD2 F6I00830
  2. References (2)
    00300 0 07400 4 00326 68TSXWRITE,4 WRITE TAPE 2 BLOCK. F6I00610
    00345 0 07400 4 00326 105TSXWRITE,4 WRITE FINAL RECORD F6I00980
BLANKS = 274
  1. Definition
    00422 606060606060 111BLANKS BCD1␣␣␣␣␣␣ F6I01040
  2. References (3)
    00251−0 50000 0 00422 42 CNW CALBLANKS STORE BLANKS IN FIRST WORD OF 4-WORD ENTRY F6I00380
    00316−0 50000 0 00422 82CALBLANKS F6I00750
    00325 0 70000 0 00422 89CPYBLANKS F6I00820