,0080121001                                     RIPPLE PRINT            1020A 0A
,008012,019,026030L0653681001,008012,00110011B361080AB421/340080 1 OF 2 1020A 02
,037044N000,340344,348349,357,361368/333080 PROG. CHAIN. ROUTINE 2 OF 2 1020A 03
L057S4510012,049L0772772/2772</40/60</80L/892702/2702413    CARD 1 OF 3 1020A 04
,019026,033,040044,051051/340001       TITLE PRINT ROUTINE  CARD 2 OF 3 1020A 05
,S01S05,S12,S13S17,S18S25,S29S36,S37S41,S45/333080          CARD 3 OF 3 1020A 06
L0313961001B389S611             USE WHEN TESTS ARE RUN FROM TAPE        1020A 07
L0314041001BS88                   ,,                                    1020A 08
L0314081001N000                   ,,                                    1020A 09
L0314121001M360392                ,,                                    1020A 10
L0314191001/332                 START TEST                              1020A 11
L0314231001/                                                            1020A 12
L0314241001L604S22              MODIFY TITLE PRINT TO SKIP HEADINGS     1020A 13
L0314311001BS00S521             BR TO TITLE PRINT ROUTINE IF 1 IN S52   1020A 14
L0314391001<721741              EXPAND TABLE FROM 701-760 TO 701-940    1020A 15
L0314461001L760820                ,,                                    1020A 16
L0314531001<761                   ,,                                    1020A 17
L0314571001L820940                ,,                                    1020A 18
L0314641001<821                   ,,                                    1020A 19
L0314681001,201                 SET WM IN PRINT AREA                    1020A 20
L0314721001L607614              LOAD LINE COUNTER                       1020A 21
L0314791001M614470              MOVE LINE CTR INTO NEXT INSTRUC         1020A 22
L0314861001M832332              MOVE TABLE INTO PRINT AREA              1020A 23
L03149310012                    PRINT                                   1020A 24
L0314941001B474B                B ON TO SCOPE                           1020A 25
L0314991001C611614              COMPARE LINE COUNTER WITH 891           1020A 26
L0315061001B501/                BRANCH TO ADD 1 IF NOT 891              1020A 27
L0315111001B453D                D ON TO REPEAT TEST                     1020A 28
L0315161001B348                 BRANCH TO READ NEXT RECORD              1020A 29
L0315201001A608614              ADD 1 TO LINE COUNTER                   1020A 30
L0315271001B460                 BRANCH TO PRINT NEXT LINE               1020A 31
L0316191001B420                 BRANCH INSTRUCTION TO MODIFY TITLE PRINT1020A 32
L0316241001832                  CONSTANT TO START LINE COUNTER          1020A 33
L03162710011                    CONSTANT TO INCREMENT LINE COUNTER      1020A 34
L0316281001891                  CONSTANT TO STOP LINE COUNTER           1020A 35
L0316311001XXX                  LINE COUNTER                            1020A 36
L0317201001AKT4 BLU5 CMV6!DNW7  TABLE TO BE RIPPLE PRINTED              1020A 37
L0317401001EOX8 FPY9^GQZ0 HR\#    ,,                                    1020A 38
L0317601001I-,@?&$%1 .*/2 <JS3"   ,,                                    1020A 39
,019027,031,038042B031T98!B400L046352BW04BS88   RIPPLE PRINT            1020A 40