,0080121001                                     PRINT-READ              1060A 0A
,008012,019,026030L0653681001,008012,00110011B361080AB421/340080 1 OF 2 1060A 02
,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 1060A 03
L057S4510012,049L0772772/2772)/40/60)/80L/892702/2702413    CARD 1 OF 3 1060A 04
,019026,033,040044,051051/340001       TITLE PRINT ROUTINE  CARD 2 OF 3 1060A 05
,S01S05,S12,S13S17,S18S25,S29S36,S37S41,S45/333080          CARD 3 OF 3 1060A 06
L0314191001/332                 START TEST                              1060A 07
L0314231001/                                                            1060A 08
L0314241001L604S22              MODIFY TITLE PRINT TO SKIP HEADINGS     1060A 09
L0314311001BS00S521             BR TO TITLE PRINT ROUTINE IF 1 IN S52   1060A 10
L0314391001/080                 CLEAR READ AREA                         1060A 11
L0314431001,001                 SET WM IN READ AREA                     1060A 12
L03144710011                    READ                                    1060A 13
L0314481001L080280              LOAD PRINT AREA                         1060A 14
L0314551001V4540012             BRANCH IF NO ZONE IN 001                1060A 15
L03146310013                    PRINT-READ                              1060A 16
L0314641001B444B                B ON TO SCOPE                           1060A 17
L0314691001B464                 BRANCH TO MODIFY CHAIN. ROUTINE         1060A 18
L03147310013459                 PRINT-READ AND BRANCH                   1060A 19
L0314771001.                    ERROR STOP IF NO BRANCH                 1060A 20
L0314781001B454B                B ON TO SCOPE                           1060A 21
L0314831001D479360              MODIFY B421 IN CHAINING ROUTINE TO B429 1060A 22
L0314901001B420D                D ON TO REPEAT TEST                     1060A 23
L0314951001B349                 BRANCH TO TEST FOR NEXT PROGRAM         1060A 24
L0316191001B420                 BRANCH INSTRUCTION TO MODIFY TITLE PRINT1060A 25
B400                                            PRINT-READ              1060A 26
AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CM1060A 27
KT4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV1060A 28
T4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV61060A 29
4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 1060A 30
 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 D1060A 31
BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DN1060A 32
LU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW1060A 33
U5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW71060A 34
5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_1060A 35
"CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_E1060A 36
CMV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EO1060A 37
MV6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX1060A 38
V6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX81060A 39
6 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 1060A 40
 DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 F1060A 41
DNW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FP1060A 42
NW7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY1060A 43
W7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY91060A 44
7_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+1060A 45
_EOX8 FPY9+GQZ0 HR`#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+G1060A 46
