,0080121001                                     READ-PUNCH              1070A 0A
,008012,019,026030L0653681001,008012,00110011B361080AB421/340080 1 OF 2 1070A 02
,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 1070A 03
L057S4510012,049L0772772/2772)/40/60)/80L/892702/2702413    CARD 1 OF 3 1070A 04
,019026,033,040044,051051/340001       TITLE PRINT ROUTINE  CARD 2 OF 3 1070A 05
,S01S05,S12,S13S17,S18S25,S29S36,S37S41,S45/333080          CARD 3 OF 3 1070A 06
L0314191001/332                 START TEST                              1070A 07
L0314231001/                                                            1070A 08
L0314241001L604S22              MODIFY TITLE PRINT TO SKIP HEADINGS     1070A 09
L0314311001BS00S521             BR TO TITLE PRINT ROUTINE IF 1 IN S52   1070A 10
L0314391001/080                 CLEAR READ AREA                         1070A 11
L0314431001,001                 SET WM IN READ AREA                     1070A 12
L03144710011                    READ                                    1070A 13
L0314481001L080180              LOAD PUNCH AREA                         1070A 14
L0314551001V4540012             BRANCH IF NO ZONE IN 001                1070A 15
L03146310015                    READ-PUNCH                              1070A 16
L0314641001B444B                B ON TO SCOPE                           1070A 17
L0314691001B464                 BRANCH TO MODIFY CHAIN. ROUTINE         1070A 18
L03147310015459                 READ-PUNCH AND BRANCH                   1070A 19
L0314771001.                    ERROR STOP IF NO BRANCH                 1070A 20
L0314781001B454B                B ON TO SCOPE                           1070A 21
L0314831001D479360              MODIFY B421 IN CHAINING ROUTINE TO B429 1070A 22
L0314901001B420D                D ON TO REPEAT TEST                     1070A 23
L0314951001B349                 BRANCH TO TEST FOR NEXT PROGRAM         1070A 24
L0316191001B420                 BRANCH INSTRUCTION TO MODIFY TITLE PRINT1070A 25
B400                                            READ-PUNCH              1070A 26
AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CM1070A 27
KT4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV1070A 28
T4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV61070A 29
4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 1070A 30
 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 D1070A 31
BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DN1070A 32
LU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW1070A 33
U5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW71070A 34
5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_1070A 35
"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_E1070A 36
CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EO1070A 37
MV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX1070A 38
V6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX81070A 39
6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 1070A 40
 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 F1070A 41
DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FP1070A 42
NW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY1070A 43
W7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY91070A 44
7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+1070A 45
_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+G1070A 46
