␣␣␣␣␣A = 1
  1. Definition
    00001 11A EQU1 4F1D0110
  2. References (12)
    13570 0 34000 1 14504 80ONE CASTABLE,A PRINTING COMMENT 4F1D0780
    13573 1 77777 1 13574 83TWO TXITHREE,A,−1 4F1D0810
    13574 3 00000 1 13570 84THREE TXHONE,A,0 4F1D0820
    13602 0 40200 1 14505 90SUBTABLE+1,A 4F1D0880
    13605 0 40200 1 14505 93SUBTABLE+1,A 4F1D0910
    13611 1 77777 1 13612 97NINE TXIFIVE,A,−1 4F1D0950
    13612−0 75400 1 00000 98FIVE PXD0,A 4F1D0960
    13637−0 53400 1 14041 119LXDL(X)D,A CONSTRUCT CALLING SEQUENCE WORD 4F1D1170
    13641 0 34000 1 01331 121STA05 CASF+111,A 4F1D1190
    13644 2 00001 1 13641 124STA10 TIXSTA05,A,1 4F1D1220
    13645−0 53400 1 14035 125LXDL(0),A 4F1D1230
    13646−0 75400 1 00000 126STA20 PXD0,A 4F1D1240
␣␣␣␣␣B = 2
  1. Definition
    00002 12B EQU2 4F1D0120
  2. References (7)
    13546−0 73400 2 00000 62PDX0,B 4F1D0600
    13547−0 75400 2 00000 63PXD0,B 4F1D0610
    13551−0 53400 2 14034 65LXDL(6)D,B 4F1D0630
    13554 2 00001 2 13552 68TIXALS,B,1 4F1D0660
    13601 3 00000 2 13612 89FOUR TXHFIVE,B,0 4F1D0870
    13620 3 00000 2 13625 104TXHSIX,B,0 4F1D1020
    13624 1 00001 2 13574 108TXITHREE,B,1 4F1D1060
␣␣␣␣␣C = 4
  1. Definition
    00004 13C EQU4 4F1D0130
  2. References (13)
    13440 3 00000 4 13543 15EDIT TXHERENT,C,0 IF IR4 IS ZERO THIS IS THE END OF SEC ONE. 4F1D0150
    13444 0 07400 4 14121 19TSXPRINT,C 4F1D0190
    13446 0 07400 4 14121 21TSXPRINT,C BIT IN WORD 20 OCTAL), IF THERE WERE NO 4F1D0210
    13543−0 75400 4 00000 59ERENT PXD0,C 4F1D0570
    13615−0 73400 4 00000 101PDX0,C 4F1D0990
    13616−0 75400 4 00000 102PXD0,C 4F1D1000
    13665 0 07400 4 14121 141TSXPRINT,C AND PRINT HEADING 4F1D1390
    14022 0 07400 4 14121 234SECND TSXPRINT,C PRINT STATEMENT 4F1D2320
    14024 0 07400 4 14121 236TSXPRINT,C PRINT COMMENT 4F1D2340
    14136 0 07400 4 14170 312TSXWOT,C 4F1D2780
    14157 0 07400 4 14170 329TSXWOT,C 4F1D2950
    14161−0 53400 4 14165 331LXDRNC,C 4F1D2970
    14162 0 02000 4 00002 332TRA2,C 4F1D2980
␣␣␣␣␣D = 6438
  1. Definition
    14446 488D BES9 4F1D4540
  2. References (8)
    14311−0 60200 3 14446 419CI5 ORSD,3 STORE DIGIT 4F1D3850
    14321−0 60200 2 14436 427ORSD−8,2 AND 3 ROWS AND 4F1D3930
    14322−0 60200 2 14443 428ORSD−3,2 MOVE 8,4 AND 8.3 4F1D3940
    14325−0 60200 2 14436 431ORSD−8,2 X 4F1D3970
    14326−0 60200 2 14442 432ORSD−4,2 X 4F1D3980
    14335−0 60200 3 14446 439ORSD,3 STORE DIGIT 4F1D4050
    14343−0 60200 3 14446 445ORSD,3 STORE DIGIT 4F1D4110
    14350−0 60200 3 14446 450ORSD,3 STORE DIGIT 4F1D4160
␣␣␣␣␣F = 618
  1. Definition
    497ADDRESS REQUIRED FROM SECTION ONE.......... 4F1D4630
    01152 498F SYN618 ADDRESS OF 1ST WORD OF F REGION 4F1D4640
  2. References (9)
    13633 0 50000 0 01151 115CLAF−1 4F1D1130
    13634 0 60100 0 01150 116STOF−2 4F1D1140
    13636 0 60100 0 01151 118STOF−1 4F1D1160
    13641 0 34000 1 01331 121STA05 CASF+111,A 4F1D1190
    13744 0 56000 0 01152 188LDQF 4F1D1860
    13751 0 56000 1 01152 193LDQF,1 4F1D1910
    13772 0 32000 1 01151 210ANSF−1,1 4F1D2080
    13774−0 60200 1 01151 212ORSF−1,1 4F1D2100
    14043 0 01150 0 00000 251 FORG HTR0,0,F−2 4F1D2490
␣␣␣␣␣X = 6439
  1. Definition
    14447 490X BSS1 4F1D4560
  2. Reference
    14344−0 60200 2 14447 446XZ2 ORSX,2 STORE X-ZONE 4F1D4120
␣␣␣␣␣Y = 6440
  1. Definition
    14450 491Y BSS1 4F1D4570
  2. References (2)
    14336−0 60200 2 14450 440YZ2 ORSY,2 STORE Y-ZONE 4F1D4060
    14451 492LT SYNY+1 4F1D4580
␣␣␣␣␣Z = 6438
  1. Definition
    14446 489Z BSS1 4F1D4550
  2. Reference
    14347−0 60200 2 14446 449OZ1 ORSZ,2 STORE 0-ZONE 4F1D4150
␣␣␣␣BK = 6295
  1. Definition
    14227 0 34000 0 14405 369BK CASBNK TEST FOR BLANK 4F1D3350
  2. Reference
    TD14225−3 00000 0 14227 367TXLBK NO 4F1D3330
␣␣␣␣L2 = 6396
  1. Definition
    14374 0 02000 4 00002 470L2 TRA2,4 X 4F1D4360
␣␣␣␣LT = 6441
  1. Definition
    14451 492LT SYNY+1 4F1D4580
  2. References (4)
    14272 0 60200 1 14451 404PR4 SLWLT,1 X 4F1D3700
    14357 0 32000 1 14451 457ANS ANSLT,1 X 4F1D4230
    14362 0 70000 1 14435 460CRAN CPYLT−12,1 4F1D4260
    14433 4938.4L SYNLT−14 4F1D4590
␣␣␣␣MK = 6300
  1. Definition
    14234 0 73400 1 00017 374MK PAX15,1 OBTAIN SPR COMBINATION 4F1D3400
  2. Reference
    14233−0 32000 0 14234 373ANAMK MASK OUT ZONE 4F1D3390
␣␣␣␣N2 = 6302
  1. Definition
    14236−2 00010 1 14240 376N2 TNXN3,1,8 X 4F1D3420
  2. Reference
    14235 1 00001 1 14236 375TXIN2,1,1 X 4F1D3410
␣␣␣␣N3 = 6304
  1. Definition
    14240−2 00004 1 14242 378N3 TNXN4,1,4 X 4F1D3440
  2. Reference
    14236−2 00010 1 14240 376N2 TNXN3,1,8 X 4F1D3420
␣␣␣␣N4 = 6306
  1. Definition
    14242−2 00002 1 14244 380N4 TNXN5,1,2 X 4F1D3460
  2. Reference
    14240−2 00004 1 14242 378N3 TNXN4,1,4 X 4F1D3440
␣␣␣␣N5 = 6308
  1. Definition
    14244−2 00001 1 14246 382N5 TNXRPR,1,1 X 4F1D3480
  2. Reference
    14242−2 00002 1 14244 380N4 TNXN5,1,2 X 4F1D3460
␣␣␣␣Q6 = 6339
  1. Definition
    14303−0 76300 0 00006 413Q6 LGL6 4F1D3790
  2. Reference
    14301 0 53400 4 14303 411LXAQ6,4 SET CHARACTER COUNT 4F1D3770
␣␣␣␣RT = 6425
  1. Definition
    14431 483RT BES16 4F1D4490
  2. References (3)
    14273 0 60200 1 14431 405SLWRT,1 X 4F1D3710
    14363 0 70000 1 14415 461CPYRT−12,1 X 4F1D4270
    14413 4948.4R SYNRT−14 4F1D4600
␣␣␣␣S3 = 6287
  1. Definition
    14217 0 50200 0 14353 361S3 CLSWP SET SWITCH FOR MASKING 4F1D3270
  2. Reference
    TD14213−3 00000 0 14217 357Z2 TXLS3 4F1D3230
␣␣␣␣T2 = 6389
  1. Definition
    14365 3 77764 1 14362 463T2 TXHCRAN,1,−12 4F1D4290
  2. Reference
    14364 1 77777 1 14365 462TXIT2,1,−1 4F1D4280
␣␣␣␣T4 = 6282
  1. Definition
    14212 0 76600 0 00361 356T4 WPR 4F1D3220
  2. Reference
    TD14211 3 00000 0 14212 355PR6 TXHT4 4F1D3210
␣␣␣␣T5 = 6289
  1. Definition
    14221−0 50000 0 14221 363T5 CAL* OBTAIN FIRST CHARACTER 4F1D3290
  2. Reference
    14173 0 62100 0 14221 341STAT5 X 4F1D3070
␣␣␣␣WP = 6379
  1. Definition
    TD14353 3 00000 0 14355 453WP TXHWP9 INVERTED TO TXL IF PROGRAM CARRIAGE CONTROL 4F1D4190
  2. References (8)
    14207−0 50000 0 14353 353CALWP INITIALIZE SWITCH 4F1D3190
    14210 0 60100 0 14353 354STOWP X 4F1D3200
    14217 0 50200 0 14353 361S3 CLSWP SET SWITCH FOR MASKING 4F1D3270
    14220 0 60100 0 14353 362STOWP CHARACTER FROM TYPE WHEEL 1 4F1D3280
    D14330−3 00000 4 14353 434CI8 TXLWP,4 TEST FOR END 4F1D4000
    14331 3 00017 2 14353 435TXHWP,2,15 TEST FOR RIGHT HALF 4F1D4010
    14366−0 50000 0 14353 464CALWP RESET SWITCH FOR SECOND CYCLE 4F1D4300
    14367 0 60100 0 14353 465STOWP X 4F1D4310
␣␣␣␣X1 = 6368
  1. Definition
    TD14340−3 00000 0 14313 442X1 TXLCI3 OBTAIN NEXT GROUP 4F1D4080
  2. References (2)
    14170−0 63400 1 14340 338WOT SXDX1,1 4F1D3040
    14371−0 53400 1 14340 467LXDX1,1 NO, RELOAD INDEX REGISTERS AND RETURN 4F1D4330
␣␣␣␣X2 = 6374
  1. Definition
    TD14346−3 00000 0 14313 448X2 TXLCI3 OBTAIN NEXT GROUP 4F1D4140
  2. References (2)
    14171−0 63400 2 14346 339SXDX2,2 4F1D3050
    14372−0 53400 2 14346 468LXDX2,2 X 4F1D4340
␣␣␣␣X4 = 6403
  1. Definition
    A14403 0 00000 0 00000 477X4 HTR 4F1D4430
  2. References (4)
    14174 0 62200 0 14403 342STDX4 X 4F1D3080
    14176 0 40000 0 14403 344ADDX4 X 4F1D3100
    14204−0 63400 4 14403 350SXDX4,4 4F1D3160
    14373−0 53400 4 14403 469WT2 LXDX4,4 X 4F1D4350
␣␣␣␣Z2 = 6283
  1. Definition
    TD14213−3 00000 0 14217 357Z2 TXLS3 4F1D3230
  2. Reference
    14361−0 53400 1 14213 459WP7 LXDZ2,1 COPY LOOP 4F1D4250
␣␣␣8.2 = 6428
  1. Definition
    14434 4878.2 BSS1 4F1D4530
  2. Reference
    14323 0 60200 2 14434 429SLW8.2,2 ROWS 4F1D3950
␣␣␣8.3 = 6427
  1. Definition
    14433 4868.3 BSS1 4F1D4520
  2. References (2)
    14320−0 50000 2 14433 426CI7 CAL8.3,2 FORM TRUE 8,4 4F1D3920
    14327 0 60200 2 14433 433SLW8.3,2 X 4F1D3990
␣␣␣8.4 = 6426
  1. Definition
    14432 4858.4 BSS1 4F1D4510
  2. Reference
    14324−0 50000 2 14432 430CAL8.4,2 FORM TRUE 8,4 4F1D3960
␣␣␣8.5 = 6425
  1. Definition
    14431 4848.5 BSS1 4F1D4500
␣␣␣ALS = 5994
  1. Definition
    13552 0 76700 0 00003 66ALS ALS3 4F1D0640
  2. Reference
    13554 2 00001 2 13552 68TIXALS,B,1 4F1D0660
␣␣␣ANS = 6383
  1. Definition
    14357 0 32000 1 14451 457ANS ANSLT,1 X 4F1D4230
  2. Reference
    14360 2 00001 1 14357 458TIXANS,1,1 X 4F1D4240
␣␣␣BNK = 6405
  1. Definition
    14405+000000000060 479 BNK OCT60 4F1D4450
  2. Reference
    14227 0 34000 0 14405 369BK CASBNK TEST FOR BLANK 4F1D3350
␣␣␣BST = 6168
  1. Definition
    14030 0 76400 0 00201 240BST BST1 TAPE 4F1D2380
␣␣␣CAS = 6124
  1. Definition
    13754 0 34000 0 14006 196CAS CASBLANKX 4F1D1940
  2. Reference
    13750 2 00001 2 13754 192TIXCAS,2,1 4F1D1900
␣␣␣CI1 = 6338
  1. Definition
    T14302−0 75400 0 00000 412CI1 PXD 4F1D3780
  2. References (4)
    14312 2 00001 4 14302 420CI4 TIXCI1,4,1 COUNT CHARACTERS 4F1D3860
    14337 2 00001 4 14302 441TIXCI1,4,1 COUNT CHARACTERS 4F1D4070
    14345 2 00001 4 14302 447TIXCI1,4,1 COUNT CHARACTERS 4F1D4130
    14351 2 00001 4 14302 451TIXCI1,4,1 COUNT CHARACTERS 4F1D4170
␣␣␣CI2 = 6334
  1. Definition
    14276 0 60200 0 14410 408CI2 SLWCOL X 4F1D3740
  2. Reference
    14317−0 10000 0 14276 425TNZCI2 TEST FOR END OF ROW 4F1D3910
␣␣␣CI3 = 6347
  1. Definition
    14313 0 77100 0 00001 421CI3 ARS1 SHIFT AND TEST COLUMN 4F1D3870
  2. References (3)
    TD14340−3 00000 0 14313 442X1 TXLCI3 OBTAIN NEXT GROUP 4F1D4080
    TD14346−3 00000 0 14313 448X2 TXLCI3 OBTAIN NEXT GROUP 4F1D4140
    TD14352−3 00000 0 14313 452TXLCI3 4F1D4180
␣␣␣CI4 = 6346
  1. Definition
    14312 2 00001 4 14302 420CI4 TIXCI1,4,1 COUNT CHARACTERS 4F1D3860
  2. References (2)
    14251−0 53400 4 14312 387LXDCI4,4 X 4F1D3530
    14342 3 00017 1 14312 444TXHCI4,1,15 TEST FOR BLANK 4F1D4100
␣␣␣CI5 = 6345
  1. Definition
    14311−0 60200 3 14446 419CI5 ORSD,3 STORE DIGIT 4F1D3850
␣␣␣CI6 = 6350
  1. Definition
    D14316−3 00000 4 14320 424CI6 TXLCI7,4 TEST FOR LAST NON-BLANK GROUP 4F1D3900
  2. References (2)
    14256−0 63400 4 14316 392PR1 SXDCI6,4 STORE END TEST 4F1D3560
    14315 1 77777 4 14316 423TXICI6,4,−1 COUNT GROUPS 4F1D3890
␣␣␣CI7 = 6352
  1. Definition
    14320−0 50000 2 14433 426CI7 CAL8.3,2 FORM TRUE 8,4 4F1D3920
  2. Reference
    D14316−3 00000 4 14320 424CI6 TXLCI7,4 TEST FOR LAST NON-BLANK GROUP 4F1D3900
␣␣␣CI8 = 6360
  1. Definition
    D14330−3 00000 4 14353 434CI8 TXLWP,4 TEST FOR END 4F1D4000
  2. Reference
    14257−0 63400 4 14330 393SXDCI8,4 X 4F1D3590
␣␣␣CI9 = 6335
  1. Definition
    14277 0 56000 4 00000 409CI9 LDQ0,4 OBTAIN GROUP 4F1D3750
  2. Reference
    14200 0 62100 0 14277 346STACI9 X 4F1D3120
␣␣␣CIR = 6333
  1. Definition
    14275−0 50000 0 14407 407CIR CALCOL1 INITIALIZE COLUMN INDICATOR 4F1D3730
  2. Reference
    14332 1 00020 2 14275 436TXICIR,2,16 INITIALIZE RIGHT HALF 4F1D4020
␣␣␣COL = 6408
  1. Definition
    14410 482COL BSS1 4F1D4460
  2. References (2)
    14276 0 60200 0 14410 408CI2 SLWCOL X 4F1D3740
    14305−0 50000 0 14410 415CALCOL POSITION COLUMN INDICATOR 4F1D3810
␣␣␣ES1 = 6159
  1. Definition
    A14017 0 00000 0 00000 231ES1 HTR 4F1D2290
  2. References (2)
    13760−0 60000 0 14017 200REP STQES1 4F1D1980
    13777 0 56000 0 14017 215LDQES1 4F1D2130
␣␣␣ES2 = 6160
  1. Definition
    A14020 0 00000 0 00000 232ES2 HTR 4F1D2300
  2. References (2)
    13761−0 63400 2 14020 201SXDES2,2 4F1D1990
    13776−0 53400 2 14020 214LXDES2,2 4F1D2120
␣␣␣ES3 = 6161
  1. Definition
    A14021 0 00000 0 00000 233ES3 HTR 4F1D2310
  2. References (2)
    13762−0 63400 1 14021 202SXDES3,1 4F1D2000
    13775−0 53400 1 14021 213LXDES3,1 4F1D2110
␣␣␣KEY = 6184
  1. Definition
    A14050 0 00000 0 00000 256 KEY HTR 4F1D2540
  2. References (2)
    13622 0 60100 0 14050 106STOKEY 4F1D1040
    13625−0 50100 0 14050 109SIX ORAKEY 4F1D1070
␣␣␣L11 = 6277
  1. Definition
    14205 0 73400 4 00013 351L11 PAX11,4 4F1D3170
␣␣␣LGL = 6119
  1. Definition
    13747−0 76300 0 00006 191LGL LGL6 4F1D1890
  2. References (2)
    13743 0 53400 2 13747 187LXALGL,2 4F1D1850
    13753 0 53400 2 13747 195LXALGL,2 4F1D1930
␣␣␣MK2 = 6406
  1. Definition
    14406+377777777777 480 MK2 OCT377777777777 4F1D4460
  2. Reference
    14356−0 50000 0 14406 456CALMK2 X 4F1D4220
␣␣␣MON = 1282
  1. Definition
    02402 499MON SYN1282 ADDRESS OF ENTRY TO MONITOR FOR A 4F1D4650
  2. Reference
    14031 0 02000 0 02402 241TRAMON AND RETURN TO SEC ONE MONITOR 4F1D2390
␣␣␣ONE = 6008
  1. Definition
    13570 0 34000 1 14504 80ONE CASTABLE,A PRINTING COMMENT 4F1D0780
  2. Reference
    13574 3 00000 1 13570 84THREE TXHONE,A,0 4F1D0820
␣␣␣OZ1 = 6375
  1. Definition
    14347−0 60200 2 14446 449OZ1 ORSZ,2 STORE 0-ZONE 4F1D4150
  2. Reference
    14341 2 00020 1 14347 443XZ1 TIXOZ1,1,16 TEST FOR 32/CH/48 4F1D4090
␣␣␣OZ2 = 6284
  1. Definition
    ATD14214−3 00000 0 00000 358OZ2 TXL 4F1D3240
  2. References (2)
    14300−0 63400 4 14214 410SXDOZ2,4 STORE GROUP COUNT 4F1D3760
    14314−0 53400 4 14214 422LXDOZ2,4 RESTORE GROUP COUNT 4F1D3880
␣␣␣PR1 = 6318
  1. Definition
    14256−0 63400 4 14316 392PR1 SXDCI6,4 STORE END TEST 4F1D3560
  2. References (2)
    14253 1 77777 4 14256 389TXIPR1,4,−1 X 4F1D3550
    14255 1 77777 4 14256 391TXIPR1,4,−1 X 4F1D3570
␣␣␣PR2 = 6314
  1. Definition
    14252 0 34000 4 00000 388PR2 CAS0,4 X 4F1D3540
  2. References (3)
    14177 0 62100 0 14252 345STAPR2 X 4F1D3110
    14254 1 00001 4 14252 390TXIPR2,4,1 X 4F1D3560
    TD14376−3 00000 0 14250 472TXLPR2−2 4F1D4380
␣␣␣PR3 = 6326
  1. Definition
    14266−0 53400 4 14211 400PR3 LXDPR6,4 INITIALIZE GROUP COUNT 4F1D3660
  2. Reference
    14264−3 00014 4 14266 398TXLPR3,4,12 4F1D3640
␣␣␣PR4 = 6330
  1. Definition
    14272 0 60200 1 14451 404PR4 SLWLT,1 X 4F1D3700
  2. Reference
    14274 2 00001 1 14272 406TIXPR4,1,1 X 4F1D3720
␣␣␣PR5 = 6327
  1. Definition
    14267 0 53400 2 14271 401PR5 LXAPR7,2 INITIALIZE LEFT SETUP 4F1D3670
  2. References (2)
    D14263−2 00000 4 14267 397PR8 TNXPR5,4 4F1D3630
    14401−3 00014 0 14267 475WP2 TXLPR5,0,12 CONVERT REST OF LINE 4F1D4410
␣␣␣PR6 = 6281
  1. Definition
    TD14211 3 00000 0 14212 355PR6 TXHT4 4F1D3210
  2. References (3)
    14206−0 63400 4 14211 352SXDPR6,4 4F1D3180
    14262−0 53400 4 14211 396LXDPR6,4 X 4F1D3620
    14266−0 53400 4 14211 400PR3 LXDPR6,4 INITIALIZE GROUP COUNT 4F1D3660
␣␣␣PR7 = 6329
  1. Definition
    T14271−0 75400 0 00000 403PR7 PXD X 4F1D3690
  2. Reference
    14267 0 53400 2 14271 401PR5 LXAPR7,2 INITIALIZE LEFT SETUP 4F1D3670
␣␣␣PR8 = 6323
  1. Definition
    D14263−2 00000 4 14267 397PR8 TNXPR5,4 4F1D3630
  2. Reference
    14260−0 63400 4 14263 394SXDPR8,4 X 4F1D3600
␣␣␣RAN = 6225
  1. Definition
    14121 0 50000 4 00001 299RAN CLA1,4 4F1D2650
␣␣␣REP = 6128
  1. Definition
    13760−0 60000 0 14017 200REP STQES1 4F1D1980
  2. References (8)
    13705 0 07400 4 13760 157TSXREP,4 4F1D1550
    13710 0 07400 4 13760 160TSXREP,4 4F1D1580
    13715 0 07400 4 13760 165TSXREP,4 4F1D1630
    13723 0 07400 4 13760 171TSXREP,4 4F1D1690
    13726 0 07400 4 13760 174TSXREP,4 4F1D1720
    13731 0 07400 4 13760 177TSXREP,4 4F1D1750
    13734 0 07400 4 13760 180TSXREP,4 4F1D1780
    13740 0 07400 4 13760 184TSXREP,4 4F1D1620
␣␣␣RNA = 6259
  1. Definition
    A14163 0 00000 0 00000 333RNA HTR 4F1D2990
  2. References (5)
    14122 0 62100 0 14163 300STARNA 4F1D2660
    14126 0 50000 0 14163 304RN40 CLARNA 4F1D2700
    14134 0 40000 0 14163 310ADDRNA 4F1D2760
    14146 0 62100 0 14163 320STARNA 4F1D2860
    14155 0 40000 0 14163 327ADDRNA 4F1D2930
␣␣␣RNB = 6260
  1. Definition
    A14164 0 00000 0 00000 334RNB HTR 4F1D3000
  2. References (3)
    14124 0 60100 0 14164 302STORNB 4F1D2680
    14130 0 34000 0 14164 306CASRNB 4F1D2720
    14153 0 50000 0 14164 325RN50 CLARNB 4F1D2910
␣␣␣RNC = 6261
  1. Definition
    A14165 0 00000 0 00000 335RNC HTR 4F1D3010
  2. References (2)
    14125−0 63400 4 14165 303SXDRNC,4 4F1D2690
    14161−0 53400 4 14165 331LXDRNC,C 4F1D2970
␣␣␣RND = 6262
  1. Definition
    14166 0 00000 0 00024 336RND HTR20 4F1D3020
  2. Reference
    14127 0 40000 0 14166 305ADDRND 4F1D2710
␣␣␣RNE = 6263
  1. Definition
    14167 0 00000 0 00001 337RNE HTR1 4F1D3030
  2. References (2)
    14142 0 40200 0 14167 316SUBRNE 4F1D2820
    14144 0 40200 0 14167 318SUBRNE 4F1D2840
␣␣␣RPR = 6310
  1. Definition
    14246 0 76600 0 00361 384RPR WPR 4F1D3500
  2. References (4)
    TD14216−3 00000 0 14250 360TXLRPR+2 4F1D3260
    TD14226−3 00000 0 14247 368TXLRPR+1 SUPPRESS SPACE 4F1D3340
    TD14231−3 00000 0 14250 371TXLRPR+2 BLANK 4F1D3370
    14244−2 00001 1 14246 382N5 TNXRPR,1,1 X 4F1D3480
␣␣␣SES = 6185
  1. Definition
    A14051 0 00000 0 00000 257 SES HTR 4F1D2550
  2. References (4)
    13647 0 60100 0 14051 127STOSES 4F1D1250
    13651 0 40200 0 14051 129SUBSES 4F1D1270
    13653 0 60100 0 14051 131STOSES 4F1D1290
    13656−0 50100 0 14051 134ORASES 4F1D1320
␣␣␣SIX = 6037
  1. Definition
    13625−0 50100 0 14050 109SIX ORAKEY 4F1D1070
  2. Reference
    13620 3 00000 2 13625 104TXHSIX,B,0 4F1D1020
␣␣␣SP4 = 6285
  1. Definition
    14215 0 76000 0 00364 359SP4 SPR4 4F1D3250
  2. Reference
    14223 0 10000 0 14215 365TZESP4 DOUBLE SPACE IF ZERO 4F1D3310
␣␣␣TIX = 6136
  1. Definition
    13770 2 00001 2 13767 208TIX TIXTIX−1,2,1 4F1D2060
  2. Reference
    13770 2 00001 2 13767 208TIX TIXTIX−1,2,1 4F1D2060
␣␣␣TWO = 6011
  1. Definition
    13573 1 77777 1 13574 83TWO TXITHREE,A,−1 4F1D0810
  2. References (2)
    13571 0 02000 0 13573 81TRATWO 4F1D0790
    13610 0 02000 0 13573 96TRATWO 4F1D0940
␣␣␣TXE = 6094
  1. Definition
    13716−3 77622 1 14022 166TXE TXLEXIT,1,−110 4F1D1640
  2. Reference
    13721−0 10000 0 13716 169TNZTXE 4F1D1670
␣␣␣TXI = 6122
  1. Definition
    13752 1 77777 1 13753 194TXI TXITXI+1,1,−1 4F1D1920
  2. References (2)
    13742−0 53400 1 13752 186SETNBC LXDTXI,1 4F1D1840
    13752 1 77777 1 13753 194TXI TXITXI+1,1,−1 4F1D1920
␣␣␣TXL = 6133
  1. Definition
    13765−3 00005 2 13767 205TXL TXLTXL+2,2,5 4F1D2030
  2. References (2)
    13765−3 00005 2 13767 205TXL TXLTXL+2,2,5 4F1D2030
    13766 1 00001 1 13771 206TXITXL+4,1,1 4F1D2040
␣␣␣WOT = 6264
  1. Definition
    14170−0 63400 1 14340 338WOT SXDX1,1 4F1D3040
  2. References (2)
    14136 0 07400 4 14170 312TSXWOT,C 4F1D2780
    14157 0 07400 4 14170 329TSXWOT,C 4F1D2950
␣␣␣WP2 = 6401
  1. Definition
    14401−3 00014 0 14267 475WP2 TXLPR5,0,12 CONVERT REST OF LINE 4F1D4410
  2. Reference
    14355−0 53400 1 14401 455WP9 LXDWP2,1 MASK OUT FIRST COL, OF CARD IMAGE 4F1D4210
␣␣␣WP4 = 6392
  1. Definition
    D14370 3 00000 4 14377 466WP4 TXHWP5,4 4F1D4320
  2. Reference
    14261−0 63400 4 14370 395SXDWP4,4 X 4F1D3610
␣␣␣WP5 = 6399
  1. Definition
    14377 0 76600 0 00361 473WP5 WPR 4F1D4390
  2. Reference
    D14370 3 00000 4 14377 466WP4 TXHWP5,4 4F1D4320
␣␣␣WP7 = 6385
  1. Definition
    14361−0 53400 1 14213 459WP7 LXDZ2,1 COPY LOOP 4F1D4250
  2. Reference
    TD14354−3 00000 0 14361 454TXLWP7 NO PROGRAM 4F1D4200
␣␣␣WP9 = 6381
  1. Definition
    14355−0 53400 1 14401 455WP9 LXDWP2,1 MASK OUT FIRST COL, OF CARD IMAGE 4F1D4210
  2. Reference
    TD14353 3 00000 0 14355 453WP TXHWP9 INVERTED TO TXL IF PROGRAM CARRIAGE CONTROL 4F1D4190
␣␣␣WT2 = 6395
  1. Definition
    14373−0 53400 4 14403 469WT2 LXDX4,4 X 4F1D4350
␣␣␣XXX = 6175
  1. Definition
    14037 676767676767 247 XXX BCD1XXXXXX 4F1D2450
  2. References (3)
    13567 0 50000 0 14037 79CLAXXX CONSTRUCT CALLING SEQUENCE WORD FOR 4F1D0770
    13607 0 50000 0 14037 95CLAXXX 4F1D0930
    13623 0 50000 0 14037 107CLAXXX 4F1D1050
␣␣␣XZ1 = 6369
  1. Definition
    14341 2 00020 1 14347 443XZ1 TIXOZ1,1,16 TEST FOR 32/CH/48 4F1D4090
  2. Reference
    14333 2 00020 1 14341 437YZ1 TIXXZ1,1,16 TEST FOR 16/CH/32 4F1D4030
␣␣␣XZ2 = 6372
  1. Definition
    14344−0 60200 2 14447 446XZ2 ORSX,2 STORE X-ZONE 4F1D4120
  2. Reference
    14334 3 00017 1 14344 438TXHXZ2,1,15 TEST FOR X-ZONE 4F1D4040
␣␣␣YZ1 = 6363
  1. Definition
    14333 2 00020 1 14341 437YZ1 TIXXZ1,1,16 TEST FOR 16/CH/32 4F1D4030
  2. References (2)
    14270−0 53400 1 14333 402LXDYZ1,1 CLEAR CARD IMAGE 4F1D3680
    14307 2 00020 1 14333 417TIXYZ1,1,16 TEST FOR DIGIT 4F1D3830
␣␣␣YZ2 = 6366
  1. Definition
    14336−0 60200 2 14450 440YZ2 ORSY,2 STORE Y-ZONE 4F1D4060
  2. Reference
    14310 3 00017 1 14336 418TXHYZ2,1,15 TEST FOR Y-ZONE 4F1D3840
␣␣8.4L = 6427
  1. Definition
    14433 4938.4L SYNLT−14 4F1D4590
␣␣8.4R = 6411
  1. Definition
    14413 4948.4R SYNRT−14 4F1D4600
␣␣COL1 = 6407
  1. Definition
    14407−0 00000 0 00000 481COL1 MZE 4F1D4470
  2. Reference
    14275−0 50000 0 14407 407CIR CALCOL1 INITIALIZE COLUMN INDICATOR 4F1D3730
␣␣COMM = 6165
  1. Definition
    A14025 0 00000 0 00000 237COMM HTR 4F1D2350
  2. Reference
    13632 0 60100 0 14025 114EIGHT STOCOMM 4F1D1120
␣␣CRAN = 6386
  1. Definition
    14362 0 70000 1 14435 460CRAN CPYLT−12,1 4F1D4260
  2. Reference
    14365 3 77764 1 14362 463T2 TXHCRAN,1,−12 4F1D4290
␣␣DIAG = 5920
  1. Definition
    5704 FORTRAN TWO, SECTION ONE DIAGNOSTIC RECORD F020. 4F1D0050
    6 4F1D0060
    7THIS RECORD IS CALLED IN FROM TAPE ONCE FOR EACH ERROR IN 4F1D0070
    8SECTION ONE AND ONCE AT THE END OF SECTION ONE, 4F1D0080
    9 4F1D0090
    13440 10DIAG ORG1824+4096 MOD 4K OR 8K MACHINE SIZE 4F1D0100
  2. Reference
    00000 0 13440 0 13440 3PZEDIAG,,DIAG 4F1D0030
␣␣DIGF = 6298
  1. Definition
    14232 0 76000 0 00372 372DIGF SPR10 SET CHANNEL SKIP 4F1D3380
  2. Reference
    TD14230−3 00000 0 14232 370TXLDIGF NO 4F1D3360
␣␣EDIT = 5920
  1. Definition
    13440 3 00000 4 13543 15EDIT TXHERENT,C,0 IF IR4 IS ZERO THIS IS THE END OF SEC ONE. 4F1D0150
␣␣ENDM = 6158
  1. Definition
    14016+000000000077 230ENDM OCT77 4F1D2280
  2. References (2)
    13720 0 40200 0 14016 168SUBENDM 4F1D1660
    13764−0 50000 0 14016 204CALENDM 4F1D2020
␣␣EXIT = 6162
  1. Definition
    14022 496EXIT SYNSECND 4F1D4620
  2. References (5)
    13677−0 10000 0 14022 151TNZEXIT 4F1D1490
    13713−0 10000 0 14022 163TNZEXIT 4F1D1610
    13716−3 77622 1 14022 166TXE TXLEXIT,1,−110 4F1D1640
    13724 0 02000 0 14022 172TRAEXIT 4F1D1700
    13741 0 02000 0 14022 185TRAEXIT 4F1D1830
␣␣FIVE = 6026
  1. Definition
    13612−0 75400 1 00000 98FIVE PXD0,A 4F1D0960
  2. References (2)
    13601 3 00000 2 13612 89FOUR TXHFIVE,B,0 4F1D0870
    13611 1 77777 1 13612 97NINE TXIFIVE,A,−1 4F1D0950
␣␣FORG = 6179
  1. Definition
    14043 0 01150 0 00000 251 FORG HTR0,0,F−2 4F1D2490
  2. References (2)
    13652 0 40000 0 14043 130ADDFORG 4F1D1280
    13654 0 50000 0 14043 132CLAFORG 4F1D1300
␣␣FOUR = 6017
  1. Definition
    13601 3 00000 2 13612 89FOUR TXHFIVE,B,0 4F1D0870
  2. Reference
    13572 0 02000 0 13601 82TRAFOUR 4F1D0800
␣␣HALT = 6176
  1. Definition
    14040+000000077777 248 HALT OCT77777 4F1D2460
␣␣L(0) = 6173
  1. Definition
    A14035 0 00000 0 00000 245 L(0) HTR 4F1D2430
  2. References (3)
    13556 0 53400 1 14035 70LXAL(0),1 SET TO SEARCH TABLE OF NUMBERS OF MACHINE 4F1D0680
    13566 0 53400 3 14035 78LXAL(0),3 4F1D0760
    13645−0 53400 1 14035 125LXDL(0),A 4F1D1230
␣␣L(8) = 6155
  1. Definition
    14013 0 00000 0 00010 227L(8) 8 4F1D2250
  2. Reference
    13452 0 53400 4 14013 25LXAL(8),4 NONE WERE, SO BACKSPACE TAPE 1 TO MACHINE 4F1D0250
␣␣L(=) = 6147
  1. Definition
    14003 000000000013 219L(=) BCD100000= 4F1D2170
  2. Reference
    13712 0 40200 0 14003 162SUBL(=) 4F1D1600
␣␣L(A) = 6153
  1. Definition
    14011 000000000021 225L(A) BCD100000A 4F1D2230
  2. Reference
    13730 0 50000 0 14011 176CLAL(A) CHANGE TEN BACK TO A 4F1D1740
␣␣L(C) = 6152
  1. Definition
    14010 000000000023 224L(C) BCD100000C 4F1D2220
  2. Reference
    13725 0 50000 0 14010 173CALLBK CLAL(C) CHANGE Z BACK TO C 4F1D1710
␣␣L(F) = 6146
  1. Definition
    14002 000000000026 218L(F) BCD100000F 4F1D2160
  2. Reference
    13707 0 50000 0 14002 159CLAL(F) 4F1D1570
␣␣L(I) = 6145
  1. Definition
    14001 000000000031 217L(I) BCD100000I 4F1D2150
  2. Reference
    13704 0 50000 0 14001 156CLAL(I) 4F1D1540
␣␣L(L) = 6154
  1. Definition
    14012 000000000043 226L(L) BCD100000L 4F1D2240
  2. References (2)
    13733 0 50000 0 14012 179CLAL(L) CHANGE EQUAL BACK TO FIRST L 4F1D1770
    13737 0 50000 0 14012 183SECL CLAL(L) CHANGE BLANK BACK TO SECOND L 4F1D1810
␣␣L(X) = 6151
  1. Definition
    14007 000000000067 223L(X) BCD100000X 4F1D2210
  2. Reference
    13702 0 40200 0 14007 154SUBL(X) 4F1D1520
␣␣NINE = 6025
  1. Definition
    13611 1 77777 1 13612 97NINE TXIFIVE,A,−1 4F1D0950
  2. Reference
    13606 0 10000 0 13611 94TZENINE 4F1D0920
␣␣NNBC = 6118
  1. Definition
    T13746−0 75400 0 00000 190NNBC PXD 4F1D1880
  2. References (9)
    13674 0 07400 4 13746 148TSXNNBC,4 4F1D1460
    13675 0 07400 4 13746 149TSXNNBC,4 4F1D1470
    13701 0 07400 4 13746 153TSXNNBC,4 4F1D1510
    13706 0 07400 4 13746 158TSXNNBC,4 4F1D1560
    13711 0 07400 4 13746 161TSXNNBC,4 4F1D1590
    13717 0 07400 4 13746 167TSXNNBC,4 4F1D1650
    13727 0 07400 4 13746 175TSXNNBC,4 4F1D1730
    13732 0 07400 4 13746 178TSXNNBC,4 4F1D1760
    13756 0 02000 0 13746 198TRANNBC 4F1D1960
␣␣NUMB = 6183
  1. Definition
    A14047 0 00000 0 00000 255 NUMB HTR 4F1D2530
  2. References (4)
    13555 0 60100 0 14047 69STONUMB 4F1D0670
    13575 0 50000 0 14047 85CLANUMB 4F1D0830
    13604 0 50000 0 14047 92CLANUMB 4F1D0900
    13627 0 50000 0 14047 111SEVEN CLANUMB 4F1D1090
␣␣ONES = 6174
  1. Definition
    14036−377777777777 246 ONES OCT777777777777 4F1D2440
  2. Reference
    13640 0 50000 0 14036 120CLAONES 4F1D1180
␣␣PROG = 6075
  1. Definition
    13673 0 07400 4 13742 147PROG TSXSETNBC,4 4F1D1450
  2. Reference
    13662−0 10000 0 13673 138TNZPROG 4F1D1360
␣␣RN20 = 6248
  1. Definition
    A14150 0 60100 0 00000 322RN20 STO 4F1D2880
  2. Reference
    14143 0 62100 0 14150 317STARN20 4F1D2830
␣␣RN30 = 6249
  1. Definition
    A14151 0 60100 0 00000 323RN30 STO 4F1D2890
  2. Reference
    14145 0 62100 0 14151 319STARN30 4F1D2850
␣␣RN40 = 6230
  1. Definition
    14126 0 50000 0 14163 304RN40 CLARNA 4F1D2700
  2. Reference
    14152 0 02000 0 14126 324TRARN40 4F1D2900
␣␣RN50 = 6251
  1. Definition
    14153 0 50000 0 14164 325RN50 CLARNB 4F1D2910
  2. Reference
    14132 0 02000 0 14153 308TRARN50 4F1D2740
␣␣RN60 = 6256
  1. Definition
    A14160 0 00000 0 00000 330RN60 HTR 4F1D2960
  2. Reference
    14156 0 60100 0 14160 328STORN60 4F1D2940
␣␣RPR2 = 6397
  1. Definition
    14375 0 76600 0 00361 471RPR2 WPR 4F1D4370
␣␣SECL = 6111
  1. Definition
    13737 0 50000 0 14012 183SECL CLAL(L) CHANGE BLANK BACK TO SECOND L 4F1D1810
  2. References (2)
    13735 2 00001 2 13737 181TIXSECL,2,1 4F1D1790
    13736 1 77777 1 13737 182TXISECL,1,−1 ADJUST COUNTS FOR NEXT CHAR 4F1D1800
␣␣STOP = 6199
  1. Definition
    14067 006060606060 271 STOP BCD70␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣ 4F1D2580
  2. References (2)
    13445 0 14104 0 14067 20HTRSTOP,0,XCOM 4F1D0200
    13666 0 14067 0 14052 142HTRSTART,0,STOP 4F1D1400
␣␣XCOM = 6212
  1. Definition
    A14104 0 00000 0 00000 284XCOM HTR 4F1D2600
  2. References (4)
    13445 0 14104 0 14067 20HTRSTOP,0,XCOM 4F1D0200
    13576 0 60100 0 14104 86STOXCOM 4F1D0840
    13630 0 60100 0 14104 112STOXCOM 4F1D1100
    14046 0 14121 0 14104 254 XKEY HTRXCOM,0,XXCOM 4F1D2520
␣␣XKEY = 6182
  1. Definition
    14046 0 14121 0 14104 254 XKEY HTRXCOM,0,XXCOM 4F1D2520
  2. References (2)
    13577−0 50000 0 14046 87CALXKEY 4F1D0850
    13631 0 50000 0 14046 113CLAXKEY 4F1D1110
␣BLANK = 6181
  1. Definition
    14045 606060606060 253 BLANK BCD1␣␣␣␣␣␣ 4F1D2510
  2. Reference
    13635 0 50000 0 14045 117CLABLANK 4F1D1150
␣BLNKS = 6402
  1. Definition
    14402 606060606060 476BLNKS BCD1␣␣␣␣␣␣ 4F1D4420
  2. References (2)
    14147 0 50000 0 14402 321CLABLNKS 4F1D2870
    14250 0 50000 0 14402 386CLABLNKS FIND LAST NON-BLANK GROUP 4F1D3520
␣COUNT = 5986
  1. Definition
    13542 0 00000 0 00024 56COUNT 20 4F1D0540
  2. Reference
    13557 0 53400 2 13542 71LXACOUNT,2 ERRORS, 4F1D0690
␣EIGHT = 6042
  1. Definition
    13632 0 60100 0 14025 114EIGHT STOCOMM 4F1D1120
  2. References (2)
    13600 0 02000 0 13632 88TRAEIGHT 4F1D0860
    13626 0 02000 0 13632 110TRAEIGHT 4F1D1080
␣ERENT = 5987
  1. Definition
    57 4F1D0550
    58THIS IS AN ERROR CALL. 4F1D0560
    13543−0 75400 4 00000 59ERENT PXD0,C 4F1D0570
  2. Reference
    13440 3 00000 4 13543 15EDIT TXHERENT,C,0 IF IR4 IS ZERO THIS IS THE END OF SEC ONE. 4F1D0150
␣EXITX = 32767
  1. Definition
    77777 14EXITX EQU32767 4F1D0140
␣L(1)D = 6170
  1. Definition
    14032+000001000000 242 L(1)D OCT1000000 4F1D2400
  2. References (2)
    13545 0 40000 0 14032 61ADDL(1)D 4F1D0590
    13614 0 40000 0 14032 100ADDL(1)D 4F1D0980
␣L(10) = 6156
  1. Definition
    14014+000000000012 228L(10) OCT12 4F1D2260
  2. Reference
    13676 0 40200 0 14014 150SUBL(10) 4F1D1480
␣L(12) = 6157
  1. Definition
    14015 0 00000 0 00014 229L(12) 12 4F1D2270
  2. Reference
    13456 0 53400 4 14015 29SOURCE LXAL(12),4 SOME SOURCE PROGRAM ERRORS, RECOMPILATION 4F1D0290
␣L(4)D = 6171
  1. Definition
    14033+000004000000 243L(4)D OCT4000000 4F1D2410
  2. References (3)
    13442−0 32000 0 14033 17ANAL(4)D IF IT IS THE END OF SEC ONE WERE THERE ANY 4F1D0170
    13661−0 32000 0 14033 137ANAL(4)D 4F1D1350
    13663 0 50000 0 14033 139CLAL(4)D NO, MAKE ERROR CALL INDICATION 4F1D1370
␣L(6)D = 6172
  1. Definition
    14034+000006000000 244 L(6)D OCT6000000 4F1D2420
  2. Reference
    13551−0 53400 2 14034 65LXDL(6)D,B 4F1D0630
␣L(LP) = 6148
  1. Definition
    14004 000000000074 220L(LP) BCD100000( 4F1D2180
  2. Reference
    13714 0 50000 0 14004 164CLAL(LP) 4F1D1620
␣L(RP) = 6149
  1. Definition
    14005 000000000034 221L(RP) BCD100000) 4F1D2190
  2. Reference
    13722 0 50000 0 14005 170CLAL(RP) 4F1D1680
␣L(X)D = 6177
  1. Definition
    14041+000161000000 249 L(X)D OCT161000000 4F1D2470
  2. References (2)
    13637−0 53400 1 14041 119LXDL(X)D,A CONSTRUCT CALLING SEQUENCE WORD 4F1D1170
    13650 0 50000 0 14041 128CLAL(X)D 4F1D1260
␣PRINT = 6225
  1. Definition
    14121 298PRINT BSS0 4F1D2640
  2. References (5)
    13444 0 07400 4 14121 19TSXPRINT,C 4F1D0190
    13446 0 07400 4 14121 21TSXPRINT,C BIT IN WORD 20 OCTAL), IF THERE WERE NO 4F1D0210
    13665 0 07400 4 14121 141TSXPRINT,C AND PRINT HEADING 4F1D1390
    14022 0 07400 4 14121 234SECND TSXPRINT,C PRINT STATEMENT 4F1D2320
    14024 0 07400 4 14121 236TSXPRINT,C PRINT COMMENT 4F1D2340
␣RAN10 = 6239
  1. Definition
    A14137 0 00000 0 00000 313RAN10 HTR 4F1D2790
  2. References (2)
    14135 0 60100 0 14137 311STORAN10 4F1D2770
    14140 0 50000 0 14137 314CLARAN10 4F1D2800
␣RESTR = 6180
  1. Definition
    14044 016060606060 252 RESTR BCD11␣␣␣␣␣ 4F1D2500
  2. Reference
    13447 0 14045 0 14044 22PZERESTR,0,RESTR+1 ERRORS GO TO SEC ONE PRIME. IF THERE WERE 4F1D0220
␣SECND = 6162
  1. Definition
    14022 0 07400 4 14121 234SECND TSXPRINT,C PRINT STATEMENT 4F1D2320
  2. Reference
    14022 496EXIT SYNSECND 4F1D4620
␣SEVEN = 6039
  1. Definition
    13627 0 50000 0 14047 111SEVEN CLANUMB 4F1D1090
  2. Reference
    13603 0 10000 0 13627 91TZESEVEN 4F1D0890
␣STA05 = 6049
  1. Definition
    13641 0 34000 1 01331 121STA05 CASF+111,A 4F1D1190
  2. Reference
    13644 2 00001 1 13641 124STA10 TIXSTA05,A,1 4F1D1220
␣STA10 = 6052
  1. Definition
    13644 2 00001 1 13641 124STA10 TIXSTA05,A,1 4F1D1220
  2. Reference
    13642 0 02000 0 13644 122TRASTA10 4F1D1200
␣STA20 = 6054
  1. Definition
    13646−0 75400 1 00000 126STA20 PXD0,A 4F1D1240
  2. Reference
    13643 0 02000 0 13646 123TRASTA20 4F1D1210
␣START = 6186
  1. Definition
    14052 016060606060 258START BCD71␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣␣ 4F1D2560
  2. Reference
    13666 0 14067 0 14052 142HTRSTART,0,STOP 4F1D1400
␣STATE = 6163
  1. Definition
    A14023 0 00000 0 00000 235STATE HTR 4F1D2330
  2. Reference
    13657 0 60100 0 14023 135STOSTATE 4F1D1330
␣TABAD = 6178
  1. Definition
    14042 0 14504 0 00000 250 TABAD HTR0,0,TABLE 4F1D2480
  2. Reference
    13617 0 40000 0 14042 103ADDTABAD 4F1D1010
␣TABLE = 6468
  1. Definition
    501 4F1D4670
    502 4F1D4680
    503TABLE OF DIAGNOSTIC COMMENTS, SECTION ONE OF 704 FORTRAN II. 4F1D4690
    504 4F1D4700
    505 4F1D4710
    506COMMON 4F1D4720
    507 4F1D4730
    14504 508TABLE BSS0 4F1D4740
  2. References (4)
    13570 0 34000 1 14504 80ONE CASTABLE,A PRINTING COMMENT 4F1D0780
    13602 0 40200 1 14505 90SUBTABLE+1,A 4F1D0880
    13605 0 40200 1 14505 93SUBTABLE+1,A 4F1D0910
    14042 0 14504 0 00000 250 TABAD HTR0,0,TABLE 4F1D2480
␣THREE = 6012
  1. Definition
    13574 3 00000 1 13570 84THREE TXHONE,A,0 4F1D0820
  2. References (2)
    13573 1 77777 1 13574 83TWO TXITHREE,A,−1 4F1D0810
    13624 1 00001 2 13574 108TXITHREE,B,1 4F1D1060
␣XXCOM = 6225
  1. Definition
    14121 297XXCOM BSS0 4F1D2630
  2. Reference
    14046 0 14121 0 14104 254 XKEY HTRXCOM,0,XXCOM 4F1D2520
␣YZONE = 6404
  1. Definition
    14404+000000000020 478YZONE OCT20 4F1D4440
  2. Reference
    14224 0 34000 0 14404 366CASYZONE TEST FOR SPACE SUPPRESS 4F1D3320
BLANKX = 6150
  1. Definition
    14006 000000000060 222BLANKX BCD100000␣ 4F1D2200
  2. Reference
    13754 0 34000 0 14006 196CAS CASBLANKX 4F1D1940
CALLBK = 6101
  1. Definition
    13725 0 50000 0 14010 173CALLBK CLAL(C) CHANGE Z BACK TO C 4F1D1710
  2. Reference
    13703−0 10000 0 13725 155TNZCALLBK 4F1D1530
DCELL1 = 1271
  1. Definition
    02367 500DCELL1 SYN1271 4F1D4660
  2. References (2)
    13450 0 53400 4 02367 23LXADCELL1,4 GET INDICATOR OF SOURCE PROGRAM ERRORS. 4F1D0230
    13565 0 62100 0 02367 77STADCELL1 SET INDICATOR TO NON-ZERO FOR SOURCE ERROR 4F1D0750
MACERR = 5948
  1. Definition
    34NUMBERS OF MACHINE ERROR CALL FROM SECTION ONE, 4F1D0340
    13474 000002000304 35MACERR BCD1002034 4F1D0350
  2. Reference
    13560 0 34000 1 13474 72CASMACERR,1 COMPARE EACH ENTRY IN TABLE TO OCTAL 4F1D0700
SETNBC = 6114
  1. Definition
    13742−0 53400 1 13752 186SETNBC LXDTXI,1 4F1D1840
  2. References (2)
    13673 0 07400 4 13742 147PROG TSXSETNBC,4 4F1D1450
    13700 0 07400 4 13742 152TSXSETNBC,4 4F1D1500
SOURCE = 5934
  1. Definition
    13456 0 53400 4 14015 29SOURCE LXAL(12),4 SOME SOURCE PROGRAM ERRORS, RECOMPILATION 4F1D0290
  2. Reference
    13451 3 00000 4 13456 24TXHSOURCE,4,0 TEST IF ANY OF ERROR WERE SOURCE. 4F1D0240