01010H                                                                    SKIP  
01020FINPUT   IP       0080            DISK   DATSKI                      SKIP  
01030F                                              KASCII                SKIP  
01040FPRINT   O        0132            PRINTER                            SKIP  
02010IINPUT   NS  01                                                      SKIP  
02020I                                     00010080 CARD                  SKIP  
03010C                     EXCPT                                          SKIP  
03020C                     SETON                     02                   SKIP  
03030C                     EXCPT                                          SKIP  
03040C                     SETOF                     02                   SKIP  
04010OPRINT   D  2     01                                                 SKIP  
04020O                         CARD    0080                               SKIP  
04030OPRINT   E  2     02                                                 SKIP  
04040O       OR  1     01                                                 SKIP  
04050O                                 0015 'EXCPT02'                     SKIP  
04060OPRINT   E  1     01                                                 SKIP  
04070O                                 0010 'EXCEPT01'                    SKIP