,0080121001                                     PRINT-READ-PUNCH        1080A 0A
,008012,019,026030L0653681001,008012,00110011B361080AB421/340080 1 OF 2 1080A 02
,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 1080A 03
L057S4510012,049L0772772/2772)/40/60)/80L/892702/2702413    CARD 1 OF 3 1080A 04
,019026,033,040044,051051/340001       TITLE PRINT ROUTINE  CARD 2 OF 3 1080A 05
,S01S05,S12,S13S17,S18S25,S29S36,S37S41,S45/333080          CARD 3 OF 3 1080A 06
L0314191001/332                 START TEST                              1080A 07
L0314231001/                                                            1080A 08
L0314241001L604S22              MODIFY TITLE PRINT TO SKIP HEADINGS     1080A 09
L0314311001BS00S521             BR TO TITLE PRINT ROUTINE IF 1 IN S52   1080A 10
L0314391001/080                 CLEAR READ AREA                         1080A 11
L0314431001,001                 SET WM IN READ AREA                     1080A 12
L03144710011                    READ                                    1080A 13
L0314481001L080180              LOAD PUNCH AREA                         1080A 14
L0314551001L080280              LOAD PRINT AREA                         1080A 15
L0314621001V4610012             BRANCH IF NO ZONE IN 001                1080A 16
L03147010017                    PRINT-READ-PUNCH                        1080A 17
L0314711001B451B                B ON TO SCOPE                           1080A 18
L0314761001B471                 BRANCH TO MODIFY CHAIN. ROUTINE         1080A 19
L03148010017466                 PRINT-READ-PUNCH AND BRANCH             1080A 20
L0314841001.                    ERROR STOP IF NO BRANCH                 1080A 21
L0314851001B461B                B ON TO SCOPE                           1080A 22
L0314901001D486360              MODIFY B421 IN CHAINING ROUTINE TO B429 1080A 23
L0314971001B420D                D ON TO REPEAT TEST                     1080A 24
L0315021001B349                 BRANCH TO TEST FOR NEXT PROGRAM         1080A 25
L0316191001B420                 BRANCH INSTRUCTION TO MODIFY TITLE PRINT1080A 26
B400                                            PRINT-READ-PUNCH        1080A 27
AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CM1080A 28
KT4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV1080A 29
T4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV61080A 30
4 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 1080A 31
 BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 D1080A 32
BLU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DN1080A 33
LU5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW1080A 34
U5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW71080A 35
5"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_1080A 36
"CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_E1080A 37
CMV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EO1080A 38
MV6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX1080A 39
V6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX81080A 40
6 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 1080A 41
 DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 F1080A 42
DNW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FP1080A 43
NW7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY1080A 44
W7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY91080A 45
7_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+1080A 46
_EOX8 FPY9+GQZ0 HR'#(I-,@ &$%1?.*/2 )JS3!AKT4 BLU5"CMV6 DNW7_EOX8 FPY9+G1080A 47
