,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