1 C00   23:20 JUN 20,'83                                                                          PAGE    1
A   .SS BA,HA,WA,DA,LF,CF,AF,AFA,NAME,NUM,ABSVAL
    .SS R0,R1,R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,R12,R13,R14,R15
    .SS X1,X2,X3,X4,X5,X6,X7,SCOR,TCOR,%,%%
    .END
1 C00   23:20 JUN 20,'83    SIGMA 5 CPU DIAGNOSTIC-AUTO 960-0051-1A 08-04-81                      PAGE    2
A       1                                     PCC
1 C00   23:20 JUN 20,'83    SIGMA 5 CPU DIAGNOSTIC-AUTO 960-0051-1A 08-04-81                      PAGE    3
A       3                            *
        4                                     SYSTEM   SIG7FDP
        5         0000000F           F        EQU      15
        6                            *
        7                            *      FORMS   THE ADDRESS FIELD SPECIFIECS HOW THE WORD IS DIVIDED AND
        8                            *              HOW MANY BITS THERE WILL BE IN EACH PART OF THE WORD.
        9                            *              EFFECTIVE AT ASSEMBLY TIME ONLY.
       10         00000004           I        COM,4,28 AF
       11                            *
       12         00000004           K        COM,4,4,4,20 AF
       13                            *
       14                            *      PROCS                       EFFECTIVE AT ASSEMBLY TIME ONLY
       15                            *
       16                                     OPEN     PAGE              THIS INHIBITS
       17                        *S* PAGE     CNAME                       PAGE
       18                        *S*          PROC                         DIRECTIVE
       19                        *S*          PEND                          TO PERMIT MAX. LINAGE/PAGE
       20                            *
       21                            *
       22                            *
       23                            *      P       SPECIFIES A DOUBLE WORD ADDRESS
       24                            *
       25         00000000           P        CNAME
       26                                     PROC
       27                            LF       GEN,32   DA(AF(1))
       28                                     PEND
       29                            *
       30                            *        J        CONVERTS TO BYTE ADDRESS
       31         00000000           J        CNAME
       32                                     PROC
       33                            LF       GEN,8,24 AF(1),BA(AF(2))
       34                                     PEND
       35                            *
       36                            *        FILL     FILLS ALL LOCATIONS BETWEEN AF AND % WITH ZEROS.
       37         00000000           FILL     CNAME
       38                                     PROC
       39                                     DO       ABSVAL(AF)-ABSVAL(%)
       40                                     GEN,32   0
       41                                     FIN
       42                                     PEND
       43                            *
       44                            *
       45                                     OPEN     LCFI,AI,CI,LI,MI,SF,S,LCF,STCF
       46         00000024           SF       CNAME    X'24'
       47         00000025           S        CNAME    X'25'
       48         00000070           LCF      CNAME    X'70'
       49         00000074           STCF     CNAME    X'74'
       50         LIST               G1       EQU      1,7,4,3,17
       51                                     PROC
       52                            LF       GEN,G1   AFA(1),NAME,CF(2),AF(2),AF(1)
       53                                     PEND
       54         00000002           LCFI     CNAME    X'2'
       55         00000020           AI       CNAME    X'20'
       56         00000021           CI       CNAME    X'21'
       57         00000022           LI       CNAME    X'22'
       58         00000023           MI       CNAME    X'23'
       59         LIST               G2       EQU      1,7,4,20
       60                                     PROC
       61                            LF       GEN,G2   AFA(1),NAME,CF(2),AF(1)
       62                                     PEND
       63                            *
       64                            * BIND - CAUSES THE LOCATION COUNTERS TO ADVANCE TO A WORD BOUNDARY THAT
       65                            *  IS SPECIFIED IN THE ARGUMENT FIELD.
       66         00000000           BIND     CNAME
       67                                     PROC
       68                            XP       SET      AF-(ABSVAL(%)-((ABSVAL(%)/AF)*AF))
       69                                     DO       AF-(ABSVAL(%)-((ABSVAL(%)/AF)*AF))>0
       70                                     ORG      ABSVAL(%)+XP
       71                                     FIN
       72                                     PEND
       73                            *
       74                            *
       75   01 00040                          ORG      X'40'
            01 00040
       76                            *
       77                            *
       78                            ****************   LOADING OPTIONS
       79                            *        SENSE SW1  SET= BYPASS AUTOMATIC IMPLEMENTATION OF REAL TIME
       80                            *                        CLOCKS. PROGRAM WILL COME TO A WAIT. RESET
       81                            *                        SENSE SWITCH 1. CLEAR THE WAIT.
       82                            *                 RESET= ENABLE RTC'S AFTER X'20' ERROR FREE PASSES
       83                            *
       84                            *
       85                            *
       86                            ****************  I/O COMPATIBILITY
       87                            *        THIS TEST IS DESIGNED TO TEST FOR CONFLICTS BETWEEN THE
       88                            *        INTEGRAL IOP AND THE EXECUTION OF THE AUTO DIAGNOSTIC.
       89                            * THE TEST IS AUTOMATICALLY INITIATED AFTER 35 ERROR FREE PASSES
       90                            ***
       91                            *  TO DELETE THE TEST :
       92                            *    1. CP INTERRUPT
       93                            *    2. ENTER A NON-EXSISTENT DEVICE ADDRESS IN LOCATION X'10'.
       94                            *    3. BRANCH TO ZIOAIN. SEE ADDRESS ON NEXT LINE
       95   01 00040    000002F4              DATA     ZIOAIN
       96                            *  TO REINTIALIZE THE TEST:
       97                            *        1. CP INTERRUPT
       98                            *        2. ENTER DEVICE ADDRESS INTO LOCATION  X'10'
       99                            *        3. BRANCH TO ZIOAIN. SEE ADDRESS ON NEXT LINE
      100   01 00041    000002F4              DATA     ZIOAIN
      101                            *           (IF THE SELECTED DEVICE SOES NOT GENERATE AN INTERRUPT
      102                            *            FOR ANY REASON, RESTART BY REPEATING STEP 3 )
      103                            *
      104                            *
      105                            ****************   OPERATING OPTIONS
      106                            *
      107                            *      SS1       SET=SHORT LOOP
      108                            *              RESET=NORMAL OPERATION
      109                            *
      110                            *      SS2       SET=LONG LOOP
      111                            *              RESET=NORMAL OPERATION
      112                            *
      113                            *      SS3       SET=REPORT
      114                            *              RESET=NORMAL OPERATION
      115                            *
      116                            *      SS4       SET=NO HALT ON ERRORS
      117                            *                 RESET=HALT ON ERRORS AND AFTER REPORT
      118                            *
      119                            **************** REGISTER CONTENTS AFTER HALT INITIATED BY:
      120                            *        WAIT AT:
      121   01 00042    00000236              DATA     COMWAIT
      122                            *                 REPORT
      123                            *                   OR
      124                            *                 ERROR
      125                            *      R1      PRESENT LIST ADDRESS
      126                            *      R2      ERROR COUNTER
      127                            *      R3      PASS COUNTER (PASSES=0-15, MODULES=16-31)
      128                            *      R4      INSTRUCTION
      129                            *      R5      ERROR IDENTIFIER AND ADDRESS:
      130                            *              10000000 = INSTRUCTION
      131                            *              20000000 = LOCATION+1 OF THE EXECUTION LOCATION
      132                            *              30000000 = INDIRECT ADDRESS
      133                            *              4000000X = INDEX REGISTER X: X=1(NORMAL) OR 7(ONE)
      134                            *              5000000X = PROGRAM STATUS WORD X: X=1 OR 2
      135                            *              6000000X = REGISTER X: X=C(12)OR D(13)
      136                            *              7000WXYZ = MEMORY WORD IN LOCATION WXYZ (WXYZ=0-FFFF)
      137                            *              8000000X = PLM INSTRUCTION ERROR  X= REGISTER NO.
      138                            *        NOTE:  REGISTERS 1 THRU TO 15 ARE EXPECTED TO
      139                            *               CONTAIN THE CONTENTS OF LOCATIONS X'7F2' - X'800'
      140                            *               AFTER EXECUTING THE PLM INSTRUCTION.
      141                            *               THE EXPECTED RESULTS ARE:
      142                            *                               CONTENTS OF
      143                            *                           REGISTER   LOCATION
      144                            *                              X'1'  =   X'7F2'
      145                            *                              X'2'  =   X'7F3'
      146                            *                              X'3'  =   X'7F4'
      147                            *                                ''  =     ''
      148                            *                                ''  =     ''
      149                            *                              X'F'  =   X'800'
      150                            *           -
      151                            *      R6      ERRONEOUS RESULT
      152                            *      R7      PREDETERMINED RESULT
      153                            *      R8      DIFFERENCE BETWEEN R6 AND R7
      154                            *
      155                            *
      156                            **************** REGISTER CONTENTS AFTER HALT INITIATED BY:
      157                            *                 CONTROL PANEL INTERRUPT (WAIT AT X'FB')
      158                            *                         OR
      159                            *        SPURIOUS TRAP WAIT AT:
      160   01 00043    000004C4              DATA     SPURW
      161                            *
      162                            ************************************R0 AND OR R5 MAY BE MODIFIED AFTER
      163                            *                                   THE WAIT FROM CP INTERRUPT. R0 WILL
      164                            *                                   SELECT THE MSG DEVICE AND R5 THE
      165                            *                                   COUNT PULSE INTERRUPTS
      166                            *        R0       T0000MSG   T=0 FOR KSR   MSG= DEVICE ADDR
      167                            *                            T=8 FOR LINE PRINTER
      168                            *        R1       3240YYYY          LW,4 OBJECT ADDRESS
      169                            *        R2       ERROR COUNTER
      170                            *        R3       XXXXZZZZ    X=PASS COUNT  Z= TEST COUNT
      171                            *        R5       0000N000    N= ACTIVE COUNTER INTERRUPTS
      172                            *                 BIT POSITION    ACTIVATES COUNTER
      173                            *                     16                  1
      174                            *                     17                  2
      175                            *                     18                  3
      176                            *                     19                  4
      177                            *
      178                            *
      179   01 00040                          ORG      X'40'             TRAP LOCATIONS
            01 00040
      180                            ****  THE TRAP LOCATIONS WILL NOT ALWAYS CONTAIN THE INSTRUCTION
      181                            ****  SHOWN IN THIS LISTING.
      182                            ****  LOCATION 40 USUALLY CONTAINS ::   XPSD,8 RETURN (SAME AS LOC 47)
      183   01 00040    0F00005E     NAOTR    XPSD,0   NAO               NONALLOWED OPERATION
      184   01 00041    0F000072     UIITR    XPSD,0   UII               UNIMPLEMENTED INSTRUCTION
      185   01 00042    0F000078     SLTR     XPSD,0   SL                STACK LIMIT
      186   01 00043    0F00007E     FXPOTR   XPSD,0   FXPO              FIXED POINT OVERFLOW
      187   01 00044    0F000084     FLPFTR   XPSD,0   FLPF              FLOATING POINT FAULT
      188   01 00045    0F00008A     DFTR     XPSD,0   DF                DECIMAL FAULT
      189   01 00046    0F000090     WDTRTR   XPSD,0   WDTR              WATCHDOG TIMER RUNOUT
      190   01 00047    0F8004A6     BRANCH   XPSD,8   RETURN
      191   01 00048    0F000096     CAL1TR   XPSD,0   CAL1              CALL ONE
      192   01 00049    0F0000AA     CAL2TR   XPSD,0   CAL2              CALL TWO
      193   01 0004A    0F0000BE     CAL3TR   XPSD,0   CAL3              CALL THREE
      194   01 0004B    0F0000D2     CAL4TR   XPSD,0   CAL4              CALL FOUR
      195                            *                                  INTERRUPT LOCATIONS
      196   01 0004C    00000000 A            FILL     X'52'
            01 0004D    00000000 A
            01 0004E    00000000 A
            01 0004F    00000000 A
            01 00050    00000000 A
            01 00051    00000000 A
      197   01 00052    331004B0              MTW,1    CNT1CP
      198   01 00053    331004B1              MTW,1    CNT2CP
      199   01 00054    331004B2              MTW,1    CNT3CP
      200   01 00055    331004B3              MTW,1    CNT4CP
      201   01 00056    0F0000E6              XPSD,0   PARITY            MEMORY PARITY
      202   01 00057    00000000 A            FILL     X'5C'
            01 00058    00000000 A
            01 00059    00000000 A
            01 0005A    00000000 A
            01 0005B    00000000 A
      203   01 0005C    0F800300              XPSD,8   IOINTR            I/O INTERRUPT LOCATION
      204   01 0005D    0F0000F0              XPSD,0   RESET             INTERRUPT BUTTON
      205                            *                                  NON-ALLOWED OPERATION TRAP
      206                                     BOUND 8
      207   01 0005E    00000000 A   NAO      PZE
      208   01 0005F    00000000 A            PZE
      209   01 00060    00000062              PZE,0    %+2
      210   01 00061    00000000 A            PZE
      211   01 00062    0F0004A6     NAORET   XPSD,0   RETURN            NONALLOWD OPERATION              I9=
      212   01 00063    0F0004A6     MPVRET   XPSD,0   RETURN            MEMORY PROTECT VIOLATION TRACC=1 I9=
      213   01 00064    0F0004A6     MVRET    XPSD,0   RETURN            MODE VIOLATION           TRACC=2 I9=
      214   01 00065    0F0004A6              XPSD,0   RETURN
      215   01 00066    0F0004A6     NEARET   XPSD,0   RETURN            NONEXISTANT ADDRESS      TRACC=4 I9=
      216   01 00067    0F0004A6              XPSD,0   RETURN
      217   01 00068    0F0004A6              XPSD,0   RETURN
      218   01 00069    0F0004A6              XPSD,0   RETURN
      219   01 0006A    0F0004A6     NEIRET   XPSD,0   RETURN            NONEXISTANT INSTRUCTION  TRACC=8 I9=
      220   01 0006B    0F0004A6              XPSD,0   RETURN
      221   01 0006C    0F0004A6              XPSD,0   RETURN
      222   01 0006D    0F0004A6              XPSD,0   RETURN
      223   01 0006E    0F0004A6              XPSD,0   RETURN
      224   01 0006F    0F0004A6              XPSD,0   RETURN
      225   01 00070    0F0004A6              XPSD,0   RETURN
      226   01 00071    0F0004A6              XPSD,0   RETURN
      227                            *                                  UNIMPLIMENTED INSTRUCTION TRAP
      228                                     BOUND 8
      229   01 00072    00000000 A   UII      PZE
      230   01 00073    00000000 A            PZE
      231   01 00074    00000076              PZE,0    %+2
      232   01 00075    00000000 A            PZE
      233   01 00076    0F0004A6     UIIRET   XPSD,0   RETURN
      234                            *                                  STACK LIMIT REACHED TRAP
      235                                     BOUND 8
      236   01 00078    00000000 A   SL       PZE
      237   01 00079    00000000 A            PZE
      238   01 0007A    0000007C              PZE,0    %+2
      239   01 0007B    00000000 A            PZE
      240   01 0007C    0F0004A6     SLRET    XPSD,0   RETURN
      241                            *                                  FIXED POINT ARITHMETIC OVERFLOW TRAP
      242                                     BOUND 8
      243   01 0007E    00000000 A   FXPO     PZE
      244   01 0007F    00000000 A            PZE
      245   01 00080    00000082              PZE,0    %+2
      246   01 00081    00000000 A            PZE
      247   01 00082    7020007E              LCF,2    FXPO
      248   01 00083    0F0004A6     FPORET   XPSD,0   RETURN
      249                            *                                  FLOATING POINT ARITHMETIC FAULT TRAP
      250                                     BOUND 8
      251   01 00084    00000000 A   FLPF     PZE
      252   01 00085    00000000 A            PZE
      253   01 00086    00000088              PZE,0    %+2
      254   01 00087    00000000 A            PZE
      255   01 00088    70200084              LCF,2    FLPF
      256   01 00089    0F0004A6     FPFRET   XPSD,0   RETURN
      257                            *                                  DECIMAL ARITHMETIC FAULT TRAP
      258                                     BOUND 8
      259   01 0008A    00000000 A   DF       PZE
      260   01 0008B    00000000 A            PZE
      261   01 0008C    0000008E              PZE,0    %+2
      262   01 0008D    00000000 A            PZE
      263   01 0008E    7020008A              LCF,2    DF
      264   01 0008F    0F0004A6     DFRET    XPSD,0   RETURN
      265                            *                                  WATCHDOG TIMER RUNOUT TRAP
      266                                     BOUND    8
      267   01 00090    00000000 A   WDTR     PZE
      268   01 00091    00000000 A            PZE
      269   01 00092    00000094              PZE,0    %+2
      270   01 00093    00000000 A            PZE
      271   01 00094    0F0004A6     WDTRET   XPSD,0   RETURN
      272                            *                                  CALL 1 TRAP
      273                                     BOUND 8
      274   01 00096    00000000 A   CAL1     PZE
      275   01 00097    00000000 A            PZE
      276   01 00098    0000009A              PZE,0    %+2
      277   01 00099    00000000 A            PZE
      278   01 0009A    0F0004A6     C1RET    XPSD,0   RETURN            TRACC=0
      279   01 0009B    0F0004A6              XPSD,0   RETURN            TRACC=1   I9=1
      280   01 0009C    0F0004A6              XPSD,0   RETURN            TRACC=2   I9=1
      281   01 0009D    0F0004A6              XPSD,0   RETURN            TRACC=3   I9=1
      282   01 0009E    0F0004A6              XPSD,0   RETURN            TRACC=4   I9=1
      283   01 0009F    0F0004A6              XPSD,0   RETURN            TRACC=5   I9=1
      284   01 000A0    0F0004A6              XPSD,0   RETURN            TRACC=6   I9=1
      285   01 000A1    0F0004A6              XPSD,0   RETURN            TRACC=7   I9=1
      286   01 000A2    0F0004A6              XPSD,0   RETURN            TRACC=8   I9=1
      287   01 000A3    0F0004A6              XPSD,0   RETURN            TRACC=9   I9=1
      288   01 000A4    0F0004A6              XPSD,0   RETURN            TRACC=10  I9=1
      289   01 000A5    0F0004A6              XPSD,0   RETURN            TRACC=11  I9=1
      290   01 000A6    0F0004A6              XPSD,0   RETURN            TRACC=12  I9=1
      291   01 000A7    0F0004A6              XPSD,0   RETURN            TRACC=13  I9=1
      292   01 000A8    0F0004A6              XPSD,0   RETURN            TRACC=14  I9=1
      293   01 000A9    0F0004A6              XPSD,0   RETURN            TRACC=15  I9=1
      294                            *                                  CALL 2 TRAP
      295                                     BOUND 8
      296   01 000AA    00000000 A   CAL2     PZE
      297   01 000AB    00000000 A            PZE
      298   01 000AC    000000AE              PZE,0    %+2
      299   01 000AD    00000000 A            PZE
      300   01 000AE    0F0004A6     C2RET    XPSD,0   RETURN            TRACC=0
      301   01 000AF    0F0004A6              XPSD,0   RETURN            TRACC=1   I9=1
      302   01 000B0    0F0004A6              XPSD,0   RETURN            TRACC=2   I9=1
      303   01 000B1    0F0004A6              XPSD,0   RETURN            TRACC=3   I9=1
      304   01 000B2    0F0004A6              XPSD,0   RETURN            TRACC=4   I9=1
      305   01 000B3    0F0004A6              XPSD,0   RETURN            TRACC=5   I9=1
      306   01 000B4    0F0004A6              XPSD,0   RETURN            TRACC=6   I9=1
      307   01 000B5    0F0004A6              XPSD,0   RETURN            TRACC=7   I9=1
      308   01 000B6    0F0004A6              XPSD,0   RETURN            TRACC=8   I9=1
      309   01 000B7    0F0004A6              XPSD,0   RETURN            TRACC=9   I9=1
      310   01 000B8    0F0004A6              XPSD,0   RETURN            TRACC=10  I9=1
      311   01 000B9    0F0004A6              XPSD,0   RETURN            TRACC=11  I9=1
      312   01 000BA    0F0004A6              XPSD,0   RETURN            TRACC=12  I9=1
      313   01 000BB    0F0004A6              XPSD,0   RETURN            TRACC=13  I9=1
      314   01 000BC    0F0004A6              XPSD,0   RETURN            TRACC=14  I9=1
      315   01 000BD    0F0004A6              XPSD,0   RETURN            TRACC=15  I9=1
      316                            *                                  CALL 3 TRAP
      317                                     BOUND 8
      318   01 000BE    00000000 A   CAL3     PZE
      319   01 000BF    00000000 A            PZE
      320   01 000C0    000000C2              PZE,0    %+2
      321   01 000C1    00000000 A            PZE
      322   01 000C2    0F0004A6     C3RET    XPSD,0   RETURN            TRACC=0
      323   01 000C3    0F0004A6              XPSD,0   RETURN            TRACC=1   I9=1
      324   01 000C4    0F0004A6              XPSD,0   RETURN            TRACC=2   I9=1
      325   01 000C5    0F0004A6              XPSD,0   RETURN            TRACC=3   I9=1
      326   01 000C6    0F0004A6              XPSD,0   RETURN            TRACC=4   I9=1
      327   01 000C7    0F0004A6              XPSD,0   RETURN            TRACC=5   I9=1
      328   01 000C8    0F0004A6              XPSD,0   RETURN            TRACC=6   I9=1
      329   01 000C9    0F0004A6              XPSD,0   RETURN            TRACC=7   I9=1
      330   01 000CA    0F0004A6              XPSD,0   RETURN            TRACC=8   I9=1
      331   01 000CB    0F0004A6              XPSD,0   RETURN            TRACC=9   I9=1
      332   01 000CC    0F0004A6              XPSD,0   RETURN            TRACC=10  I9=1
      333   01 000CD    0F0004A6              XPSD,0   RETURN            TRACC=11  I9=1
      334   01 000CE    0F0004A6              XPSD,0   RETURN            TRACC=12  I9=1
      335   01 000CF    0F0004A6              XPSD,0   RETURN            TRACC=13  I9=1
      336   01 000D0    0F0004A6              XPSD,0   RETURN            TRACC=14  I9=1
      337   01 000D1    0F0004A6              XPSD,0   RETURN            TRACC=15  I9=1
      338                            *                                  CALL 4 TRAP
      339                                     BOUND 8
      340   01 000D2    00000000 A   CAL4     PZE
      341   01 000D3    00000000 A            PZE
      342   01 000D4    000000D6              PZE,0    %+2
      343   01 000D5    00000000 A            PZE
      344   01 000D6    0F0004A6     C4RET    XPSD,0   RETURN            TRACC=0
      345   01 000D7    0F0004A6              XPSD,0   RETURN            TRACC=1   I9=1
      346   01 000D8    0F0004A6              XPSD,0   RETURN            TRACC=2   I9=1
      347   01 000D9    0F0004A6              XPSD,0   RETURN            TRACC=3   I9=1
      348   01 000DA    0F0004A6              XPSD,0   RETURN            TRACC=4   I9=1
      349   01 000DB    0F0004A6              XPSD,0   RETURN            TRACC=5   I9=1
      350   01 000DC    0F0004A6              XPSD,0   RETURN            TRACC=6   I9=1
      351   01 000DD    0F0004A6              XPSD,0   RETURN            TRACC=7   I9=1
      352   01 000DE    0F0004A6              XPSD,0   RETURN            TRACC=8   I9=1
      353   01 000DF    0F0004A6              XPSD,0   RETURN            TRACC=9   I9=1
      354   01 000E0    0F0004A6              XPSD,0   RETURN            TRACC=10  I9=1
      355   01 000E1    0F0004A6              XPSD,0   RETURN            TRACC=11  I9=1
      356   01 000E2    0F0004A6              XPSD,0   RETURN            TRACC=12  I9=1
      357   01 000E3    0F0004A6              XPSD,0   RETURN            TRACC=13  I9=1
      358   01 000E4    0F0004A6              XPSD,0   RETURN            TRACC=14  I9=1
      359   01 000E5    0F0004A6              XPSD,0   RETURN            TRACC=15  I9=1
      360                            *                                  PARITY INTERUPT SERVICE ROUTINE
      361                                     BOUND 8
      362   01 000E6    00000000 A   PARITY   PZE
      363   01 000E7    00000000 A            PZE
      364   01 000E8    000000EA              PZE,0    %+2
      365   01 000E9    00000000 A            PZE
      366   01 000EA    6C400010 A            RD,4     X'10'             RECORD PARITY ERROR PLANS
      367   01 000EB    32500396              LW,5     CPINT             COUNT PULSE INTERRUPTS
      368   01 000EC    6D501300 A            WD,5     X'1300'           ARM AND DISABLE
      369   01 000ED    2E000000 A            WAIT,0   0
      370   01 000EE    0E3004AC              LPSD,3   REPEAT            RELEASE PARITY INTERRUPT-REPEAT TEST
      371                            *                                  INTERUPT BUTTON SERVICE ROUTINE
      372                                     BOUND 8
      373   01 000F0    00000000 A   RESET    PZE
      374   01 000F1    00000000 A            PZE
      375   01 000F2    000000F4              PZE,0    %+2
      376   01 000F3    07000000 A            DATA     X'07000000'       TURN ON INTERRUPT INHIBIT BITS
      377   01 000F4    32500396              LW,5     CPINT             COUNT PULSE INTERRUPTS
      378   01 000F5    6D501300 A            WD,5     X'1300'           ARM AND DISABLE
      379   01 000F6    323004B6              LW,3     PASSES            RESET PASSES TO LAST SETTING
      380   01 000F7    322004B5              LW,2     ERRORS            RESET ERRORS TO LAST SETTING
      381   01 000F8    32100120              LW,1     SAVE              REINITIALIZE LOAD WITH LAST SETTING
      382   01 000F9    320003A0              LW,0     TYPE
      383   01 000FA    2E000000 A            WAIT,0   0
      384   01 000FB    4B5003B6              AND,5    MASK+4
      385   01 000FC    35500396              STW,5    CPINT
      386   01 000FD    350003A0              STW,0    TYPE              DEVICE ADDR IF BIT=0 KSR; =1 LP
      387   01 000FE    35500397              STW,5    CPINTM
      388   01 000FF    0E3004AC              LPSD,3   REPEAT            RELEASE PANEL INTERRUPT-REPEAT TEST
      389                            *                                  AUTO-CONTROL
      390                                     FILL     X'100'
      391   01 00100    32200400     AUTO     LW,2     ZERO              ERRORS
      392   01 00101    32300400              LW,3     ZERO              PASSES
      393   01 00102    35201EC2              STW,2    LASFLAG     CLEAR LAS ERROR FLAG
      394   01 00103    35201EC3              STW,2    LMSFLAG     CLEAR LMS ERROR FLAG
      395                            * REINITIATE MODULES DEPENDENT ON OPTIONS
      396   01 00104    32100529              LW,1     LW03+1            LW *IA - LEGAL MEMORY ADDRESS
      397   01 00105    35100D66              STW,1    ANLZ08+6
      398   01 00106    35100D67              STW,1    ANLZ08+7
      399   01 00107    32100356              LW,1     BEND               INST  'B  END' BYPASS TEST MODULE
      400   01 00108    35100D61              STW,1    ANLZ08+1          BYPASS TEST MODULE ON FIRST PASS
      401   01 00109    35100915              STW,1    BAL05+1           BYPASS TEST MODULE ON FIRST PASS
      402   01 0010A    351016A3              STW,1    NFAIMP01+1        BYPASS TEST MODULE ON FIRST PASS
      403   01 0010B    35300396              STW,3    CPINT             CLEAR RTC OPTION
      404   01 0010C    35300355              STW,3    ITERATE           CLEAR SHORT LOOP
      405   01 0010D    3210038C              LW,1     NEG51
      406   01 0010E    3510038D              STW,1    LINE              INITALIZE LINE COUNT
      407   01 0010F    321003AA              LW,1     NEG2
      408   01 00110    35100387              STW,1    FIRST             RESET FIRST PASS COUNTER
      409   01 00111    3210037A              LW,1     LOAD              INITIALIZE MODULE POINTER. SET C=0
      410   01 00112    32400400     CYCLE    LW,4     ZERO              CLEAR TRANSFER REGISTER
      411   01 00113    6AF01E92              BAL,15   SPT               BRANCH TO SINGEL PURPOSE TEST
      412   01 00114    35100120              STW,1    SAVE              SAVE OLD POINTER FOR RESET
      413   01 00115    354004AF              STW,4    PSW2              INITIALIZE FOR EACH MODULE
      414   01 00116    325003A1              LW,5     PCPINT            PARITY AND CONTROL PANAL INTERRUPTS
      415   01 00117    6D501200 A            WD,5     X'1200'           ARM AND ENABLE
      416   01 00118    352004B5              STW,2    ERRORS            SAVE ERROR COUNTER IN MEMORY
      417   01 00119    353004B6              STW,3    PASSES            SAVE PASS COUNTER IM MEMORY
      418   01 0011A    3250037C              LW,5     STORE             PREPARE TO CLEAR THE TABLE. SET I=0
      419   01 0011B    3260038B             LW,6     NEG20
      420   01 0011C    3550011D     CLEAR    STW,5    %+1
      421   01 0011D    35400486              STW,4    TABLE+I           STORE 0 INTO TABLE+I,I=0 TO 11
      422   01 0011E    6550011F              BIR,5    %+1               I+1 INTO 1
      423   01 0011F    6560011C              BIR,6    CLEAR
      424   01 00120    324004CA     SAVE     LW,4     LIST+C            PICK UP COUNT
      425   01 00121    69300125              BCS,3    NOTEND            TEST FOR MODULE END
      426   01 00122    4B300380              AND,3    M1Q15             DELETE MODULE COUNT
      427   01 00123    20310000 A            AI,3     X'10000'          INCREMENT PASS COUNTER
      428   01 00124    680002D2              B        DONE
      429   01 00125    3250037C     NOTEND   LW,5     STORE             PREPARE TO SET THE TABLE
      430   01 00126    32600004 A            LW,6     4
      431   01 00127    35100129     MOVE     STW,1    FROM              SET LOAD
      432   01 00128    3550012A              STW,5    TO                SET STORE
      433   01 00129    324004CA     FROM     LW,4     LIST+C            LOAD VEHICAL
      434   01 0012A    35400486     TO       STW,4    TABLE+I           STORE VEHICAL
      435   01 0012B    6510012C              BIR,1    %+1               C+1 INTO C
      436   01 0012C    6550012D              BIR,5    %+1               I+1 INTO I
      437   01 0012D    65600127              BIR,6    MOVE
      438   01 0012E    35100129              STW,1    FROM              SET MODULE POINTER = NEXT MODULE
      439                            *                                  AUTO-EXECUTE
      440   01 0012F    3210048A              LW,1     TABLE+4           PICK UP INDEX
      441   01 00130    32400047              LW,4     XPSD              PICK UP RETURN VEHICAL
      442   01 00131    35400178              STW,4    LOC+1             SET LOC.+1 OF 'EXECUTE INSTRUCTION'.
      443   01 00132    35400040              STW,4    NAOTR             SET RETURN FOR SLAVE MODE CASES
      444   01 00133    32400488              LW,4     TABLE+2           PSW1I
      445   01 00134    4B40037E              AND,4    LINKAD            SELECT LINK ADDRESS AND DELETE MS,MM
      446   01 00135    354004AE              STW,4    PSW1              SET UP LINKAGE
      447   01 00136    32500400              LW,5     ZERO              CLEAR R5
      448   01 00137    4B40037F              AND,4    COND              CLEAR ADDRESS PORTION OF PSW1
      449   01 00138    0E0004AE              LPSD,0   PSW1              LINKAGE
      450                            **  LINKAGE IS TO NEXT INSTRUCTION OR TO VARIOUS TRAP SETUP AREAS START-
      451                            **  ING AT LOC 18C
      452   01 00139    32400488     SETPSW   LW,4     TABLE+2
      453   01 0013A    4B40037F              AND,4    COND              CLEAR ADDRESS
      454   01 0013B    48400361              EOR,4    LOCADD            SET ADDRESS TO LOC
      455   01 0013C    354004AE              STW,4    PSW1
      456   01 0013D    32400492              LW,4     TABLE+12
      457   01 0013E    354004AF              STW,4    PSW2
      458   01 0013F    22200001 A            LI,2     1
      459   01 00140    32400487              LW,4     TABLE+1           INSTRUCTION
      460   01 00141    3540049B              STW,4    INST
      461   01 00142    3250035F              LW,5     INDA              INDIRECT ADDRESS
      462   01 00143    32700386              LW,7     ONE               SET HALF WORD (ODD MEMORY) INDEX
      463   01 00144    3550049C              STW,5    IA
      464   01 00145    3280048D              LW,8     TABLE+7           STORE EXPECTED MEMORY RESULT -
      465   01 00146    32900491              LW,9     TABLE+11            INTO A DOUBLEWORD BOUNDARY -
      466   01 00147    358001E2              STW,8    MEMOUT               FOR USE IN AUTOMATIC SHORT -
      467   01 00148    359001E3              STW,9    MEMOUT+1               LOOP
      468   01 00149    3280048B              LW,8     TABLE+5           PUTS EXPECTED REGISTER -
      469   01 0014A    3290048F              LW,9     TABLE+9            RESULTS INTO AREA FOR -
      470   01 0014B    358001E4              STW,8    ROUTPUT             USE OF AUTOMATIC SHORT LOOP
      471   01 0014C    359001E5              STW,9    ROUTPUT+1
      472   01 0014D    3280048A              LW,8     TABLE+4           REGISTER OPERANDS ARE -
      473   01 0014E    3290048E              LW,9     TABLE+8             MOVED TO AN AREA UTILIZED -
      474   01 0014F    358001E6              STW,8    RINPUT               BY THE AUTOMATTIC SHORT LOOP
      475   01 00150    359001E7              STW,9    RINPUT+1
      476   01 00151    32600355              LW,6     ITERATE           DETERMINES IF AUTO SHORT LOOP
      477   01 00152    3280048C              LW,8     TABLE+6           MWI
      478   01 00153    32900490              LW,9     TABLE+10          MW+1I
      479   01 00154    32500396              LW,5     CPINT             COUNT PULSE INTERRUPTS
      480   01 00155    6D501200 A            WD,5     X'1200'           ARM AND ENABLE
      481                            * REGISTER 1 AND REG 7 ARE NOT RESTORED ON SHORT LOOP
      482                            *     IF THE ERROR IDENTIFIER IS - 4 -  THEN THE PROGRAM SHOULD
      483                            *     BE RUN ON LONG LOOP OR MODIFIED TO RESTORE THE FAILING REGISTER
      484   01 00156    358004A2     SHORT    STW,8    MEMORY
      485   01 00157    359004A3              STW,9    MEMORY+1
      486   01 00158    32C0048A              LW,12    TABLE+4           R
      487   01 00159    32D0048E              LW,13    TABLE+8           RU1
      488   01 0015A    32F00487              LW,15    TABLE+1       IO NOT CHANGE LOC.RETURN+2
      489   01 0015B    31F01E41              CW,15    PLM1+1         IF PLM MODULE IS BEING TESTED.
      490   01 0015C    68300169              BE       PRELOC          **  **  **  **  **  **  **
      491   01 0015D    32F00360              LW,15    LOC2AD
      492   01 0015E    35F004A8              STW,15   RETURN+2
      493   01 0015F    32F00487              LW,15    TABLE+1         COMPARE IF LAS INSTRUCTION
      494   01 00160    31F01EC0              CW,15    LAS:INT
      495   01 00161    69300163              BNE      PRE:LT1         BRANCH IF NOT EQUAL
      496   01 00162    68000165              B        PRE:LT2         BRANCH TO CHECK LMS
      497   01 00163    31F01E4F     PRE:LT1  CW,15    LMS1+1           LMS INSTRUCTION ???
      498   01 00164    69300169              BNE      PRELOC          BRANCH IF NOT EQUAL
      499   01 00165    32F004A8     PRE:LT2  LW,15    RETURN+2         XCHANGE XPSD RETURN LOCATION.<
      500   01 00166    35F01EAF             STW,15   LAMRETURN
      501   01 00167    22F01EAA             LI,15    LMS:ACT
      502   01 00168    35F004A8             STW,15   RETURN+2
      503   01 00169    0E0004AE     PRELOC   LPSD,0   PSW1
      504                            *
      505   01 0016A    32500487     FASTCHK  LW,5     TABLE+1
      506   01 0016B    31501E4F              CW,5     LMS1+1
      507   01 0016C    6830016F              BE       FASTCHKA
      508   01 0016D    11C001E4              CD,12    ROUTPUT
      509   01 0016E    6930017A              BNE      ERREXIT           REPORT ERROR VIA NORMAL PATH
      510                            *
      511   01 0016F    12C001E2     FASTCHKA LD,12    MEMOUT
      512   01 00170    11C004A2              CD,12    MEMORY
      513   01 00171    68300174              BE       SHORTER           SUCCESSFUL - LOOP AGAIN
      514   01 00172    12C001E4              LD,12    ROUTPUT           RESTORE R-RU1 SINCE MEMORY WAS BAD
      515   01 00173    6800017A              B        ERREXIT           REPORT ERROR VIA NORMAL PATH
      516   01 00174    158004A2     SHORTER  STD,8    MEMORY            RESTORE MEMORY OPERANDS
      517   01 00175    12C001E6              LD,12    RINPUT            RESTORE REGISTERS
      518   01 00176    0E0004AE              LPSD,0   PSW1              GO TO OBJECT INSTRUCTION AT LOC
      519   01 00177    6700049B     LOC      EXU      INST
      520   01 00178    0F8004A6              XPSD,8   RETURN            GO TO LOC+2. ALSO X-FER 0 INTO RP
      521   01 00179    6460016A              BDR,6    FASTCHK           TEST RESULTS OF SHORTER
      522   01 0017A    32600355     ERREXIT  LW,6     ITERATE
      523   01 0017B    6C000000 A            RD,0     0                 READ SENSE SWITCHES
      524   01 0017C    69800156              BCS,8    SHORT             SS1-SHORT LOOP
      525   01 0017D    32500396              LW,5     CPINT       FETCH COUNT PULSE INTERRUPTS
      526   01 0017E    6D501100 A            WD,5     X'1100'           DISARM
      527   01 0017F    322004B5              LW,2     ERRORS
      528                            *                                  AUTO-TEST
      529   01 00180    3510049D              STW,1    TEST+3            IX
      530   01 00181    321003A7              LW,1     ODDBALL           SET RETURN FOR SPURIOUS TRAPS
      531   01 00182    351004A8              STW,1    RETURN+2          SET RETURN TO RESET+2
      532   01 00183    357004A1              STW,7    TEST+7            SAVE HALF WORD INDEX
      533   01 00184    32100120              LW,1     SAVE              PICK UP PRESENT LIST ADDRESS
      534   01 00185    35C0049E              STW,12   TEST+4            R
      535   01 00186    35D0049F              STW,13   TEST+5            RU1
      536   01 00187    3250038E              LW,5     INSTID            PICK UP INSTRUCTION IDENTIFIED
      537   01 00188    3260049B              LW,6     TEST+1            INST(R)
      538   01 00189    32700487              LW,7     TABLE+1           INST(O)
      539   01 0018A    0F00021C              XPSD,0   ERROR             TEST INSTRUCTION
      540   01 0018B    32600487              LW,6     TABLE+1
      541   01 0018C    31601E41              CW,6     PLM1+1       IS IT PLM INSTRUCTION
      542   01 0018D    6830019E              BE       ERREXITA     SKIP FOLLOWING TEST IF.YES
      543   01 0018E    3250038F              LW,5     XPSDID            PICK LOCATION+1 IDENTIFIER
      544   01 0018F    32600178              LW,6     LOC+1             LOC+1(R)
      545   01 00190    32700047              LW,7     XPSD              LOC+1(O)
      546   01 00191    0F00021C              XPSD,0   ERROR             TEST LOCATION+1
      547   01 00192    32500390              LW,5     IAID              PICK UP INDIRECT ADDRESS IDENTIFIER
      548   01 00193    3260049C              LW,6     IA                IA(R)
      549   01 00194    3270035F              LW,7     INDA              IA(O)
      550   01 00195    0F00021C              XPSD,0   ERROR             TEST INDIRECT ADDRESS WORD
      551   01 00196    32500391              LW,5     IXID              PICK UP INDEX IDENTIFIER
      552   01 00197    3260049D              LW,6     TEST+3            IX(R)
      553   01 00198    3270048A              LW,7     TABLE+4           IX(O)
      554   01 00199    0F00021C              XPSD,0   ERROR             TEXT INDEX R1
      555   01 0019A    48500385              EOR,5    SIX               SET INDEX 7 IDENTIFIER
      556   01 0019B    326004A1              LW,6     TEST+7            IX7(R)
      557   01 0019C    32700386              LW,7     ONE               IX7(O)
      558   01 0019D    0F00021C              XPSD,0   ERROR             TEST INDEX R7
      559   01 0019E    32500392     ERREXITA LW,5     PSDWID      PICK PROGRAM STATUS IDENTIFIER
      560   01 0019F    326004A6              LW,6     TEST+12           PSW1(R)
      561   01 001A0    32700489              LW,7     TABLE+3           PSW1(O)
      562   01 001A1    0F00021C              XPSD,0   ERROR             TEST PSW1
      563   01 001A2    655001A3              BIR,5    %+1               INCREMENT PSDW INDENTIFIER
      564   01 001A3    326004A7              LW,6     TEST+13           PSW2(R)
      565   01 001A4    32700493              LW,7     TABLE+13          PSW2(O)
      566   01 001A5    0F00021C              XPSD,0   ERROR             TEST PSW2
      567   01 001A6    32600487              LW,6     TABLE+1
      568   01 001A7    31601E41              CW,6     PLM1+1       IS IT PLM INSTRUCTION
      569   01 001A8    693001BE              BNE      ERREXITB     SKIP  IF NOT
      570                            *
      571                            *  THE FOLLOWING TEST WILL TEST THE CONTENTS OF THE REGISTERS
      572                            *   THE CONTENTS ARE THE RESULT OF THE PLM INSTRUCTION
      573                            *
      574   01 001A9    323004B6              LW,3     PASSES     FETCH PASSES ON MODULES
      575   01 001AA    3240049B              LW,4     INST       FETCH INSTRUCTION WORD.
      576   01 001AB    32501E42              LW,5     PLM1+2      FETCH THE CONDITION CODE
      577   01 001AC    25500064 A            SLS,5    -28         POSITION TO LOWER INSIGNIF. SECTION
      578   01 001AD    35501EE6              STW,5    PLMNUM      SAVE.
      579   01 001AE    32601EC4              LW,6     SPDA        COMPUTE LOCATION FOR COMPARE
      580   01 001AF    38600005 A            SW,6     5           'EXP.TO OBS, RESULTS.
      581   01 001B0    20600001 A            AI,6     1
      582   01 001B1    35601EC4              STW,6    SPDA        SAVE.
      583   01 001B2    32501EE7              LW,5     PLMRESV
      584   01 001B3    355001B5              STW,5    ERREXITC    REINITIALIZE INSTRUCTION TO FETCH WORD
      585   01 001B4    32500395              LW,5     PLMID       FETCH IDENTIFIER.
      586   01 001B5    32601EC8     ERREXITC LW,6     PLMREG+1    FETCH OBSERVED WORD
      587   01 001B6    B2701EC4              LW,7     *SPDA       FETCH EXPECTED WORD.
      588   01 001B7    20500001 A            AI,5     1           INCREMENT IDENTIFIER
      589   01 001B8    0F00021C              XPSD,0   ERROR       * * * TEST * * *
      590   01 001B9    331001B5              MTW,1    ERREXITC    INCREMENT CORRESPONDING
      591   01 001BA    33101EC4              MTW,1    SPDA          REGISTER AND LOCATION.
      592   01 001BB    33F01EE6              MTW,-1   PLMNUM      ARE ALL REGISTERS CHECKED
      593   01 001BC    693001B5              BNEZ     ERREXITC     BRANCH IF NOT
      594   01 001BD    680001D2              B        ERREXITD     BRANCH IF DONE.
      595         01 001BE           ERREXITB EQU      %
      596   01 001BE    32500393              LW,5     REGID             PICK UP REGISTER IDENTIFIER
      597   01 001BF    48500384              EOR,5    CEE               SET REGISTER ADDRESS =C(12)
      598   01 001C0    3260049E              LW,6     TEST+4            R(R)
      599   01 001C1    3270048B              LW,7     TABLE+5           R(O)
      600   01 001C2    32000487              LW,0     TABLE+1
      601   01 001C3    31001E4F              CW,0     LMS1+1
      602   01 001C4    683001CE              BE       MISSLMS
      603   01 001C5    0F00021C              XPSD,0   ERROR             TEST REGISTER
      604   01 001C6    655001C7              BIR,5    %+1               INCREMENT REGISTER IDENTIFIER
      605   01 001C7    3260049F              LW,6     TEST+5            RU1(R)
      606   01 001C8    3270048F              LW,7     TABLE+9           RU1(O)
      607   01 001C9    0F00021C              XPSD,0   ERROR             TEST REGISTER U 1
      608   01 001CA    32500394              LW,5     MEMID             PICK UP MEMORY IDENTIFIER
      609   01 001CB    326004A2              LW,6     MEMORY            MW(R)
      610   01 001CC    3270048D              LW,7     TABLE+7           MW(O)
      611   01 001CD    0F00021C              XPSD,0   ERROR             TEST MEMORY WORD
      612   01 001CE    32500394     MISSLMS  LW,5     MEMID
      613   01 001CF    326004A3              LW,6     MEMORY+1          MW+1(R)
      614   01 001D0    32700491              LW,7     TABLE+11          MW+1(O)
      615   01 001D1    0F00021C              XPSD,0   ERROR             TEST MEMORY WORD + 1
      616   01 001D2    32500400     ERREXITD LW,5     ZERO       SET IDENTIFIER FOR REPORT
      617   01 001D3    326001E0              LW,6     ERRIND
      618   01 001D4    692001D7              BCS,2    %+3
      619   01 001D5    6C000000 A            RD,0     0                 READ SENSE SWITCHES
      620   01 001D6    69200227              BCS,2    ZR                SS3 # REPORT
      621   01 001D7    32600400     LASAM    LW,6     ZERO              FETCH ZERO (ZERO)
      622   01 001D8    356001E0              STW,6    ERRIND
      623   01 001D9    6D000040 A   END      WD,0     X'40'             TURN OFF ALARM
      624   01 001DA    322004B5              LW,2     ERRORS            C(R2) WOULD EQUAL 1 IF OBJECT INST
      625                            *                                   WAS A BRANCH TO END
      626   01 001DB    653001DC              BIR,3    %+1               INCREMENT MODULE COUNTER
      627   01 001DC    6C000000 A            RD,0     0                 READ SENSE SWITCHES
      628   01 001DD    69C00112              BCS,12   CYCLE             LOOP ON CURRENT TEST (SS1 OR 2)
      629   01 001DE    32100129              LW,1     FROM              RESTORE NEW LIST ADDRESS
      630   01 001DF    0E0004AC              LPSD,0   MODULE            UPDATE POINTER
      631   01 001E0    00000000 A   ERRIND   DATA     0
      632                                     BOUND    8                 STORAGE OF DATA UTILIZED BY-
      633   01 001E2    00000000 A   MEMOUT   DATA     0,0                 THE AUTOMATIC SHORT LOOP
            01 001E3    00000000 A
      634   01 001E4    00000000 A   ROUTPUT  DATA     0,0
            01 001E5    00000000 A
      635   01 001E6    00000000 A   RINPUT   DATA     0,0
            01 001E7    00000000 A
      636                            *                                  SET XPSD FOR NOA TRAP
      637   01 001E8    32500383     SI9NAO   LW,5     I9                SET I9=1
      638   01 001E9    48500372     RI9NAO   EOR,5    NAOXD             SET I9=0
      639   01 001EA    35500040              STW,5    NAOTR
      640   01 001EB    4840036A              EOR,4    NAOAD
      641   01 001EC    35400060              STW,4    NAO+2             SET PSW1 BITS 0-11 FOR NAO TRAP
      642   01 001ED    68000139              BCR,0    SETPSW
      643                            *                                  SET PSW1 BITS 0-11 FOR UII TRAP
      644   01 001EE    4840036C     UIISW    EOR,4    UIIAD
      645   01 001EF    35400074              STW,4    UII+2
      646   01 001F0    68000139              BCR,0    SETPSW            RETURN TO LONG
      647                            *                                  SET PSW1 BITS 0-11 FOR SL TRAP
      648   01 001F1    4840036B     SLSW     EOR,4    SLAD
      649   01 001F2    3540007A              STW,4    SL+2
      650   01 001F3    68000139              BCR,0    SETPSW
      651                            *                                  SET PSW1 BITS 0-11 FOR EXPO TRAP
      652                            * THIS ROUTINE ALLOWS VERIFICATION OF A TRAP TO THE PROPER LOCATION
      653                            * AND THE RETURNED COND CODE. IT DOES NOT VERIFY THE ADDRESS OF THE
      654                            * INSTRUCTION THAT TRAPPED. (SEE THE FOLLOWING ROUTINE)
      655   01 001F4    48400368     FXPOSW   EOR,4    FXPOAD
      656   01 001F5    35400080              STW,4    FXPO+2
      657   01 001F6    485003B3              EOR,5    MASK+1            OP CODE FOR XPSD INST
      658   01 001F7    485001FA              EOR,5    FXPOA             CREATES AN INST  XPSD,0 FXPO
      659   01 001F8    35500043              STW,5    FXPOTR            TO TRAP LOCATION
      660   01 001F9    68000139              BCR,0    SETPSW
      661   01 001FA    0000007E     FXPOA    DATA     FXPO              ADDRESS OF TRAP PROCESSOR
      662                            *                                  SET PSW1 BITS 0-11 FOR FLPF TRAP
      663   01 001FB    48400367     FLPFSW   EOR,4    FLPFAD
      664   01 001FC    35400086              STW,4    FLPF+2
      665   01 001FD    680001EF              BCR,0    UIISW+1
      666                            * THIS ROUTINE ALLOWS VERIFICATION OF THE PSDW BUT DOES NOT CHECK
      667                            * THAT THE INST CAUSED THE CORRECT TRAP TO OCCUR. (SEE ABOVE ROUTINE)
      668   01 001FE    48500047     FXPOPSDW EOR,5    BRANCH            XPSD,8 RETURN
      669   01 001FF    35500043              STW,5    FXPOTR            TO TRAP LOCATION
      670   01 00200    68000139              B        SETPSW
      671                            *                                  SET XPSD FOR CAL1
      672   01 00201    32500383     SI9CL1   LW,5     I9                SET I9=1
      673   01 00202    4850036E     RI9CL1   EOR,5    CAL1XD            SET I9=0
      674   01 00203    35500048              STW,5    CAL1TR
      675   01 00204    48400362              EOR,4    CAL1AD
      676   01 00205    35400098              STW,4    CAL1+2
      677   01 00206    68000139              BCR,0    SETPSW
      678                            *                                  SET XPSD FOR CAL2
      679   01 00207    32500383     SI9CL2   LW,5     I9                SET I9=1
      680   01 00208    4850036F     RI9CL2   EOR,5    CAL2XD            SET I9=0
      681   01 00209    35500049              STW,5    CAL2TR
      682   01 0020A    48400363              EOR,4    CAL2AD
      683   01 0020B    354000AC              STW,4    CAL2+2
      684   01 0020C    68000139              BCR,0    SETPSW
      685                            *                                  SET XPSD FOR CAL3
      686   01 0020D    32500383     SI9CL3   LW,5     I9                SET I9=1
      687   01 0020E    48500370     RI9CL3   EOR,5    CAL3XD            SET I9=0
      688   01 0020F    3550004A              STW,5    CAL3TR
      689   01 00210    48400364              EOR,4    CAL3AD
      690   01 00211    354000C0              STW,4    CAL3+2
      691   01 00212    68000139              BCR,0    SETPSW
      692                            *                                  SET XPSD FOR CAL4
      693   01 00213    32500383     SI9CL4   LW,5     I9
      694   01 00214    48500371     RI9CL4   EOR,5    CAL4XD            SET I9=1
      695   01 00215    3550004B              STW,5    CAL4TR            SET I9=0
      696   01 00216    48400365              EOR,4    CAL4AD
      697   01 00217    354000D4              STW,4    CAL4+2
      698   01 00218    68000139              BCR,0    SETPSW
      699                            ** STORE COND CODE INTO PSW1 IN (TABLE+3)9 THIS IS NECESSARY FOR TEST OF
      700                            ** FARWD WHICH ALWAYS READS THE SENSE SWITCHES. A FALSE ERROR MAY OCCUR
      701                            ** IF SENSE SWITCHES ARE CHANGED DURING THIS SETUP.
      702   01 00219    6C000000 A   FARWD    RD,0     0                 READ SENSE SWITCHES
      703   01 0021A    74000489              STCF     TABLE+3
      704   01 0021B    68000139              B        SETPSW
      705                                     BOUND    8
      706                            *                                   DECIMAL-ERROR
      707   01 0021C    00000000 A   ERROR    PZE
      708   01 0021D    00000000 A            PZE
      709   01 0021E    00000220              PZE,0    %+2
      710   01 0021F    00000000 A            PZE
      711   01 00220    32800006 A            LW,8     6                 PICK UP RESULT
      712   01 00221    48800007 A            EOR,8    7                 COMPARE WITH PREDERMINED RESULT
      713   01 00222    69300224              BCS,3    TSTDVC            DIFF  # 0
      714   01 00223    0E00021C              LPSD,0   ERROR
      715   01 00224    65200225     TSTDVC   BIR,2    %+1               INCREMENT ERROR COUNTER
      716   01 00225    352004B5              STW,2    ERRORS            KEEP A RUNNING COUNT
      717   01 00226    6D000041 A            WD,0     X'41'             TURN ON AUDIO ALARM
      718   01 00227    32B0030A     ZR       LW,11    IOM
      719                            **                IOM HAS IO INTERRUPT BIT IF IO COMPATIBILITY IS IN USE
      720   01 00228    6DB01500 A            WD,11    X'1500'           DISABLE IO INTERRUPT
      721   01 00229    32B00381              LW,11    6Q3
      722   01 0022A    35B001E0              STW,11   ERRIND            SET ERROR INDICATOR TO ALLOW RETURN
      723                            *                                   TO BYPASS SS 3 SETTING
      724   01 0022B    6E000000 A   TESTIO   AIO,0    0                 CLEAR INTERRUPT PENDING
      725   01 0022C    CDB003A0              TIO,11   *TYPE
      726   01 0022D    68C0023A              BCR,12   EDIT              GO IF IO ADDR RECOG AND SIO POSSIBLE
      727   01 0022E    6840022B              BCR,4    TESTIO            REPEAT TIO IF SIOP IS BUSY
      728   01 0022F    68800231              BCR,8    %+2               SIO NOT CURRENTLY POSSIBLE
      729   01 00230    68000234              B        HLTEST            IO ADDRESS NOT RECOGNIZED
      730   01 00231    4BB00381              AND,11   6Q3               SAVE OPERATIONAL STATE BITS
      731   01 00232    48B00381              EOR,11   6Q3
      732   01 00233    6830022B              BEZ      TESTIO            DEVICE BUSY
      733   01 00234    6C000000 A   HLTEST   RD,0     0                 READ SENSE SWITCHES
      734   01 00235    69100237              BCS,1    NOHALT
      735   01 00236    2E000000 A   COMWAIT    WAIT                     COMMON ERROR WAIT
      736   01 00237    32B0030A     NOHALT   LW,11    IOM
      737   01 00238    6DB01400 A            WD,11    X'1400'           ENABLE IO INTERRUPT
      738   01 00239    0E00021C              LPSD,0   ERROR
      739                            *                                  EDIT-LEVEL 3
      740   01 0023A    32C0037D     EDIT     LW,12    STRMG1            SET STORAGE WORD
      741   01 0023B    32900389              LW,9     NEG8
      742   01 0023C    32A00005 A            LW,10    5                 TEST R5=0
      743   01 0023D    6930023F              BCS,3    REPORT+1          DISPLAY
      744   01 0023E    329003A8     REPORT   LW,9     NEG4
      745   01 0023F    32A00375              LW,10    LOADR             SET REGISTER PICKUP
      746   01 00240    35A00241              STW,10   LDREG
      747   01 00241    32A00001 A   LDREG    LW,10    1                 PICK UP REGISTER 1 THRU 8(DIS) OR 4
      748   01 00242    35A004B8              STW,10   WORD
      749   01 00243    359004B4              STW,9    COUNT
      750   01 00244    32F003AA              LW,15    NEG2              SET WORD COUNT(M)=2
      751   01 00245    32000376              LW,0     LWN               SET N=-4,-4
      752   01 00246    32A00378              LW,10    LWFRM             SET FRAME = F0F0F0F0, F0F0F0F0
      753   01 00247    32B0035C              LW,11    ANFRO             SET CHAR POSITIONS 1234,5678
      754   01 00248    4B900386              AND,9    ONE               TEST COUNT EVEN
      755   01 00249    6930024E              BCS,3    ODD
      756   01 0024A    32F00388     EVEN     LW,15    NEG3              SET WORD COUNT(M)=3
      757   01 0024B    32000377              LW,0     LWN2              SET N=-2,-4,-2
      758   01 0024C    32A00379              LW,10    LWFRM2            SET FRAME=4040F0F0,F0F0F0F0,F0F04040
      759   01 0024D    32B0035D              LW,11    ANFR2             SET CHAR POSITIONS   12,3456,78
      760   01 0024E    32E0035E     ODD      LW,14    ANMK              SET DIGIT +ICK = BITS 0-3, 4-7, ETC.
      761   01 0024F    35000252     WORDS    STW,0    SETN              SET NUMBER PICK UP
      762   01 00250    35A00253              STW,10   SETFRM            SET FRAME PICK UP
      763   01 00251    35C0026E              STW,12   STRWD             SET STORAGE LOCATION
      764   01 00252    320003A8     SETN     LW,0     NUMBER            SET NUMBER
      765   01 00253    32D003AD     SETFRM   LW,13    FRAME             SET FRAME (FINAL CHAR-BYTE POSITION)
      766   01 00254    35B00269     BYTES    STW,11   ANDF              SET FILTER
      767   01 00255    35D004B7              STW,13   WKO               SAVE FRAME
      768   01 00256    35E0025E              STW,14   ANDM              SET MASK (ORIGINAL CHAR POSITION)
      769   01 00257    32A00373              LW,10    LWBIT             SET BIT PICK UP
      770   01 00258    32C003A8              LW,12    NEG4              SET BIT COUNT
      771   01 00259    32D00400              LW,13    ZERO              SET CHAR GENERATOR TO ZERO
      772   01 0025A    35A0025C     BITS     STW,10   LWB
      773   01 0025B    35A00261              STW,10   LWBT
      774   01 0025C    329003A3     LWB      LW,9     BIT               PICK UP BIT 1,2,4OR 8
      775   01 0025D    4B9004B8              AND,9    WORD              (BIT)*(WORD)
      776   01 0025E    4B9003B2     ANDM     AND,9    MASK              (BIT)*(WORD)*(MASK)
      777   01 0025F    69300261              BCS,3    LWBT              LWBT IF WORD HAS BIT IN MASK POSITIO
      778   01 00260    0E0004AA              LPSD,0   BUMP
      779   01 00261    329003A3     LWBT     LW,9     BIT               PICK UP BIT
      780   01 00262    48D00009 A            EOR,13   9                 MERGE BIT WITH CHAR BEING CONSTRUCTE
      781   01 00263    65A00264     BUMPER   BIR,10   %+1               INCREMENT BIT PICK UP
      782   01 00264    65C0025A              BIR,12   BITS              CONTINUE CHAR CONSTRUCTION
      783   01 00265    4BD003B9              AND,13   MASK+7            PICK OF BINARY 4 BIT CHAR
      784   01 00266    48D00374              EOR,13   LWBYTE            CONSTRUCT BYTE PICK UP WORD
      785   01 00267    35D00268              STW,13   LWBY
      786   01 00268    32D00400     LWBY     LW,13    BYTE              PICK UP COVERTED BYTE
      787   01 00269    4BD003BA     ANDF     AND,13   FILTER            SELECT DESIRED TYTE
      788   01 0026A    48D004B7              EOR,13   WKO               MERGE BYTE INTO CONVERTED WORD
      789   01 0026B    65B0026C              BIR,11   %+1               INCREMENT CONVERTED BYTE POSITION
      790   01 0026C    65E0026D              BIR,14   %+1               INCREMENT SELECTED CHAR POSITION
      791   01 0026D    65000254              BIR,0    BYTES             TEST FOR N CHAR'S
      792   01 0026E    35D00471     STRWD    STW,13   IMAGE+1           STORE CONVERTED WORD
      793   01 0026F    32000252              LW,0     SETN              SET NUMBER PICK UP
      794   01 00270    32A00253              LW,10    SETFRM            SET FRAME PICK UP
      795   01 00271    32C0026E              LW,12    STRWD             PICK UP STORE WORD
      796   01 00272    65000273              BIR,0    %+1               INCREMENT NUMBER PICK UP
      797   01 00273    65A00274              BIR,10   %+1               INCREMENT FRAME PICK UP
      798   01 00274    65C00275              BIR,12   %+1               INCREMENT STORE LOCATION
      799   01 00275    65F0024F              BIR,15   WORDS             INCREMENT M - BRANCH IF M NOT ZERO
      800   01 00276    329004B4              LW,9     COUNT             SET COUNT
      801   01 00277    32A00241              LW,10    LDREG             SET REGISTER PICK UP
      802   01 00278    65A00279              BIR,10   %+1               INCREMENT REGISTER PICK UP
      803   01 00279    65900240              BIR,9    LDREG-1           BRANCH TO LDREG IF COUNT NOT ZERO
      804                            *                                  OUTPUT-LEVEL 3
      805   01 0027A    32F0038D              LW,15    LINE              LINE COUNT (-51)
      806   01 0027B    32E00387              LW,14    FIRST             =-2 FIRST TIME
      807   01 0027C    320003A0              LW,0     TYPE              TEST FOR OUTPUT DEVICE
      808   01 0027D    69100292              BLZ      LPO
      809   01 0027E    65E00282              BIR,14   SKIP6             FIRST TIME THRU
      810   01 0027F    65F00287              BIR,15   LINOUT            LINE COUNT NOT ZERO
      811   01 00280    32000410              LW,0     PSIXCR
      812   01 00281    0F0002A8              XPSD,0   PRINT             OUTPUT 6 CAR. RET.
      813   01 00282    32000411     SKIP6    LW,0     PTITLE
      814   01 00283    0F0002A8              XPSD,0   PRINT             NEW PAGE TITLE
      815   01 00284    32000412              LW,0     PHEAD
      816   01 00285    0F0002A8              XPSD,0   PRINT             NEW HEADING
      817   01 00286    32F0038C              LW,15    NEG51             RESET LINE COUNT
      818   01 00287    32000414     LINOUT   LW,0     PLONGL            SET UP DISPLAY PRINTOUT
      819   01 00288    32A00005 A            LW,10    5                 PICK UP IDENTIFIER
      820   01 00289    6930028B              BCS,3    IO
      821   01 0028A    32000413              LW,0     PSHRTL            SET UP RECORD PRINTOUT
      822   01 0028B    0F0002A8     IO       XPSD,0   PRINT
      823   01 0028C    35F0038D              STW,15   LINE              SAVE NEW LINE COUNT
      824   01 0028D    35E00387              STW,14   FIRST             SAVE NEW FIRST PASS INDICATOR
      825   01 0028E    6D000040 A            WD,0     X'40'             TURN OFF ALARM
      826   01 0028F    0E000290              LPSD,0   GETOUT
      827                                     BOUND 8
      828   01 00290    00300234     GETOUT   PZE,3    HLTEST
      829   01 00291    00000000 A            PZE
      830   01 00292    CEB003A0     LPO      TDV,11   *TYPE
      831   01 00293    68C00296              BCR,12   %+3               GO IF IOP AND DEVICE ADDR RECOG
      832   01 00294    68400292              BCR,4    %-2               GO IF SIOP BUSY
      833   01 00295    6800028C              B        IO+1              IO OPERATION NOT POSSIBLE
      834   01 00296    35B0039C              STW,11   TEMP
      835   01 00297    4BB0039B              AND,11   MOTION            PAPER IS MOVING
      836   01 00298    69300292              BNEZ     LPO               LOOP TILL PAPER STOPS
      837   01 00299    32B0039C              LW,11    TEMP
      838   01 0029A    4BB0039D              AND,11   TOP               CHECK FOR TOP OF FORM
      839   01 0029B    693002A4              BNEZ     LPTOP             OUTPUT TITLE AND HEADING
      840   01 0029C    65E002A2              BIR,14   GOTOP             GO TO TOP OF FORM IF FIRST PASS
      841   01 0029D    32000417     LPMSG    LW,0     LPERR             ERROR MSG CDA
      842   01 0029E    32A00005 A            LW,10    5                 PICK UP IDENTIFIER
      843   01 0029F    693002A1              BCS,3    %+2               REPORT
      844   01 002A0    32000418              LW,0     LPREPORT          REPORT MSG CDA
      845   01 002A1    6800028B              B        IO
      846   01 002A2    32000415     GOTOP    LW,0     LPGOTOP           GO TO TOP OF FORM
      847   01 002A3    0F0002A8              XPSD,0   PRINT
      848   01 002A4    32000416     LPTOP    LW,0     LPFORMAT          PRITN TITLE AND HEADING
      849   01 002A5    0F0002A8              XPSD,0   PRINT
      850   01 002A6    6800029D              B        LPMSG
      851                            *                                  PRINT-LEVEL 4
      852                                     BOUND 8
      853   01 002A8    00000000 A   PRINT    PZE
      854   01 002A9    00000000 A            PZE
      855   01 002AA    000002AC              PZE,0    %+2
      856   01 002AB    00000000 A            PZE
      857   01 002AC    CCB003A0     BUSY     SIO,11   *TYPE             OUTPUT MSG
      858   01 002AD    68C002B5              BCR,12   DONEMSG           SIO ACCEPTED
      859   01 002AE    684002AC              BCR,4    BUSY              SIOP BUSY. REPEAT SIO
      860   01 002AF    688002B1              BCR,8    %+2               GO IF SIO NOT ACCEPTED
      861   01 002B0    680002BD              B        EXITIO            IO ADDR NOT RECOGNIZED
      862   01 002B1    4BB00381              AND,11   6Q3               SAVE OPERATIONAL STATE BITS
      863   01 002B2    48B00381              EOR,11   6Q3
      864   01 002B3    683002AC              BEZ      BUSY              DEVICE BUSY. REPEAT SIO
      865   01 002B4    680002BD              B        EXITIO            DEVICE NOT OPERATIONAL OR UNAVAIL
      866   01 002B5    CDB003A0     DONEMSG  TIO,11   *TYPE
      867   01 002B6    68C002BD              BCR,12   EXITIO
      868   01 002B7    684002B5              BCR,4    DONEMSG           SIOP BUSY
      869   01 002B8    688002BA              BCR,8    %+2               ACCEPTABLE SIO NOT CURRENTLY POSS
      870   01 002B9    680002BD              B        EXITIO            IO ADDR NOT RECOGNIZED
      871   01 002BA    4BB00381              AND,11   6Q3               SAVE OPERATIONAL STATE BITS
      872   01 002BB    48B00381              EOR,11   6Q3
      873   01 002BC    683002B5              BEZ      DONEMSG           DEVICE BUSY. REPEAT TIO
      874   01 002BD    32C01E81     EXITIO   LW,12    PRNTFG    DOES THIS COME FROM THE LMS,LAS TRAP.
      875   01 002BE    693002C0              BNEZ     %+2         BRANCH HERE IF NO
      876   01 002BF    0E0002A8              LPSD,0   PRINT       BRANCH THIS WAY IF NO.
      877   01 002C0    E800000F A            B        *15         BRANCH BACK IF LMS LAS ENTERED.
      878                            *
      879                            *
      880   01 002C1    322002CC     SETRPLY  LW,2     REPLAY            BRANCH TO AUTO IS STORED INTO LOC.26
      881   01 002C2    35200026 A            STW,2    38
      882   01 002C3    22000F6D              LI,0     DA(HEADCDW)       PRINT HEADER MSSG
      883   01 002C4    0F0002A8              XPSD,0   PRINT
      884   01 002C5    6C000000 A            RD,0     0                 READ THE SENSE SWITCHES
      885   01 002C6    68800100              BCR,8    AUTO              GO IF SS1 IS OFF
      886   01 002C7    22000F71              LI,0     DA(SENMSG)        PRINT MESSAGE.
      887   01 002C8    0F0002A8              XPSD,0   PRINT              SENSE SWITCH 1
      888                            *****   PREVENT COUNTER INTERRUPT IMPLEMENTATION   ******
      889   01 002C9    2E000000 A   SSWAIT   WAIT     0                 TURN SENSE SWITCH 1 OFF.
      890   01 002CA    32200400              LW,2     ZERO
      891   01 002CB    35200397              STW,2    CPINTM
      892   01 002CC    68000100     REPLAY   B        AUTO
      893                                     BOUND    8
      894                            ** TEST TO SEE IF FLOATING POINT OPTION IS INSTALLED  (FIRST PASS ONLY)
      895   01 002CE    00000000 A   FLTRAP   DATA     0,0,FLNIN,0
            01 002CF    00000000 A
            01 002D0    000002DA
            01 002D1    00000000 A
      896   01 002D2    21310000 A   DONE     CI,3     X'10000'
      897   01 002D3    6930034E              BNE      INITIATE          CHECK FOR IMPLEMENTING AUTO SHORT
      898   01 002D4    3200031E              LW,0     NIMP              SETUP TRAP LOCATION
      899   01 002D5    35000041              STW,0    UIITR
      900   01 002D6    32C00401              LW,12    BYTE+1
      901   01 002D7    3DC00401     FLOAT    FAS,12   BYTE+1
      902   01 002D8    3200031F              LW,0     PFLOATP           MSG "FLOATING POINT OPTION IS IN"
      903   01 002D9    680002DD              B        FLPRINT
      904   01 002DA    320002D7     FLNIN    LW,0     FLOAT             COMES HERE IF TRAP OCCURRED AT X281
      905   01 002DB    350016A3              STW,0    NFAIMP01+1        ALLOW TEST OF TRAP EACH TIME
      906   01 002DC    32000320              LW,0     PNFLOATP          MSG "FLOATING POINT NOT INSTALLED"
      907   01 002DD    0F0002A8     FLPRINT  XPSD,0   PRINT             OUTPUT THE SELECTED MSG
      908   01 002DE    3200031D              LW,0     IMP
      909   01 002DF    35000041              STW,0    UIITR             RESTORE ORIG XPSD TO LOC 41
      910                            * TEST FOR NON-EXSISTENT MEMORY. IF ANY, SETUP BAL AND ANLZ TESTS
      911   01 002E0    3200033F              LW,0     RETADDR           MODIFY RETURN TO ENTER THIS -
      912   01 002E1    350004A8              STW,0    RETURN+2           ROUTINE WHEN A TRAP OCCURS
      913   01 002E2    22100FFF A            LI,1     4095              ADDRESS
      914   01 002E3    B2000001 A            LW,0     *1                TRY TO FIND NEM
      915   01 002E4    30100357              AW,1     MINCR             ADD 4096 FOR NEXT 4K
      916   01 002E5    21120FFF A            CI,1     X'20FFF'          > POSSIBLE MEMORY SIZE?
      917   01 002E6    68300111              BE       CYCLE-1           NO NON-EXSISTENT MEMORY.
      918   01 002E7    680002E3              B        %-4               TRY NEXT 4K
      919                            *THE FOLLOWING ROUTINE IMPLEMENTS THE COUNT PULSE INTERRUPTS AFTER X'20
      920                            *PASSES WITHOUT ERROR
      921   01 002E8    3130039E     RTC      CW,3     MAXCNT
      922   01 002E9    69300111              BNE      CYCLE-1
      923   01 002EA    21200000 A            CI,2     0
      924   01 002EB    69300111              BNE      CYCLE-1
      925   01 002EC    32000397              LW,0     CPINTM
      926   01 002ED    68300111              BEZ      CYCLE-1           DO NOT OUTPUT MSG
      927   01 002EE    32000419              LW,0     PRTCMSG
      928   01 002EF    0F0002A8              XPSD,0   PRINT
      929   01 002F0    320003B6              LW,0     MASK+4            BITS FOR COUNTER 1,2,3 AND 4
      930   01 002F1    35000396              STW,0    CPINT             STORED INTO CPINT
      931   01 002F2    68000111     XRTC     B        CYCLE-1           RESUME WITH FIRST MODULE
      932                            **
      933                            ** ENTER AT THIS POINT TO BEGIN IO COMPATIBILITY TEST
      934                            ** ENTER THE IO DEVICE ADDRESS IN MEMORY LOCATION X'10'.
      935                            **
      936                                     BOUND     8
      937   01 002F4    680002F5     ZIOAIN   B        %+1
      938   01 002F5    32E00010 A            LW,14    16                DEVICE ADDR IN X'10'
      939   01 002F6    35E002F8              STW,14   ZIOA              SAVE
      940   01 002F7    680002F9              B        SETINTR
      941   01 002F8    00000002 A   ZIOA     DATA     2                 NORMAL LINE PRINTER ADDR
      942   01 002F9    22E00020 A   SETINTR  LI,14    X'20'
      943   01 002FA    35E0030A              STW,14   IOM               PUT IO INTERRUPT BIT IN IOM
      944   01 002FB    6DE01200 A            WD,14    X'1200'           ARM AND ENABLE IO INTERRUPT
      945   01 002FC    67000304              EXU      AIO               AIO INST TO CLEAR ANY PENDING INTR
      946   01 002FD    67000306              EXU      AIO+2             CDW ADDR
      947   01 002FE    67000307              EXU      AIO+3             SIO
      948   01 002FF    68000111              B        CYCLE-1           START A NEW PASS
      949                                     BOUND    8
      950   01 00300    00000111     IOINTR   DATA     CYCLE-1,0,AIO,0   ENTRY TO INTERRUPT ROUTINE
            01 00301    00000000 A
            01 00302    00000304
            01 00303    00000000 A
      951   01 00304    6E000000 A   AIO      AIO,0    0
      952   01 00305    3500030C              STW,0    SAVE0
      953   01 00306    3200030B              LW,0     PIOCOMP           COMMAND DOUBLEWORD ADDRESS
      954                            *** CDW SPECIFIES A SIMPLE WRITE ORDER. OPERATOR MAY CHANGE ANY PART OF
      955                            *** THE CDW PROVIDED THE FIRST 8K OF MEMORY IS NOT DISTURBED BY A READ
      956                            *** ORDER. CDW IS IN X'2AC' S X'2AD'
      957   01 00307    CC0002F8              SIO,0    *ZIOA
      958   01 00308    3200030C              LW,0     SAVE0             RESTORE C(R0)
      959   01 00309    0EB00300              LPSD,11  IOINTR            RETURN TO PROGRAM
      960   01 0030A    00000000 A   IOM      DATA     0                 CHANGED TO X'20' FOR IO COMPAT.
      961   01 0030B    00000187     PIOCOMP  P        IOCOMP            CDA
      962   01 0030C    00000000 A   SAVE0    DATA     0
      963                                     BOUND    8
      964   01 0030E    05000C41     IOCOMP   GEN,8,24 5,BA(COMP)+1
      965   01 0030F    50000031 A            GEN,4,28 5,49              IBCEZ & ICE + BYTE COUNT
      966   01 00310    31154040 A   COMP     TEXTC    '
            IO COMPATIBILITY TEST IS IN PROGRESS'
            01 00311    40404040 A
            01 00312    40404040 A
            01 00313    4040C9D6 A
            01 00314    40C3D6D4 A
            01 00315    D7C1E3C9 A
            01 00316    C2C9D3C9 A
            01 00317    E3E840E3 A
            01 00318    C5E2E340 A
            01 00319    C9E240C9 A
            01 0031A    D540D7D9 A
            01 0031B    D6C7D9C5 A
            01 0031C    E2E24040 A
      967   01 0031D    0F000072     IMP      XPSD,0   UII
      968   01 0031E    0F0002CE     NIMP     XPSD,0   FLTRAP
      969   01 0031F    00000191     PFLOATP  P        FLOATP
      970   01 00320    00000198     PNFLOATP P        NFLOATP
      971                                     BOUND    8
      972   01 00322    05000C91     FLOATP   GEN,8,24 5,BA(FLM)+1
      973   01 00323    0800002F A            GEN,8,24 8,47
      974   01 00324    2F154040 A   FLM      TEXTC    '
            FLOATING POINT OPTION IS INSTALLED'
            01 00325    40404040 A
            01 00326    40404040 A
            01 00327    4040C6D3 A
            01 00328    D6C1E3C9 A
            01 00329    D5C740D7 A
            01 0032A    D6C9D5E3 A
            01 0032B    40D6D7E3 A
            01 0032C    C9D6D540 A
            01 0032D    C9E240C9 A
            01 0032E    D5E2E3C1 A
            01 0032F    D3D3C5C4 A
      975                                     BOUND    8
      976   01 00330    05000CC9     NFLOATP  GEN,8,24 5,BA(NFLM)+1
      977   01 00331    08000030 A            GEN,8,24 8,48
      978   01 00332    30154040 A   NFLM     TEXTC    '
            FLOATING POINT OPTION NOT INSTALLED'
            01 00333    40404040 A
            01 00334    40404040 A
            01 00335    4040C6D3 A
            01 00336    D6C1E3C9 A
            01 00337    D5C740D7 A
            01 00338    D6C9D5E3 A
            01 00339    40D6D7E3 A
            01 0033A    C9D6D540 A
            01 0033B    D5D6E340 A
            01 0033C    C9D5E2E3 A
            01 0033D    C1D3D3C5 A
            01 0033E    C4404040 A
      979                                     BOUND    4
      980   01 0033F    00000340     RETADDR  DATA     %+1
      981                            * TRAP COMES HERE. IMPLEMENT TESTS
      982   01 00340    320003A7              LW,0     ODDBALL
      983   01 00341    350004A8              STW,0    RETURN+2          RESTORE SPURIOUS TRAP CAPABILITY
      984   01 00342    320008F7              LW,0     BAL01+1           BAL,12 BRANCH
      985   01 00343    49000001 A            OR,0     1                 PUT IN NON-EXSISTENT MEMORY REF
      986   01 00344    35000915              STW,0    BAL05+1
      987   01 00345    32000529              LW,0     LW03+1            LW,12 *IA
      988   01 00346    49000001 A            OR,0     1                 PUT IN NON-EXSISTENT MEMORY REF
      989   01 00347    35000D66              STW,0    ANLZ08+6          MEMORY IN
      990   01 00348    35000D67              STW,0    ANLZ08+7          MEMORY OUT
      991   01 00349    32000D69              LW,0     ANLZ09+1          ANLZ,12 MEMORY
      992   01 0034A    35000D61              STW,0    ANLZ08+1          STORE INTO ANLZ08 TEST
      993   01 0034B    68000111              B        CYCLE-1           NEXT PASS
      994   01 0034C    00230000 A   IOCOUNT  DATA     X'230000'         35 ERROR FREE PASSES
      995   01 0034D    001E0000 A            DATA     X'1E0000'         PASS COUNT OF 3
      996   01 0034E    3130034D     INITIATE CW,3     %-1               IMPLEMENT AUTO SHORT IF EQUAL
      997   01 0034F    69300358              BNE      COMPAT
      998   01 00350    21200000 A            CI,2     0                 CHECK FOR ERRORS
      999   01 00351    69300111              BNE      CYCLE-1           START ANOTHER PASS
     1000   01 00352    22100064 A            LI,1     100               ITERATION COUNT
     1001   01 00353    35100355              STW,1    ITERATE
     1002   01 00354    68000111              B        CYCLE-1           START A PASS UTILIZING THE AUTO-
     1003                            *                                   MATIC SHORT LOOP
     1004   01 00355    00000000 A   ITERATE  DATA     0                 ITERATION COUNT
     1005   01 00356    680001D9     BEND     B        END               USED DURING INITALIZE
     1006   01 00357    00001000 A   MINCR    DATA     4096              CONSTANT
     1007   01 00358    49300002 A   COMPAT   OR,3     2                 ERROR COUNT OR'ED WITH PASS COUNT
     1008   01 00359    3130034C              CW,3     IOCOUNT
     1009   01 0035A    683002F9              BE       SETINTR           IMPLEMENT IO COMPATIBILITY
     1010   01 0035B    680002E8              B        RTC
     1011                            *                                  CONSTANTS AND WORKING STORAGE
     1012   01 0035C    4BD003BA     ANFRO    AND,13   FILTER            PICK OFF CONVERTED BYTE
     1013   01 0035D    4BD003BC     ANFR2    AND,13   FILTER+2
     1014   01 0035E    4B9003B2     ANMK     AND,9    MASK              PICK OFF CHAR. TO BE CONVERTED
     1015   01 0035F    000004A2     INDA     PZE,0    MEMORY            INDIRECT ADDRESS
     1016   01 00360    00000179     LOC2AD   PZE,0    LOC+2
     1017   01 00361    00000177     LOCADD   PZE,0    LOC
     1018   01 00362    0000009A     CAL1AD   PZE,0    CAL1+4
     1019   01 00363    000000AE     CAL2AD   PZE,0    CAL2+4
     1020   01 00364    000000C2     CAL3AD   PZE,0    CAL3+4
     1021   01 00365    000000D6     CAL4AD   PZE,0    CAL4+4
     1022   01 00366    0000008E     DFAD     PZE,0    DF+4
     1023   01 00367    00000088     FLPFAD   PZE,0    FLPF+4
     1024   01 00368    00000082     FXPOAD   PZE,0    FXPO+4
     1025   01 00369    000004A2     MEMAD    PZE,0    DA(MEMORY)
     1026   01 0036A    00000062     NAOAD    PZE,0    NAO+4
     1027   01 0036B    0000007C     SLAD     PZE,0    SL+4
     1028   01 0036C    00000076     UIIAD    PZE,0    UII+4
     1029   01 0036D    00000094     WDTRAD   PZE,0    WDTR+4
     1030   01 0036E    0F000096     CAL1XD   XPSD,0   CAL1
     1031   01 0036F    0F0000AA     CAL2XD   XPSD,0   CAL2
     1032   01 00370    0F0000BE     CAL3XD   XPSD,0   CAL3
     1033   01 00371    0F0000D2     CAL4XD   XPSD,0   CAL4
     1034   01 00372    0F00005E     NAOXD    XPSD,0   NAO
     1035   01 00373    329003A3     LWBIT    LW,9     BIT               PICK UP MARCHING BITS
     1036   01 00374    32D00400     LWBYTE   LW,13    BYTE              SELECT BYTE
     1037   01 00375    32A00001 A   LOADR    LW,10    1                 PICK UP REGISTERS FOR OUTPUT
     1038   01 00376    320003A8     LWN      LW,0     NUMBER            PICK UP NUMBERS
     1039   01 00377    320003AA     LWN2     LW,0     NUMBER+2
     1040   01 00378    32D003AD     LWFRM    LW,13    FRAME             PICK UP FRAMES
     1041   01 00379    32D003AF     LWFRM2   LW,13    FRAME+2
     1042   01 0037A    324004CA     LOAD     LW,4     LIST              LOAD TRANSFER VEHICAL WITH DATA MODU
     1043   01 0037B    000001D9     RETEND   PZE,0    END               RETURN TO END
     1044   01 0037C    35400486     STORE    STW,4    TABLE             SET TABLE
     1045   01 0037D    35D00471     STRMG1   STW,13   IMAGE+1
     1046   01 0037E    FF3FFFFF A   LINKAD   DATA     X'FF3FFFFF'
     1047   01 0037F    FFF00000 A   COND     DATA     X'FFF00000'
     1048   01 00380    FFFF0000 A   M1Q15    DATA     X'FFFF0000'
     1049   01 00381    70000000 A   6Q3      GEN,4,28 7,0               CHECKS I/O FOR BUSY OR MANUAL
     1050   01 00382    20000000 A   2Q3      DATA     X'20000000'
     1051   01 00383    00400000 A   I9       DATA     X'400000'
     1052   01 00384    0000000C A   CEE      DATA     12
     1053   01 00385    00000006 A   SIX      DATA     6
     1054   01 00386    00000001 A   ONE      DATA     1
     1055   01 00387    FFFFFFFE A   FIRST    DATA     -2
     1056   01 00388    FFFFFFFD A   NEG3     DATA     -3
     1057   01 00389    FFFFFFF8 A   NEG8     DATA     -8
     1058   01 0038A    FFFFFFF4 A   NEG12    DATA     -12
     1059   01 0038B    FFFFFFEC A   NEG20    DATA     -20
     1060   01 0038C    FFFFFFCD A   NEG51    DATA     -51
     1061   01 0038D    FFFFFFCD A   LINE     DATA     -51
     1062   01 0038E    10000000 A   INSTID   I        1,0               INSTRUCTION
     1063   01 0038F    20000178     XPSDID   I        2,LOC+1           LOCATION+1
     1064   01 00390    30000000 A   IAID     I        3,0               INDIRECT ADDRESS
     1065   01 00391    40000001 A   IXID     I        4,1               INDEX
     1066   01 00392    50000001 A   PSDWID   I        5,1               PROGRAM STATUS DOUBLEWORD
     1067   01 00393    60000000 A   REGID    I        6,0               REGISTERS
     1068   01 00394    700004A2     MEMID    I        7,MEMORY          MEMORY WORDS
     1069   01 00395    80000000 A   PLMID    I        8,0           PLM:REGISTER ERROR
     1070                            *CPINT   BECOMES  0000F000 AFTER X'20' ERROR FREE PASSES (SEE RTC)
     1071   01 00396    00000000 A   CPINT    DATA     0
     1072   01 00397    0000F000 A   CPINTM   DATA     X'F000'
     1073   01 00398    40404040 A   SPACE    TEXT     '            '    12 SPACES
            01 00399    40404040 A
            01 0039A    40404040 A
     1074   01 0039B    08000000 A   MOTION   DATA     X'8000000'
     1075   01 0039C    00000000 A   TEMP     DATA     0
     1076   01 0039D    10000000 A   TOP      DATA     X'10000000'
     1077   01 0039E    00200000 A   MAXCNT   DATA     X'200000'
     1078   01 0039F    F1000000 A   PGO      DATA     X'F1000000'
     1079   01 003A0    00000001 A   TYPE     DATA     1                 OUTPUT MSG DEVICE ADDR
     1080   01 003A1    00000810 A   PCPINT   DATA     X'810'
     1081   01 003A2    00000020 A   IOINT    DATA     X'20'
     1082   01 003A3    11111111 A   BIT      DATA     X'11111111'
     1083   01 003A4    22222222 A            DATA     X'22222222'
     1084   01 003A5    44444444 A            DATA     X'44444444'
     1085   01 003A6    88888888 A            DATA     X'88888888'
     1086   01 003A7    000004B9     ODDBALL  DATA     SPURTRAP
     1087   01 003A8    FFFFFFFC A   NUMBER   DATA     -4
     1088   01 003A9    FFFFFFFC A            DATA     -4
     1089   01 003AA    FFFFFFFE A            DATA     -2
     1090   01 003AB    FFFFFFFC A            DATA     -4
     1091   01 003AC    FFFFFFFE A            DATA     -2
     1092   01 003AD    F0F0F0F0 A   FRAME    DATA     X'F0F0F0F0'       2 WORDS
     1093   01 003AE    F0F0F0F0 A            DATA     X'F0F0F0F0'
     1094   01 003AF    4040F0F0 A            DATA     X'4040F0F0'       3 WORDS
     1095   01 003B0    F0F0F0F0 A            DATA     X'F0F0F0F0'
     1096   01 003B1    F0F04040 A            DATA     X'F0F04040'
     1097   01 003B2    F0000000 A   MASK     DATA     X'F0000000'
     1098   01 003B3    0F000000 A            DATA     X'F000000'
     1099   01 003B4    00F00000 A            DATA     X'F00000'
     1100   01 003B5    000F0000 A            DATA     X'F0000'
     1101   01 003B6    0000F000 A            DATA     X'F000'
     1102   01 003B7    00000F00 A            DATA     X'F00'
     1103   01 003B8    000000F0 A            DATA     X'F0'
     1104   01 003B9    0000000F A            DATA     X'F'
     1105   01 003BA    FF000000 A   FILTER   DATA     X'FF000000'
     1106   01 003BB    00FF0000 A            DATA     X'FF0000'
     1107   01 003BC    0000FF00 A            DATA     X'FF00'
     1108   01 003BD    000000FF A            DATA     X'FF'
     1109   01 003BE    FF000000 A            DATA     X'FF000000'
     1110   01 003BF    00FF0000 A            DATA     X'FF0000'
     1111   01 003C0    0000FF00 A            DATA     X'FF00'
     1112   01 003C1    000000FF A            DATA     X'FF'
     1113   01 003C2    FF000000 A            DATA     X'FF000000'
     1114   01 003C3    00FF0000 A            DATA     X'FF0000'
     1115                                     BIND     64                TO PROVIDE A 64 WORD BOUNDARY
     1116                            **                                  REQUIRED FOR THE FORMAT ROUTINE
     1117   01 00400    00000000 A   BYTE     DATA     0                 0
     1118   01 00401    01010101 A            DATA     X'01010101'       1
     1119   01 00402    02020202 A            DATA     X'02020202'       2
     1120   01 00403    03030303 A            DATA     X'03030303'       3
     1121   01 00404    04040404 A            DATA     X'04040404'       4
     1122   01 00405    05050505 A            DATA     X'05050505'       5
     1123   01 00406    06060606 A            DATA     X'06060606'       6
     1124   01 00407    07070707 A            DATA     X'07070707'       7
     1125   01 00408    08080808 A            DATA     X'08080808'       8
     1126   01 00409    09090909 A            DATA     X'09090909'       9
     1127   01 0040A    31313131 A            DATA     X'31313131'       A
     1128   01 0040B    32323232 A            DATA     X'32323232'       B
     1129   01 0040C    33333333 A            DATA     X'33333333'       C
     1130   01 0040D    34343434 A            DATA     X'34343434'       D
     1131   01 0040E    35353535 A            DATA     X'35353535'       E
     1132   01 0040F    36363636 A            DATA     X'36363636'       F
     1133                            *                                  COMMAND PAIRS
     1134   01 00410    0000020D     PSIXCR   P        SIXCR
     1135   01 00411    0000020E     PTITLE   P        TITLE
     1136   01 00412    0000020F     PHEAD    P        HEAD
     1137   01 00413    00000210     PSHRTL   P        SHRTL
     1138   01 00414    00000211     PLONGL   P        LONGL
     1139   01 00415    00000212     LPGOTOP  P        PGOTOP
     1140   01 00416    00000217     LPFORMAT P        PFORMAT
     1141   01 00417    00000213     LPERR    P        PERR
     1142   01 00418    00000215     LPREPORT P        PREPORT
     1143   01 00419    0000021C     PRTCMSG  P        RTCMSG
     1144                                     BOUND 8
     1145   01 0041A    05001134     SIXCR    J        5,TTL
     1146   01 0041B    08000006 A            DATA     X'8000006'
     1147   01 0041C    05001134     TITLE    J        5,TTL
     1148   01 0041D    08000039 A            DATA     X'8000039'
     1149   01 0041E    05001170     HEAD     J        5,HDG
     1150   01 0041F    08000050 A            DATA     X'8000050'
     1151   01 00420    050011C0     SHRTL    J        5,IMAGE
     1152   01 00421    0800002C A            DATA     X'800002C'
     1153   01 00422    050011C0     LONGL    J        5,IMAGE
     1154   01 00423    08000054 A            DATA     X'8000054'
     1155   01 00424    03000E7C     PGOTOP   J        3,PGO
     1156   01 00425    08000001 A            GEN,8,24 8,1
     1157   01 00426    01000E60     PERR     J        1,SPACE
     1158   01 00427    80000008 A            GEN,4,28 8,8               DC
     1159   01 00428    010011C4              J        1,IMAGE+1
     1160   01 00429    08000050 A            DATA     X'8000050'
     1161   01 0042A    01000E60     PREPORT  J        1,SPACE
     1162   01 0042B    80000008 A            GEN,4,28 8,8
     1163   01 0042C    010011C4              J        1,IMAGE+1
     1164   01 0042D    08000028 A            DATA     X'8000028'
     1165   01 0042E    01000E60     PFORMAT  J        1,SPACE
     1166   01 0042F    80000008 A            GEN,4,28 8,8
     1167   01 00430    0100113C              J        1,TTL+2
     1168   01 00431    20000031 A            GEN,8,24 32,49             CC
     1169   01 00432    01000E60              J        1,SPACE
     1170   01 00433    8000000B A            GEN,4,28 8,11
     1171   01 00434    01001174              J        1,HDG+1
     1172   01 00435    0800004C A            GEN,8,24 X'8',X'4C'
     1173                            *
     1174                            *  STACK POINTER DOUBLEWORD FOR PLM INSTRUCTION MODULE.
     1175                            *  DOUBLE WORD ADDRESS# X'800' WORD COUNT# X'30' SPACE COUNT#0
     1176                            *
     1177   01 00436    00000800 A   SPD1     DATA     X'800',X'30'
            01 00437    00000030 A
     1178   01 00438    050010E9     RTCMSG   GEN,8,24 5,BA(MSG)+1
     1179   01 00439    0800004B A            GEN,8,24 8,75
     1180                            MSG      TEXTC    '
            REAL TIME CLOCKS IN USE. TO DISABLE,',;
     1181   01 0043A    4B154040 A           ' CP INTERRUPT AND CLEAR R5'
            01 0043B    40404040 A
            01 0043C    40404040 A
            01 0043D    4040D9C5 A
            01 0043E    C1D340E3 A
            01 0043F    C9D4C540 A
            01 00440    C3D3D6C3 A
            01 00441    D2E240C9 A
            01 00442    D540E4E2 A
            01 00443    C54B40E3 A
            01 00444    D640C4C9 A
            01 00445    E2C1C2D3 A
            01 00446    C56B40C3 A
            01 00447    D740C9D5 A
            01 00448    E3C5D9D9 A
            01 00449    E4D7E340 A
            01 0044A    C1D5C440 A
            01 0044B    C3D3C5C1 A
            01 0044C    D940D9F5 A
     1182                                     BOUND    4
     1183   01 0044D    15151515 A   TTL      DATA     X'15151515'
     1184   01 0044E    15151540 A            DATA     X'15151540'
     1185   01 0044F    40404040 A            DATA     X'40404040'
     1186   01 00450    40404040 A            DATA     X'40404040'
     1187   01 00451    40404040 A            DATA     X'40404040'
     1188   01 00452    40404040 A            DATA     X'40404040'
     1189   01 00453    40404040 A            DATA     X'40404040'
     1190   01 00454    40404040 A            DATA     X'40404040'
     1191   01 00455    40404040 A            DATA     X'40404040'
     1192   01 00456    404040C1 A            DATA     X'404040C1'
     1193   01 00457    E4E3D640 A            DATA     X'E4E3D640'
     1194   01 00458    C5D9D9D6 A            DATA     X'C5D9D9D6'
     1195   01 00459    D940C4C9 A            DATA     X'D940C4C9'
     1196   01 0045A    E2D7D3C1 A            DATA     X'E2D7D3C1'
     1197   01 0045B    E8404040 A            DATA     X'E8404040'
     1198   01 0045C    15404040 A   HDG      DATA     X'15404040'
     1199   01 0045D    40D3C9E2 A            DATA     X'40D3C9E2'
     1200   01 0045E    E3404040 A            DATA     X'E3404040'
     1201   01 0045F    4040C5D9 A            DATA     X'4040C5D9'
     1202   01 00460    D9D6D9E2 A            DATA     X'D9D6D9E2'
     1203   01 00461    40404040 A            DATA     X'40404040'
     1204   01 00462    D7C1E2E2 A            DATA     X'D7C1E2E2'
     1205   01 00463    C5E24040 A            DATA     X'C5E24040'
     1206   01 00464    404040C9 A            DATA     X'404040C9'
     1207   01 00465    D5E2E340 A            DATA     X'D5E2E340'
     1208   01 00466    4040C9C4 A            DATA     X'4040C9C4'
     1209   01 00467    C5D5E3C9 A            DATA     X'C5D5E3C9'
     1210   01 00468    C6C9C5D9 A            DATA     X'C6C9C5D9'
     1211   01 00469    40404040 A            DATA     X'40404040'
     1212   01 0046A    C9E24040 A            DATA     X'C9E24040'
     1213   01 0046B    4040E2C8 A            DATA     X'4040E2C8'
     1214   01 0046C    D6E4D3C4 A            DATA     X'D6E4D3C4'
     1215   01 0046D    40C2C540 A            DATA     X'40C2C540'
     1216   01 0046E    404040C4 A            DATA     X'404040C4'
     1217   01 0046F    C9C6C615 A            DATA     X'C9C6C615'
     1218   01 00470    40404015 A   IMAGE    DATA     X'40404015'
     1219   01 00471    00000000 A            FILL     %+19
            01 00472    00000000 A
            01 00473    00000000 A
            01 00474    00000000 A
            01 00475    00000000 A
            01 00476    00000000 A
            01 00477    00000000 A
            01 00478    00000000 A
            01 00479    00000000 A
            01 0047A    00000000 A
            01 0047B    00000000 A
            01 0047C    00000000 A
            01 0047D    00000000 A
            01 0047E    00000000 A
            01 0047F    00000000 A
            01 00480    00000000 A
            01 00481    00000000 A
            01 00482    00000000 A
            01 00483    00000000 A
     1220   01 00484    40404040 A   BLANK    DATA     X'40404040'
     1221                                     BOUND 8
     1222   01 00486                 TABLE    RES      0
     1223   01 00486    00000000 A            DATA     0                 NEG COUNT OF WORDS IN CURRENT MODULE
     1224   01 00487    00000000 A            DATA     0                 INSTRUCTION BEING TESTED
     1225   01 00488    00000000 A            DATA     0                 PSW1 IN
     1226   01 00489    00000000 A            DATA     0                 PSW1 OUT
     1227   01 0048A    00000000 A            DATA     0                 R IN
     1228   01 0048B    00000000 A            DATA     0                 R OUT
     1229   01 0048C    00000000 A            DATA     0                 MEMORY IN
     1230   01 0048D    00000000 A            DATA     0                 MEMORY OUT
     1231   01 0048E    00000000 A            DATA     0                 RU1 IN
     1232   01 0048F    00000000 A            DATA     0                 RU1 OUT
     1233   01 00490    00000000 A            DATA     0                 MEMORY+1 IN
     1234   01 00491    00000000 A            DATA     0                 MEMORY+1 OUT
     1235   01 00492    00000000 A            DATA     0                 PSW2 IN
     1236   01 00493    00000000 A            DATA     0                 PSW2 OUT
     1237   01 00494    00000000 A            DATA     0                 OLD PSW1   - USED ONLY FOR XPSD TEST
     1238   01 00495    00000000 A            DATA     0                 OLD PSW2   - USED ONLY FOR XPSD TEST
     1239   01 00496    00000000 A            DATA     0                 NEW PSW2   - USED ONLY FOR XPSD TEST
     1240   01 00497    00000000 A            DATA     0                 NEW PSW1   - USED ONLY FOR EPSD TEST
     1241   01 00498    00000000 A            DATA     0,0
            01 00499    00000000 A
     1242   01 0049A                 TEST     RES      0
     1243   01 0049A    00000000 A            FILL     %+12
            01 0049B    00000000 A
            01 0049C    00000000 A
            01 0049D    00000000 A
            01 0049E    00000000 A
            01 0049F    00000000 A
            01 004A0    00000000 A
            01 004A1    00000000 A
            01 004A2    00000000 A
            01 004A3    00000000 A
            01 004A4    00000000 A
            01 004A5    00000000 A
     1244   01 004A6    00000000 A   RETURN   PZE
     1245   01 004A7    00000000 A            PZE
     1246   01 004A8    00000179              PZE,0    LOC+2
     1247   01 004A9    00000000 A            PZE
     1248   01 004AA    00000263     BUMP     PZE,0    BUMPER
     1249   01 004AB    00000000 A            PZE
     1250   01 004AC    00000112     REPEAT   PZE,0    CYCLE
     1251   01 004AD    00000000 A            PZE
     1252   01 004AE    00000000 A   PSW1     PZE
     1253   01 004AF    00000000 A   PSW2     PZE
     1254   01 004B0    00000000 A   CNT1CP   PZE
     1255   01 004B1    00000000 A   CNT2CP   PZE
     1256   01 004B2    00000000 A   CNT3CP   PZE
     1257   01 004B3    00000000 A   CNT4CP   PZE
     1258   01 004B4    00000000 A   COUNT    PZE
     1259   01 004B5    00000000 A   ERRORS   PZE
     1260   01 004B6    00000000 A   PASSES   PZE
     1261   01 004B7    00000000 A   WKO      PZE
     1262   01 004B8    00000000 A   WORD     PZE
     1263         01 00400           ZERO     EQU      BYTE
     1264         01 003A8           NEG4     EQU      NUMBER
     1265         01 003AA           NEG2     EQU      NUMBER+2
     1266         01 00047           XPSD     EQU      BRANCH
     1267         00000000           C        EQU      0
     1268         00000000           I        EQU      0
     1269         00000000           Y        EQU      0
     1270         01 0049B           INST     EQU      TEST+1
     1271         01 0049C           IA       EQU      TEST+2
     1272         01 004A2           MEMORY   EQU      TEST+8
     1273         01 00400           CNT3Z    EQU      ZERO
     1274         01 00400           CNT4Z    EQU      ZERO
     1275         01 004AC           MODULE   EQU      REPEAT
     1276         01 004AC           PASS     EQU      REPEAT
     1277   01 004B9    0F0004BA     SPURTRAP XPSD,0   SPUR
     1278                                     BOUND    8
     1279   01 004BA    00000000 A   SPUR     PZE      0
     1280   01 004BB    00000000 A            PZE      0
     1281   01 004BC    000004BE              PZE,0    %+2
     1282   01 004BD    07000000 A            DATA     X'07000000'       TURN ON INTR INH BITS
     1283   01 004BE    32500396              LW,5     CPINT
     1284   01 004BF    6D501300 A            WD,5     X'1300'           ARM AND DISABLE COUNT PULSE INTRS.
     1285   01 004C0    323004B6              LW,3     PASSES            RESET PASSES TO LAST SETTING
     1286   01 004C1    322004B5              LW,2     ERRORS            RESET ERRORS TO LAST SETTING
     1287   01 004C2    32100120              LW,1     SAVE              MODULE POINTER
     1288   01 004C3    320003A0              LW,0     TYPE              I/O ADDR
     1289   01 004C4    2E000000 A   SPURW    WAIT                ERROR HALT
     1290                            *
     1291   01 004C5    000004A6              DATA     RETURN            ADDR FOR FOLLOWING OCMMENT LINE
     1292                            * CHECK THE CONTENTS OF 'RETURN' TO DETERMINE THE LOCATION PLUS 1 OF
     1293                            * THE XPSD THAT WAS EXECUTED AS A RESULT OF A SPURIOUS TRAP.
     1294                            *
     1295   01 004C5                          ORG      %-1               ELIMINATE ABOVE DATA STATEMENT
            01 004C5
     1296   01 004C5    4B5003B6              AND,5    MASK+4            SAVE ONLY BITS 16-19
     1297   01 004C6    35500396              STW,5    CPINT             SELECTED INTERRUPTS
     1298   01 004C7    350003A0              STW,0    TYPE              SELECTED  I/O ADDR
     1299   01 004C8    35500397              STW,5    CPINTM            MASK FOR SELECTED INTERRUPTS
     1300   01 004C9    0E3004AC              LPSD,3   REPEAT            RELEASE PANEL INTERRUPT-REPEAT TEST
     1301                                     BOUND 8
     1302   01 004CA                 LIST     RES      0
     1303   01 004CA    FFFFFFFA A   EXU01    DATA     -6                EXU    LOC+1    XPSD
     1304   01 004CB    67000178              EXU      LOC+1
     1305   01 004CC    F0000139              K        15,0,0,SETPSW
     1306   01 004CD    F0000178              K        15,0,0,LOC+1
     1307   01 004CE    FFFFFFFF A            DATA     -1
     1308   01 004CF    FFFFFFFF A            DATA     -1
     1309   01 004D0    FFFFFFFC A   EXU02    DATA     -4                EXU    BRANCH  XPSD
     1310   01 004D1    67000047              EXU      BRANCH
     1311   01 004D2    00000139              DATA     SETPSW
     1312   01 004D3    00000178              DATA     LOC+1
     1313   01 004D4    FFFFFFF8 A   EXU03    DATA     -8                EXU     MEMORY  LW
     1314   01 004D5    670004A2              EXU      MEMORY
     1315   01 004D6    93300139              K        9,3,3,SETPSW
     1316   01 004D7    A3300179              K        10,3,3,LOC+2
     1317   01 004D8    FFFFFFFF A            DATA     -1
     1318   01 004D9    32C004A2              LW,12    MEMORY
     1319   01 004DA    32C004A2              LW,12    MEMORY
     1320   01 004DB    32C004A2              LW,12    MEMORY
     1321   01 004DC    FFFFFFFA A   EXU04    DATA     -6                EXU X  BRANCH  XPSD
     1322   01 004DD    670204A2              EXU      MEMORY,1
     1323   01 004DE    F7300139              K        15,7,3,SETPSW
     1324   01 004DF    F7300178              K        15,7,3,LOC+1
     1325   01 004E0    FFFFFBA5 A            DATA     BRANCH-MEMORY
     1326   01 004E1    FFFFFBA5 A            DATA     BRANCH-MEMORY
     1327   01 004E2    FFFFFFF8 A   EXU05    DATA     -8                EXU *  BRANCH XPSD
     1328   01 004E3    E70004A2              EXU      *MEMORY
     1329   01 004E4    00000139              K        0,0,0,SETPSW
     1330   01 004E5    00000178              K        0,0,0,LOC+1
     1331   01 004E6    00000001 A            DATA     1
     1332   01 004E7    00000001 A            DATA     1
     1333   01 004E8    00C20047              PZE,12   BRANCH,1
     1334   01 004E9    00C20047              PZE,12   BRANCH,1
     1335   01 004EA    FFFFFFF6 A   EXU06    DATA     -10               EXU *X C1RET   XPSD
     1336   01 004EB    E70204A2              EXU      *MEMORY,1
     1337   01 004EC    00000139              K        0,0,0,SETPSW
     1338   01 004ED    00000178              K        0,0,0,LOC+1
     1339   01 004EE    0000FACE A            DATA     X'FACE'
     1340   01 004EF    0000FACE A            DATA     X'FACE'
     1341   01 004F0    000105CC S            PZE,0    C1RET-X'FACE'
     1342   01 004F1    000105CC S            PZE,0    C1RET-X'FACE'
     1343   01 004F2    0000DEAF A            DATA     X'DEAF'
     1344   01 004F3    0000DEAF A            DATA     X'DEAF'
     1345   01 004F4    FFFFFFF8 A   EXU07    DATA     -8                EXU  XPSD  SLAVE MODE
     1346   01 004F5    670004A2              EXU      MEMORY            MV
     1347   01 004F6    078001E8              K        0,7,8,SI9NAO
     1348   01 004F7    27000065              K        2,7,0,MVRET+1
     1349   01 004F8    FFFFFFFF A            DATA     -1
     1350   01 004F9    FFFFFFFF A            DATA     -1
     1351   01 004FA    0F0004A6              XPSD,0   RETURN
     1352   01 004FB    0F0004A6              XPSD,0   RETURN
     1353   01 004FC    FFFFFFFA A   EXU08    DATA     -6                EXU  NEI   SLAVE MODE (NEI=PRIV)
     1354   01 004FD    6700000C A            EXU      12                MV
     1355   01 004FE    07B001E8              K        0,7,11,SI9NAO
     1356   01 004FF    A730006D              K        10,7,3,NEIRET+3
     1357   01 00500    0C0004A2              K        0,12,0,MEMORY
     1358   01 00501    0C0004A2              K        0,12,0,MEMORY
     1359   01 00502    FFFFFFFC A   LCF01    DATA     -4                LCF 0    00 INTO F7 = F7 BYTE 0
     1360   01 00503    700004A2              LCF,0    MEMORY
     1361   01 00504    F7300139              K        15,7,3,SETPSW
     1362   01 00505    F7300179              K        15,7,3,LOC+2
     1363   01 00506    FFFFFFFC A   LCF02    DATA     -4                LCF 1    00 INTO F7 = F0 BYTE 0
     1364   01 00507    701004A2              LCF,1    MEMORY
     1365   01 00508    F7200139              K        15,7,2,SETPSW
     1366   01 00509    F0200179              K        15,0,2,LOC+2
     1367   01 0050A    FFFFFFFC A   LCF03    DATA     -4                LCF 2    00 INTO F7 = 07 BYTE 0
     1368   01 0050B    702004A2              LCF,2    MEMORY
     1369   01 0050C    F7100139              K        15,7,1,SETPSW
     1370   01 0050D    07100179              K        0,7,1,LOC+2
     1371   01 0050E    FFFFFFFC A   LCF04    DATA     -4                LCF 3    00 INTO F7 = 00 BYTE 0
     1372   01 0050F    703004A2              LCF,3    MEMORY
     1373   01 00510    F7300139              K        15,7,3,SETPSW
     1374   01 00511    00300179              K        0,0,3,LOC+2
     1375   01 00512    FFFFFFF8 A   LCF05    DATA     -8                LCF 3 *  5D INTO A2 = 55 BYTE 0
     1376   01 00513    F030049C              LCF,3    *IA
     1377   01 00514    A2200139              K        10,2,2,SETPSW
     1378   01 00515    55200179              K        5,5,2,LOC+2
     1379   01 00516    01234567 A            DATA     X'01234567'
     1380   01 00517    01234567 A            DATA     X'01234567'
     1381   01 00518    5D4E6F70 A            DATA     X'5D4E6F70'
     1382   01 00519    5D4E6F70 A            DATA     X'5D4E6F70'
     1383                            ** TEST THAT -R CAN BE CLEARED. ANSWER OF ZERO
     1384   01 0051A    FFFFFFFA A   LW01     DATA     -6
     1385   01 0051B    32C004A2              LW,12    MEMORY
     1386   01 0051C    F7300139              K        15,7,3,SETPSW
     1387   01 0051D    C7300179              K        12,7,3,LOC+2      CC1 AND 2 UNAFFECTED CC3 AND 4 ZERO
     1388   01 0051E    FFFFFFFF A            DATA     -1                R IN
     1389   01 0051F    00000000 A            DATA     0                 R OUT
     1390                            ** TEST X-FER OF ONES TO ONES. NEGATIVE RESULT
     1391   01 00520    FFFFFFF8 A   LW02     DATA     -8
     1392   01 00521    32C004A2              LW,12    MEMORY
     1393   01 00522    37300139              K        3,7,3,SETPSW
     1394   01 00523    17300179              K        1,7,3,LOC+2
     1395   01 00524    FFFFFFFF A            DATA     -1                R IN
     1396   01 00525    FFFFFFFF A            DATA     -1                R OUT
     1397   01 00526    FFFFFFFF A            DATA     -1                M IN
     1398   01 00527    FFFFFFFF A            DATA     -1                 MOUT
     1399                            ** CHECK X-FER OF ONES TO ZEROES. INDIRECT ADDRESSING. NEG RESULT
     1400                            ** INSURE RU1 NOT AFFECTED
     1401   01 00528    FFFFFFF4 A   LW03     DATA     -12
     1402   01 00529    B2C0049C              LW,12    *IA
     1403   01 0052A    C6200139              K        12,6,2,SETPSW
     1404   01 0052B    D6200179              K        13,6,2,LOC+2
     1405   01 0052C    00000000 A            DATA     0
     1406   01 0052D    FFFFFFFF A            DATA     -1
     1407   01 0052E    FFFFFFFF A            DATA     -1
     1408   01 0052F    FFFFFFFF A            DATA     -1
     1409   01 00530    00000000 A            DATA     0
     1410   01 00531    00000000 A            DATA     0
     1411   01 00532    FFFFFFFF A            DATA     -1
     1412   01 00533    FFFFFFFF A            DATA     -1
     1413                            ** TEST SGTZ TERM BY LOADING A SINGLE BIT. SEQUENCE FROM BIT32 TO BIT01
     1414   01 00534    FFFFFFF8 A   LW04     DATA     -8
     1415   01 00535    32C004A2              LW,12    MEMORY
     1416   01 00536    30000139              K        3,0,0,SETPSW
     1417   01 00537    20000179              K        2,0,0,LOC+2
     1418   01 00538    00000000 A            DATA     0
     1419   01 00539    00000001 A            DATA     1
     1420   01 0053A    00000001 A            DATA     1
     1421   01 0053B    00000001 A            DATA     1
     1422   01 0053C    FFFFFFF8 A   LW05     DATA     -8
     1423   01 0053D    32C004A2              LW,12    MEMORY
     1424   01 0053E    10000139              K        1,0,0,SETPSW
     1425   01 0053F    20000179              K        2,0,0,LOC+2
     1426   01 00540    00000000 A            DATA     0
     1427   01 00541    00000002 A            DATA     2
     1428   01 00542    00000002 A            DATA     2
     1429   01 00543    00000002 A            DATA     2
     1430   01 00544    FFFFFFF8 A   LW06     DATA     -8
     1431   01 00545    32C004A2              LW,12    MEMORY
     1432   01 00546    10000139              K        1,0,0,SETPSW
     1433   01 00547    20000179              K        2,0,0,LOC+2
     1434   01 00548    00000000 A            DATA     0
     1435   01 00549    00000004 A            DATA     4
     1436   01 0054A    00000004 A            DATA     4
     1437   01 0054B    00000004 A            DATA     4
     1438   01 0054C    FFFFFFF8 A   LW07     DATA     -8
     1439   01 0054D    32C004A2              LW,12    MEMORY
     1440   01 0054E    10000139              K        1,0,0,SETPSW
     1441   01 0054F    20000179              K        2,0,0,LOC+2
     1442   01 00550    00000000 A            DATA     0
     1443   01 00551    00000008 A            DATA     8
     1444   01 00552    00000008 A            DATA     8
     1445   01 00553    00000008 A            DATA     8
     1446   01 00554    FFFFFFF8 A   LW08     DATA     -8
     1447   01 00555    32C004A2              LW,12    MEMORY
     1448   01 00556    10000139              K        1,0,0,SETPSW
     1449   01 00557    20000179              K        2,0,0,LOC+2
     1450   01 00558    00000000 A            DATA     0
     1451   01 00559    00000010 A            DATA     X'10'
     1452   01 0055A    00000010 A            DATA     X'10'
     1453   01 0055B    00000010 A            DATA     X'10'
     1454   01 0055C    FFFFFFF8 A   LW09     DATA     -8
     1455   01 0055D    32C004A2              LW,12    MEMORY
     1456   01 0055E    10000139              K        1,0,0,SETPSW
     1457   01 0055F    20000179              K        2,0,0,LOC+2
     1458   01 00560    00000000 A            DATA     0
     1459   01 00561    00000020 A            DATA     X'20'
     1460   01 00562    00000020 A            DATA     X'20'
     1461   01 00563    00000020 A            DATA     X'20'
     1462   01 00564    FFFFFFF8 A   LW10     DATA     -8
     1463   01 00565    32C004A2              LW,12    MEMORY
     1464   01 00566    10000139              K        1,0,0,SETPSW
     1465   01 00567    20000179              K        2,0,0,LOC+2
     1466   01 00568    00000000 A            DATA     0
     1467   01 00569    00000040 A            DATA     X'40'
     1468   01 0056A    00000040 A            DATA     X'40'
     1469   01 0056B    00000040 A            DATA     X'40'
     1470   01 0056C    FFFFFFF8 A   LW11     DATA     -8
     1471   01 0056D    32C004A2              LW,12    MEMORY
     1472   01 0056E    10000139              K        1,0,0,SETPSW
     1473   01 0056F    20000179              K        2,0,0,LOC+2
     1474   01 00570    00000000 A            DATA     0
     1475   01 00571    00000080 A            DATA     X'80'
     1476   01 00572    00000080 A            DATA     X'80'
     1477   01 00573    00000080 A            DATA     X'80'
     1478   01 00574    FFFFFFF8 A   LW12     DATA     -8
     1479   01 00575    32C004A2              LW,12    MEMORY
     1480   01 00576    10000139              K        1,0,0,SETPSW
     1481   01 00577    20000179              K        2,0,0,LOC+2
     1482   01 00578    00000000 A            DATA     0
     1483   01 00579    00000100 A            DATA     X'100'
     1484   01 0057A    00000100 A            DATA     X'100'
     1485   01 0057B    00000100 A            DATA     X'100'
     1486   01 0057C    FFFFFFF8 A   LW13     DATA     -8
     1487   01 0057D    32C004A2              LW,12    MEMORY
     1488   01 0057E    10000139              K        1,0,0,SETPSW
     1489   01 0057F    20000179              K        2,0,0,LOC+2
     1490   01 00580    00000000 A            DATA     0
     1491   01 00581    00000200 A            DATA     X'200'
     1492   01 00582    00000200 A            DATA     X'200'
     1493   01 00583    00000200 A            DATA     X'200'
     1494   01 00584    FFFFFFF8 A   LW14     DATA     -8
     1495   01 00585    32C004A2              LW,12    MEMORY
     1496   01 00586    10000139              K        1,0,0,SETPSW
     1497   01 00587    20000179              K        2,0,0,LOC+2
     1498   01 00588    00000000 A            DATA     0
     1499   01 00589    00000400 A            DATA     X'400'
     1500   01 0058A    00000400 A            DATA     X'400'
     1501   01 0058B    00000400 A            DATA     X'400'
     1502   01 0058C    FFFFFFF8 A   LW15     DATA     -8
     1503   01 0058D    32C004A2              LW,12    MEMORY
     1504   01 0058E    10000139              K        1,0,0,SETPSW
     1505   01 0058F    20000179              K        2,0,0,LOC+2
     1506   01 00590    00000000 A            DATA     0
     1507   01 00591    00000800 A            DATA     X'800'
     1508   01 00592    00000800 A            DATA     X'800'
     1509   01 00593    00000800 A            DATA     X'800'
     1510   01 00594    FFFFFFF8 A   LW16     DATA     -8
     1511   01 00595    32C004A2              LW,12    MEMORY
     1512   01 00596    10000139              K        1,0,0,SETPSW
     1513   01 00597    20000179              K        2,0,0,LOC+2
     1514   01 00598    00000000 A            DATA     0
     1515   01 00599    00001000 A            DATA     X'1000'
     1516   01 0059A    00001000 A            DATA     X'1000'
     1517   01 0059B    00001000 A            DATA     X'1000'
     1518   01 0059C    FFFFFFF8 A   LW17     DATA     -8
     1519   01 0059D    32C004A2              LW,12    MEMORY
     1520   01 0059E    10000139              K        1,0,0,SETPSW
     1521   01 0059F    20000179              K        2,0,0,LOC+2
     1522   01 005A0    00000000 A            DATA     0
     1523   01 005A1    00002000 A            DATA     X'2000'
     1524   01 005A2    00002000 A            DATA     X'2000'
     1525   01 005A3    00002000 A            DATA     X'2000'
     1526   01 005A4    FFFFFFF8 A   LW18     DATA     -8
     1527   01 005A5    32C004A2              LW,12    MEMORY
     1528   01 005A6    10000139              K        1,0,0,SETPSW
     1529   01 005A7    20000179              K        2,0,0,LOC+2
     1530   01 005A8    00000000 A            DATA     0
     1531   01 005A9    00004000 A            DATA     X'4000'
     1532   01 005AA    00004000 A            DATA     X'4000'
     1533   01 005AB    00004000 A            DATA     X'4000'
     1534   01 005AC    FFFFFFF8 A   LW19     DATA     -8
     1535   01 005AD    32C004A2              LW,12    MEMORY
     1536   01 005AE    10000139              K        1,0,0,SETPSW
     1537   01 005AF    20000179              K        2,0,0,LOC+2
     1538   01 005B0    00000000 A            DATA     0
     1539   01 005B1    00008000 A            DATA     X'8000'
     1540   01 005B2    00008000 A            DATA     X'8000'
     1541   01 005B3    00008000 A            DATA     X'8000'
     1542   01 005B4    FFFFFFF8 A   LW20     DATA     -8
     1543   01 005B5    32C004A2              LW,12    MEMORY
     1544   01 005B6    10000139              K        1,0,0,SETPSW
     1545   01 005B7    20000179              K        2,0,0,LOC+2
     1546   01 005B8    00000000 A            DATA     0
     1547   01 005B9    00010000 A            DATA     X'10000'
     1548   01 005BA    00010000 A            DATA     X'10000'
     1549   01 005BB    00010000 A            DATA     X'10000'
     1550   01 005BC    FFFFFFF8 A   LW21     DATA     -8
     1551   01 005BD    32C004A2              LW,12    MEMORY
     1552   01 005BE    10000139              K        1,0,0,SETPSW
     1553   01 005BF    20000179              K        2,0,0,LOC+2
     1554   01 005C0    00000000 A            DATA     0
     1555   01 005C1    00020000 A            DATA     X'20000'
     1556   01 005C2    00020000 A            DATA     X'20000'
     1557   01 005C3    00020000 A            DATA     X'20000'
     1558   01 005C4    FFFFFFF8 A   LW22     DATA     -8
     1559   01 005C5    32C004A2              LW,12    MEMORY
     1560   01 005C6    10000139              K        1,0,0,SETPSW
     1561   01 005C7    20000179              K        2,0,0,LOC+2
     1562   01 005C8    00000000 A            DATA     0
     1563   01 005C9    00040000 A            DATA     X'40000'
     1564   01 005CA    00040000 A            DATA     X'40000'
     1565   01 005CB    00040000 A            DATA     X'40000'
     1566   01 005CC    FFFFFFF8 A   LW23     DATA     -8
     1567   01 005CD    32C004A2              LW,12    MEMORY
     1568   01 005CE    10000139              K        1,0,0,SETPSW
     1569   01 005CF    20000179              K        2,0,0,LOC+2
     1570   01 005D0    00000000 A            DATA     0
     1571   01 005D1    00080000 A            DATA     X'80000'
     1572   01 005D2    00080000 A            DATA     X'80000'
     1573   01 005D3    00080000 A            DATA     X'80000'
     1574   01 005D4    FFFFFFF8 A   LW24     DATA     -8
     1575   01 005D5    32C004A2              LW,12    MEMORY
     1576   01 005D6    10000139              K        1,0,0,SETPSW
     1577   01 005D7    20000179              K        2,0,0,LOC+2
     1578   01 005D8    00000000 A            DATA     0
     1579   01 005D9    00100000 A            DATA     X'100000'
     1580   01 005DA    00100000 A            DATA     X'100000'
     1581   01 005DB    00100000 A            DATA     X'100000'
     1582   01 005DC    FFFFFFF8 A   LW25     DATA     -8
     1583   01 005DD    32C004A2              LW,12    MEMORY
     1584   01 005DE    10000139              K        1,0,0,SETPSW
     1585   01 005DF    20000179              K        2,0,0,LOC+2
     1586   01 005E0    00000000 A            DATA     0
     1587   01 005E1    00200000 A            DATA     X'200000'
     1588   01 005E2    00200000 A            DATA     X'200000'
     1589   01 005E3    00200000 A            DATA     X'200000'
     1590   01 005E4    FFFFFFF8 A   LW26     DATA     -8
     1591   01 005E5    32C004A2              LW,12    MEMORY
     1592   01 005E6    10000139              K        1,0,0,SETPSW
     1593   01 005E7    20000179              K        2,0,0,LOC+2
     1594   01 005E8    00000000 A            DATA     0
     1595   01 005E9    00400000 A            DATA     X'400000'
     1596   01 005EA    00400000 A            DATA     X'400000'
     1597   01 005EB    00400000 A            DATA     X'400000'
     1598   01 005EC    FFFFFFF8 A   LW27     DATA     -8
     1599   01 005ED    32C004A2              LW,12    MEMORY
     1600   01 005EE    10000139              K        1,0,0,SETPSW
     1601   01 005EF    20000179              K        2,0,0,LOC+2
     1602   01 005F0    00000000 A            DATA     0
     1603   01 005F1    00800000 A            DATA     X'800000'
     1604   01 005F2    00800000 A            DATA     X'800000'
     1605   01 005F3    00800000 A            DATA     X'800000'
     1606   01 005F4    FFFFFFF8 A   LW28     DATA     -8
     1607   01 005F5    32C004A2              LW,12    MEMORY
     1608   01 005F6    10000139              K        1,0,0,SETPSW
     1609   01 005F7    20000179              K        2,0,0,LOC+2
     1610   01 005F8    00000000 A            DATA     0
     1611   01 005F9    01000000 A            DATA     X'1000000'
     1612   01 005FA    01000000 A            DATA     X'1000000'
     1613   01 005FB    01000000 A            DATA     X'1000000'
     1614   01 005FC    FFFFFFF8 A   LW29     DATA     -8
     1615   01 005FD    32C004A2              LW,12    MEMORY
     1616   01 005FE    10000139              K        1,0,0,SETPSW
     1617   01 005FF    20000179              K        2,0,0,LOC+2
     1618   01 00600    00000000 A            DATA     0
     1619   01 00601    02000000 A            DATA     X'2000000'
     1620   01 00602    02000000 A           DATA     X'2000000'
     1621   01 00603    02000000 A           DATA     X'2000000'
     1622   01 00604    FFFFFFF8 A   LW30     DATA     -8
     1623   01 00605    32C004A2              LW,12    MEMORY
     1624   01 00606    10000139              K        1,0,0,SETPSW
     1625   01 00607    20000179              K        2,0,0,LOC+2
     1626   01 00608    00000000 A            DATA     0
     1627   01 00609    04000000 A            DATA     X'4000000'
     1628   01 0060A    04000000 A            DATA     X'4000000'
     1629   01 0060B    04000000 A            DATA     X'4000000'
     1630   01 0060C    FFFFFFF8 A   LW31     DATA     -8
     1631   01 0060D    32C004A2              LW,12    MEMORY
     1632   01 0060E    10000139              K        1,0,0,SETPSW
     1633   01 0060F    20000179              K        2,0,0,LOC+2
     1634   01 00610    00000000 A            DATA     0
     1635   01 00611    08000000 A            DATA     X'8000000',X'8000000',X'8000000'
            01 00612    08000000 A
            01 00613    08000000 A
     1636   01 00614    FFFFFFF8 A   LW32     DATA     -8
     1637   01 00615    32C004A2              LW,12    MEMORY
     1638   01 00616    10000139              K        1,0,0,SETPSW
     1639   01 00617    20000179              K        2,0,0,LOC+2
     1640   01 00618    00000000 A            DATA     0
     1641   01 00619    10000000 A            DATA     X'10000000',X'10000000',X'10000000'
            01 0061A    10000000 A
            01 0061B    10000000 A
     1642   01 0061C    FFFFFFF8 A   LW33     DATA     -8
     1643   01 0061D    32C004A2              LW,12    MEMORY
     1644   01 0061E    10000139              K        1,0,0,SETPSW
     1645   01 0061F    20000179              K        2,0,0,LOC+2
     1646   01 00620    00000000 A            DATA     0
     1647   01 00621    20000000 A            DATA     X'20000000',X'20000000',X'20000000'
            01 00622    20000000 A
            01 00623    20000000 A
     1648   01 00624    FFFFFFF8 A   LW34     DATA     -8
     1649   01 00625    32C004A2              LW,12    MEMORY
     1650   01 00626    10000139              K        1,0,0,SETPSW
     1651   01 00627    20000179              K        2,0,0,LOC+2
     1652   01 00628    00000000 A            DATA     0
     1653   01 00629    40000000 A            DATA     X'40000000',X'40000000',X'40000000'
            01 0062A    40000000 A
            01 0062B    40000000 A
     1654                            ** TEST THAT BIT0 WILL INHIBIT SGTZ
     1655   01 0062C    FFFFFFF8 A   LW35     DATA     -8
     1656   01 0062D    32C004A2              LW,12    MEMORY
     1657   01 0062E    30000139              K        3,0,0,SETPSW
     1658   01 0062F    10000179              K        1,0,0,LOC+2
     1659   01 00630    00000000 A            DATA     0
     1660   01 00631    80000000 A            DATA     X'80000000'
     1661   01 00632    80000000 A            DATA     X'80000000'
     1662   01 00633    80000000 A            DATA     X'80000000'
     1663                            ** CONDITION CODE SETTINGS FOR 'OR'
     1664                            **  CC3  CC4   RESULT IN R
     1665                            **   0    0      ZERO
     1666                            **   0    1      NEGATIVE
     1667                            **   1    0      POSITIVE
     1668   01 00634    FFFFFFFC A   OR01     DATA     -4                OR 0:0. RESULT = 0
     1669   01 00635    49C004A2              OR,12    MEMORY
     1670   01 00636    37300139              K        3,7,3,SETPSW
     1671   01 00637    07300179              K        0,7,3,LOC+2
     1672   01 00638    FFFFFFF8 A   OR02     DATA     -8                OR A0:0A  RESULT =AA (EACH BYTE)
     1673   01 00639    49C004A2              OR,12    MEMORY
     1674   01 0063A    07300139              K        0,7,3,SETPSW
     1675   01 0063B    17300179              K        1,7,3,LOC+2
     1676   01 0063C    A0A0A0A0 A            DATA     X'A0A0A0A0'
     1677   01 0063D    AAAAAAAA A            DATA     X'AAAAAAAA'
     1678   01 0063E    0A0A0A0A A            DATA     X'0A0A0A0A'
     1679   01 0063F    0A0A0A0A A            DATA     X'0A0A0A0A'
     1680   01 00640    FFFFFFF8 A   OR03     DATA     -8                OR DA:A0. RESULT = AA (EACH BYTE)
     1681   01 00641    49C004A2              OR,12    MEMORY
     1682   01 00642    F7300139              K        15,7,3,SETPSW
     1683   01 00643    D7300179              K        13,7,3,LOC+2
     1684   01 00644    0A0A0A0A A            DATA     X'0A0A0A0A'
     1685   01 00645    AAAAAAAA A            DATA     X'AAAAAAAA'
     1686   01 00646    A0A0A0A0 A            DATA     X'A0A0A0A0'
     1687   01 00647    A0A0A0A0 A            DATA     X'A0A0A0A0'
     1688   01 00648    FFFFFFF8 A   OR04     DATA     -8                OR 05:50. RESULT = 55 (EACH BYTE)
     1689   01 00649    49C004A2              OR,12    MEMORY
     1690   01 0064A    07300139              K        0,7,3,SETPSW
     1691   01 0064B    27300179              K        2,7,3,LOC+2
     1692   01 0064C    05050505 A            DATA     X'05050505'
     1693   01 0064D    55555555 A            DATA     X'55555555'
     1694   01 0064E    50505050 A            DATA     X'50505050'
     1695   01 0064F    50505050 A            DATA     X'50505050'
     1696   01 00650    FFFFFFF8 A   OR05     DATA     -8                OR 50:05. RESULT = 55 (EACH BYTE)
     1697   01 00651    49C004A2              OR,12    MEMORY
     1698   01 00652    17300139              K        1,7,3,SETPSW
     1699   01 00653    27300179              K        2,7,3,LOC+2
     1700   01 00654    50505050 A            DATA     X'50505050'
     1701   01 00655    55555555 A            DATA     X'55555555'
     1702   01 00656    05050505 A            DATA     X'05050505'
     1703   01 00657    05050505 A            DATA     X'05050505'
     1704   01 00658    FFFFFFF8 A   OR06     DATA     -8                OR FF:FF. RESULT = FF (EACH BYTE)
     1705   01 00659    49C004A2              OR,12    MEMORY
     1706   01 0065A    27300139              K        2,7,3,SETPSW
     1707   01 0065B    17300179              K        1,7,3,LOC+2
     1708   01 0065C    FFFFFFFF A            DATA     -1
     1709   01 0065D    FFFFFFFF A            DATA     -1
     1710   01 0065E    FFFFFFFF A            DATA     -1
     1711   01 0065F    FFFFFFFF A            DATA     -1
     1712   01 00660    FFFFFFF8 A   STW01    DATA     -8                STORE  -1
     1713   01 00661    35C004A2              STW,12   MEMORY
     1714   01 00662    07300139              K        0,7,3,SETPSW
     1715   01 00663    07300179              K        0,7,3,LOC+2
     1716   01 00664    FFFFFFFF A            DATA     -1
     1717   01 00665    FFFFFFFF A            DATA     -1
     1718   01 00666    00000000 A            DATA     0
     1719   01 00667    FFFFFFFF A            DATA     -1
     1720   01 00668    FFFFFFF8 A   STW02    DATA     -8                STORE 0
     1721   01 00669    35C004A2              STW,12   MEMORY
     1722   01 0066A    F7300139              K        F,7,3,SETPSW
     1723   01 0066B    F7300179              K        F,7,3,LOC+2
     1724   01 0066C    00000000 A            DATA     0
     1725   01 0066D    00000000 A            DATA     0
     1726   01 0066E    FFFFFFFF A            DATA     -1
     1727   01 0066F    00000000 A            DATA     0
     1728                            ** CONDITION CODE SETTINGS FOR AND  INSTRUCTION
     1729                            **  CC3  CC4  RESULT IN R
     1730                            **   0    0      ZERO
     1731                            **   0    1      NEGATIVE
     1732                            **   1    0      POSITIVE
     1733   01 00670    FFFFFFFC A   AND01    DATA     -4                AND 0:0 RESULT = 0
     1734   01 00671    4BC004A2              AND,12   MEMORY
     1735   01 00672    F7300139              K        15,7,3,SETPSW
     1736   01 00673    C7300179              K        12,7,3,LOC+2
     1737   01 00674    FFFFFFF8 A   AND02    DATA     -8                AND C:A. RESULT = 8 (EACH HEX CHAR)
     1738   01 00675    4BC004A2              AND,12   MEMORY
     1739   01 00676    77300139              K        7,7,3,SETPSW
     1740   01 00677    57300179              K        5,7,3,LOC+2
     1741   01 00678    CCCCCCCC A            DATA     X'CCCCCCCC'
     1742   01 00679    88888888 A            DATA     X'88888888'
     1743   01 0067A    AAAAAAAA A            DATA     X'AAAAAAAA'
     1744   01 0067B    AAAAAAAA A            DATA     X'AAAAAAAA'
     1745   01 0067C    FFFFFFF8 A   AND03    DATA     -8                AND 9:5. RESULT = 1 (EACH HEX CHAR)
     1746   01 0067D    4BC004A2              AND,12   MEMORY
     1747   01 0067E    07300139              K        0,7,3,SETPSW
     1748   01 0067F    27300179              K        2,7,3,LOC+2
     1749   01 00680    99999999 A            DATA     X'99999999'
     1750   01 00681    11111111 A            DATA     X'11111111'
     1751   01 00682    55555555 A            DATA     X'55555555'
     1752   01 00683    55555555 A            DATA     X'55555555'
     1753   01 00684    FFFFFFF8 A   AND04    DATA     -8                AND 3:A. RESULT = 2 (EACH HEX CHAR)
     1754   01 00685    4BC004A2              AND,12   MEMORY
     1755   01 00686    37300139              K        3,7,3,SETPSW
     1756   01 00687    27300179              K        2,7,3,LOC+2
     1757   01 00688    33333333 A            DATA     X'33333333'
     1758   01 00689    22222222 A            DATA     X'22222222'
     1759   01 0068A    AAAAAAAA A            DATA     X'AAAAAAAA'
     1760   01 0068B    AAAAAAAA A            DATA     X'AAAAAAAA'
     1761   01 0068C    FFFFFFF8 A   AND05    DATA     -8                AND 6:5. RESULT = 4 (EACH HEX CHAR)
     1762   01 0068D    4BC004A2              AND,12   MEMORY
     1763   01 0068E    F7300139              K        15,7,3,SETPSW
     1764   01 0068F    E7300179              K        14,7,3,LOC+2
     1765   01 00690    66666666 A            DATA     X'66666666'
     1766   01 00691    44444444 A            DATA     X'44444444'
     1767   01 00692    55555555 A            DATA     X'55555555'
     1768   01 00693    55555555 A            DATA     X'55555555'
     1769   01 00694    FFFFFFFA A   AND06    DATA     -6                AND C(R) WITH ITSELF. C(R) UNCHANGED
     1770   01 00695    4BC0000C A            AND,12   12
     1771   01 00696    73300139              K        7,3,3,SETPSW
     1772   01 00697    53300179              K        5,3,3,LOC+2
     1773   01 00698    84214812 A            DATA     X'84214812'
     1774   01 00699    84214812 A            DATA     X'84214812'
     1775                            ** CONDITION CODE SETTINGS FOR EOR
     1776                            **  CC3   CC4  RESULT IN R
     1777                            **   0     0      ZERO
     1778                            **   0     1      NEGATIVE
     1779                            **   1     0      POSITIVE
     1780   01 0069A    FFFFFFF8 A   EOR01    DATA     -8                EOR C:9. RESULT = 5 (EACH HEX CHAR)
     1781   01 0069B    48C004A2              EOR,12   MEMORY
     1782   01 0069C    B7300139              K        11,7,3,SETPSW
     1783   01 0069D    A7300179              K        10,7,3,LOC+2
     1784   01 0069E    CCCCCCCC A            DATA     X'CCCCCCCC'
     1785   01 0069F    55555555 A            DATA     X'55555555'
     1786   01 006A0    99999999 A            DATA     X'99999999'
     1787   01 006A1    99999999 A            DATA     X'99999999'
     1788   01 006A2    FFFFFFF8 A   EOR02    DATA     -8                EOR 9:7. RESULT = E (EACH HEX CHAR)
     1789   01 006A3    48C004A2              EOR,12   MEMORY
     1790   01 006A4    B7300139              K        11,7,3,SETPSW
     1791   01 006A5    97300179              K        9,7,3,LOC+2
     1792   01 006A6    99999999 A            DATA     X'99999999'
     1793   01 006A7    EEEEEEEE A            DATA     X'EEEEEEEE'
     1794   01 006A8    77777777 A            DATA     X'77777777'
     1795   01 006A9    77777777 A            DATA     X'77777777'
     1796   01 006AA    FFFFFFF8 A   EOR03    DATA     -8                EOR 3:A. RESULT = 9 (EACH HEX CHAR)
     1797   01 006AB    48C004A2              EOR,12   MEMORY
     1798   01 006AC    37300139              K        3,7,3,SETPSW
     1799   01 006AD    17300179              K        1,7,3,LOC+2
     1800   01 006AE    33333333 A            DATA     X'33333333'
     1801   01 006AF    99999999 A            DATA     X'99999999'
     1802   01 006B0    AAAAAAAA A            DATA     X'AAAAAAAA'
     1803   01 006B1    AAAAAAAA A            DATA     X'AAAAAAAA'
     1804   01 006B2    FFFFFFF8 A   EOR04    DATA     -8                EOR 6:4. RESULT = 2 (EACH HEX CHAR)
     1805   01 006B3    48C004A2              EOR,12   MEMORY
     1806   01 006B4    17300139              K        1,7,3,SETPSW
     1807   01 006B5    27300179              K        2,7,3,LOC+2
     1808   01 006B6    66666666 A            DATA     X'66666666'
     1809   01 006B7    22222222 A            DATA     X'22222222'
     1810   01 006B8    44444444 A            DATA     X'44444444'
     1811   01 006B9    44444444 A            DATA     X'44444444'
     1812                            ** RP SHOULD NOT CHANGE. INTERRUPT INHIBITS SHOULD REMAIN SET
     1813   01 006BA    FFFFFFEE A   FAPSD01  DATA     -18
     1814   01 006BB    0F000494              XPSD,0   TABLE+14
     1815   01 006BC    F7300139              K        15,7,3,SETPSW     PSW1 IN
     1816   01 006BD    00000179              K        0,0,0,LOC+2       PSW1 OUT
     1817   01 006BE    00000000 A            DATA     0
     1818   01 006BF    00000000 A            DATA     0
     1819   01 006C0    00000000 A            DATA     0
     1820   01 006C1    00000000 A            DATA     0
     1821   01 006C2    00000000 A            DATA     0
     1822   01 006C3    00000000 A            DATA     0
     1823   01 006C4    00000000 A            DATA     0
     1824   01 006C5    00000000 A            DATA     0
     1825   01 006C6    07000000 A            DATA     X'7000000'        PSW2 IN
     1826   01 006C7    07000000 A            DATA     X'7000000'        PSW2 OUT
     1827   01 006C8    00000000 A            DATA     0                 TABLE+14
     1828   01 006C9    00000000 A            DATA     0                 TABLE+15
     1829   01 006CA    00000178              K        0,0,0,LOC+1       TABLE+16  LOADED INTO PSW1 BY XPSD
     1830   01 006CB    000000F0 A            DATA     X'F0'             TABLE+17
     1831                            ** CHANGE RP AND INTERRUPT INHIBITS
     1832   01 006CC    FFFFFFF2 A   FAPSD02  DATA     -14
     1833   01 006CD    0E8004A2              LPSD,8   MEMORY
     1834   01 006CE    30000139              K        3,0,0,SETPSW      PSW1 IN
     1835   01 006CF    C7300179              K        12,7,3,LOC+2      PSW1 OUT
     1836   01 006D0    00000000 A            DATA     0
     1837   01 006D1    00000000 A            DATA     0
     1838   01 006D2    C7300178              K        12,7,3,LOC+1      MEMORY: LOADED INTO PSW1 BY LPSD
     1839   01 006D3    C7300178              K        12,7,3,LOC+1
     1840   01 006D4    00000000 A            DATA     0
     1841   01 006D5    00000000 A            DATA     0
     1842   01 006D6    020000A0 A            DATA     X'020000A0'       MEMORY+1 : LOADED INTO PSW2 BY LPSD
     1843   01 006D7    020000A0 A            DATA     X'020000A0'
     1844   01 006D8    05000000 A            DATA     X'05000000'       PSW2 IN
     1845   01 006D9    020000A0 A            DATA     X'020000A0'       PSW2 OUT
     1846                            ** CHANGE RP AND INTERRUPT INHIBITS
     1847   01 006DA    FFFFFFF2 A   FAPSD03  DATA     -14
     1848   01 006DB    0E8004A2              LPSD,8   MEMORY
     1849   01 006DC    C5100139              K        12,5,1,SETPSW
     1850   01 006DD    32200179              K        3,2,2,LOC+2
     1851   01 006DE    00000000 A            DATA     0
     1852   01 006DF    00000000 A            DATA     0
     1853   01 006E0    32200178              K        3,2,2,LOC+1       LOADED INTO PSW1 BY LPSD
     1854   01 006E1    32200178              K        3,2,2,LOC+1
     1855   01 006E2    00000000 A            DATA     0
     1856   01 006E3    00000000 A            DATA     0
     1857   01 006E4    05000050 A            DATA     X'5000050'        LOADED INTO PSW2 BY LPSD
     1858   01 006E5    05000050 A            DATA     X'5000050'
     1859   01 006E6    020000A0 A            DATA     X'20000A0'        PSW2 IN
     1860   01 006E7    05000050 A            DATA     X'5000050'        PSW2 OUT
     1861                            ** LOAD FIVE INTO RP
     1862   01 006E8    FFFFFFF2 A   LRP01    DATA     -14
     1863   01 006E9    2F0004A2              LRP      MEMORY
     1864   01 006EA    00000139              K        0,0,0,SETPSW
     1865   01 006EB    00000179              K        0,0,0,LOC+2
     1866   01 006EC    00000000 A            DATA     0
     1867   01 006ED    00000000 A            DATA     0
     1868   01 006EE    00000050 A            DATA     X'50'
     1869   01 006EF    00000050 A            DATA     X'50'
     1870   01 006F0    00000000 A            DATA     0
     1871   01 006F1    00000000 A            DATA     0
     1872   01 006F2    00000000 A            DATA     0
     1873   01 006F3    00000000 A            DATA     0
     1874   01 006F4    000000A0 A            DATA     X'A0'             PSW2 IN
     1875   01 006F5    00000050 A            DATA     X'50'             PSW2 OUT
     1876                            ** LOAD A INTO REG POINTER FROM REG
     1877   01 006F6    FFFFFFF2 A   LRP02    DATA     -14
     1878   01 006F7    2F00000C A            LRP      12
     1879   01 006F8    F7300139              K        15,7,3,SETPSW
     1880   01 006F9    F7300179              K        15,7,3,LOC+2
     1881   01 006FA    000000A0 A            DATA     X'A0'
     1882   01 006FB    000000A0 A            DATA     X'A0'
     1883   01 006FC    00000000 A            DATA     0
     1884   01 006FD    00000000 A            DATA     0
     1885   01 006FE    00000000 A            DATA     0
     1886   01 006FF    00000000 A            DATA     0
     1887   01 00700    00000000 A            DATA     0
     1888   01 00701    00000000 A            DATA     0
     1889   01 00702    00000050 A            DATA     X'50'             PSW2 IN
     1890   01 00703    000000A0 A            DATA     X'A0'             PSW2 OUT
     1891                            ** INSURE THAT (R.CC) IS FALSE WHEN R28-31 ARE ONES AND CC1-4 ARE ZEROES
     1892   01 00704    FFFFFFF8 A   BCR01    DATA     -8                BRANCH  R FIELD=F  CC=0
     1893   01 00705    68F004A2              BCR,15   MEMORY
     1894   01 00706    07300139              K        0,7,3,SETPSW
     1895   01 00707    073004A3              K        0,7,3,MEMORY+1
     1896   01 00708    00000000 A            DATA     0
     1897   01 00709    00000000 A            DATA     0
     1898   01 0070A    0F0004A6              XPSD,0   RETURN
     1899   01 0070B    0F0004A6              XPSD,0   RETURN
     1900                            ** INSURE THAT (R.CC) IS FALSE WHEN R28-31 ARE ZEROES AND CC1-4 ARE ONES
     1901   01 0070C    FFFFFFFA A   BCR02    DATA     -6                BRANCH  R FIELD=0  CC=F
     1902   01 0070D    6800000C A            BCR,0    12
     1903   01 0070E    F0000139              K        15,0,0,SETPSW
     1904   01 0070F    F000000D A            K        15,0,0,13
     1905   01 00710    0F0004A6              XPSD,0   RETURN
     1906   01 00711    0F0004A6              XPSD,0   RETURN
     1907                            * CHECK  (R.CC)= R28.CC1
     1908   01 00712    FFFFFFFC A   BCR03    DATA     -4                NBRANCH  R=CC= 8
     1909   01 00713    68800047              BCR,8    BRANCH
     1910   01 00714    80000139              K        8,0,0,SETPSW
     1911   01 00715    80000179              K        8,0,0,LOC+2
     1912                            * CHECK  (R.CC)= R29.CC2
     1913   01 00716    FFFFFFFC A   BCR04    DATA     -4                NBRANCH  R=CC= 4
     1914   01 00717    68400047              BCR,4    BRANCH
     1915   01 00718    40000139              K        4,0,0,SETPSW
     1916   01 00719    40000179              K        4,0,0,LOC+2
     1917                            * CHECK  (R.CC)= R30.CC3
     1918   01 0071A    FFFFFFFC A   BCR05    DATA     -4                NBRANCH  R=CC= 2
     1919   01 0071B    68200047              BCR,2    BRANCH
     1920   01 0071C    20000139              K        2,0,0,SETPSW
     1921   01 0071D    20000179              K        2,0,0,LOC+2
     1922                            * CHECK  (R.CC)= R31.CC4
     1923   01 0071E    FFFFFFFC A   BCR06    DATA     -4                NBRANCH  R=CC= 1
     1924   01 0071F    68100047              BCR,1    BRANCH
     1925   01 00720    10000139              K        1,0,0,SETPSW
     1926   01 00721    10000179              K        1,0,0,LOC+2
     1927                            ** CHECK THAT CC3 OR 4 IS NOT SHORTED TO CC1 OR 2 ALSO
     1928                            ** CHECK THAT R28 OR 29 IS NOT SHORTED TO R30 OR 31
     1929   01 00722    FFFFFFFC A   BCS01    DATA     -4                N BRANCH  R FIELD = C  CC= 3
     1930   01 00723    69C00047              BCS,12   BRANCH
     1931   01 00724    30000139              K        3,0,0,SETPSW
     1932   01 00725    30000179              K        3,0,0,LOC+2
     1933                            ** CHECK THAT CC2 OR 4 IS NOT SHORTED TO CC1 OR 3 ALSO
     1934                            ** CHECK THAT R28 OR 30 IS NOT SHORTED TO R29 OR 31
     1935   01 00726    FFFFFFFC A   BCS02    DATA     -4                NBRANCH  R FIELD = A  CC= 5
     1936   01 00727    69A00047              BCS,10   BRANCH
     1937   01 00728    50000139              K        5,0,0,SETPSW
     1938   01 00729    50000179              K        5,0,0,LOC+2
     1939                            ** CHECK THAT A BRANCH CONDITION WILL OCCUR
     1940   01 0072A    FFFFFFF8 A   BCS03    DATA     -8
     1941   01 0072B    698004A2              BCS,8    MEMORY
     1942   01 0072C    80000139              K        8,0,0,SETPSW
     1943   01 0072D    800004A3              K        8,0,0,MEMORY+1
     1944   01 0072E    00000000 A            DATA     0
     1945   01 0072F    00000000 A            DATA     0
     1946   01 00730    0F0004A6              XPSD,0   RETURN
     1947   01 00731    0F0004A6              XPSD,0   RETURN
     1948                            *
     1949                            *                                  PRI=PROPHGATE THRU ITH BIT POSITION
     1950                            *                                  GI = GENERATE FROM THE ITH BIT
     1951                            *                                  KI =CARRY INTO THE ITH BIT
     1952                            *                                  I = BIT POSITIONS 0 THRU 31
     1953                            *                                  J=0,4,8,12,16,20,24,28
     1954                            *                                  K=1,5,9,13,17,21,25,29
     1955                            *                                  L=2,6,10,14,18,22,26,30
     1956                            *                                  M=3,7,11,15,19,23,27,31(31 OPTIONAL)
     1957                            *
     1958   01 00732    FFFFFFFC A   AW01     DATA     -4                AW     KI=0,GI=0,RRI=0,AI=0,D1=0
     1959   01 00733    30C004A2              AW,12    MEMORY
     1960   01 00734    F7200139              K        15,7,2,SETPSW
     1961   01 00735    07200179              K        0,7,2,LOC+2
     1962   01 00736    FFFFFFF8 A   AW02     DATA     -8                AW *   KI=0,GI=0,PRI=1,AI=1,DI=0
     1963   01 00737    B0C0049C              AW,12    *IA
     1964   01 00738    E7200139              K        14,7,2,SETPSW
     1965   01 00739    17200179              K        1,7,2,LOC+2
     1966   01 0073A    FFFFFFFF A            DATA     -1
     1967   01 0073B    FFFFFFFF A            DATA     -1
     1968   01 0073C    00000000 A            DATA     0
     1969   01 0073D    00000000 A            DATA     0
     1970   01 0073E    FFFFFFF8 A   AW03     DATA     -8                AW     KI=0,GI=0,PRI=1,AI=0,DI=1
     1971   01 0073F    30C004A2              AW,12    MEMORY
     1972   01 00740    07200139              K        0,7,2,SETPSW
     1973   01 00741    17200179              K        1,7,2,LOC+2
     1974   01 00742    00000000 A            DATA     0
     1975   01 00743    FFFFFFFF A            DATA     -1
     1976   01 00744    FFFFFFFF A            DATA     -1
     1977   01 00745    FFFFFFFF A            DATA     -1
     1978                            ** AW04 TESTS:  K(EVEN BIT POSITION) = G(ODD BIT POSITION)
     1979                            **  EXAMPLE   K04= G05
     1980   01 00746    FFFFFFF8 A   AW04     DATA     -8                AW  X  KJ=1 GJ=0,PRI=0
     1981   01 00747    30C2AF4D S            AW,12    MEMORY-X'15555',1 KK=0,GK=1
     1982   01 00748    97200139              K        9,7,2,SETPSW      KL=1,GL=0
     1983   01 00749    57200179              K        5,7,2,LOC+2       KM=0,GM=1
     1984   01 0074A    55555555 A            DATA     X'55555555'
     1985   01 0074B    AAAAAAAA A            DATA     X'AAAAAAAA'
     1986   01 0074C    55555555 A            DATA     X'55555555'
     1987   01 0074D    55555555 A            DATA     X'55555555'
     1988                            ** AW05 TESTS THE FOLLOWING TERMS: G0003= G00, G0407= G04, G0811 = G08
     1989                            ** G12-15 = G12, G1619= G16, G2023= G20, G2427=G24, G2831=G28, K00=G003
     1990                            ** K03= G0407, K07= G0811, K11= G1215, K15=G1619, K19=G2023, K23=G2427
     1991                            ** K27= G2831,
     1992                            ** K01, 05, 09, 13, 17, 21, 25, 29, (EQUALS GEN TERM ON NEXT LINE)
     1993                            ** G02, 06, 10, 14, 18, 22, 26, 30
     1994   01 0074E    FFFFFFF8 A   AW05     DATA     -8                AW     KJ=0,GJ=1,PRI=0
     1995   01 0074F    30C004A2              AW,12    MEMORY            KK=1,GK=0
     1996   01 00750    172001F4              K        1,7,2,FXPOSW      KL=0,GL=1
     1997   01 00751    E7200179              K        14,7,2,LOC+2      KM=1,GM=0
     1998   01 00752    AAAAAAAA A            DATA     X'AAAAAAAA'
     1999   01 00753    55555554 A            DATA     X'55555554'
     2000   01 00754    AAAAAAAA A            DATA     X'AAAAAAAA'
     2001   01 00755    AAAAAAAA A            DATA     X'AAAAAAAA'
     2002                            ** AW06 TESTS: G2831= G31.PR28.PR29.PR30, K00= PR00-PR15.K15
     2003                            ** K03= PR04-PR15.K15, K07= PR08-PR15.K15, K11= PR1215.K15
     2004                            ** K15= PR16-27.G2831, K19= PR20-27.G2831, K23= PR2427.G2831
     2005                            ** K04=PR05.PR06.PR07.K07, K05= PR06.PR07.K07, K06= PR07.K07
     2006                            ** K08= PR09.PR10.PR11.K11, K09= PR10.PR11.K11, K10= PR11.K11
     2007                            ** K12= PR13,PR14.PR15.K15, K13= PR14.PR15.K15, K14= PR15.K15
     2008                            ** K18= PR19.K19
     2009                            ** K20= PR21.PR22.PR23.K23, K21= PR22.PR23.K23, K22= PR23.K23
     2010                            ** K24= PR25.PR26.PR27.K27, K25= PR26.PR27.K27, K26= PR27.K27
     2011                            ** K28= PR29.PR30.G31, K29= PR30.G31
     2012   01 00756    FFFFFFF8 A   AW06     DATA     -8                AW     KI=1,GI=0,PRI=1(EXCEPT I=31)
     2013   01 00757    30C004A2              AW,12    MEMORY
     2014   01 00758    772001F4              K        7,7,2,FXPOSW
     2015   01 00759    87200179              K        8,7,2,LOC+2
     2016   01 0075A    FFFFFFFF A            DATA     -1
     2017   01 0075B    00000000 A            DATA     0
     2018   01 0075C    00000001 A            DATA     1
     2019   01 0075D    00000001 A            DATA     1
     2020   01 0075E    FFFFFFF8 A   AW07     DATA     -8                AW     KI=1,GI=0,PRI=1(EXCEPT I=31)
     2021   01 0075F    30C004A2              AW,12    MEMORY
     2022   01 00760    072001F4              K        0,7,2,FXPOSW
     2023   01 00761    87200179              K        8,7,2,LOC+2
     2024   01 00762    00000001 A            DATA     1
     2025   01 00763    00000000 A            DATA     0
     2026   01 00764    FFFFFFFF A            DATA     -1
     2027   01 00765    FFFFFFFF A            DATA     -1
     2028   01 00766    FFFFFFF8 A   AW08     DATA     -8                AW     KI=1,GI=1,PRI=0(K31=0)
     2029   01 00767    30C004A2              AW,12    MEMORY
     2030   01 00768    072001F4              K        0,7,2,FXPOSW
     2031   01 00769    97200179              K        9,7,2,LOC+2
     2032   01 0076A    FFFFFFFF A            DATA     -1
     2033   01 0076B    FFFFFFFE A            DATA     -2
     2034   01 0076C    FFFFFFFF A            DATA     -1
     2035   01 0076D    FFFFFFFF A            DATA     -1
     2036   01 0076E    FFFFFFF8 A   AW09     DATA     -8                AW     KI=0,GI=0,PRI=1
     2037   01 0076F    30C004A2              AW,12    MEMORY
     2038   01 00770    972001F4              K        9,7,2,FXPOSW
     2039   01 00771    17200179              K        1,7,2,LOC+2
     2040   01 00772    AAAAAAAA A            DATA     X'AAAAAAAA'
     2041   01 00773    FFFFFFFF A            DATA     -1
     2042   01 00774    55555555 A            DATA     X'55555555'
     2043   01 00775    55555555 A            DATA     X'55555555'
     2044   01 00776    FFFFFFF8 A   AW10     DATA     -8                AW     KJ=0,GJ=0,PRI=0
     2045   01 00777    30C004A2              AW,12    MEMORY            KK=1,GK=0
     2046   01 00778    072001F4              K        0,7,2,FXPOSW      KL=0,GL=1,
     2047   01 00779    27200179              K        2,7,2,LOC+2       KM=0,GM=0,
     2048   01 0077A    22222222 A            DATA     X'22222222'
     2049   01 0077B    44444444 A            DATA     X'44444444'
     2050   01 0077C    22222222 A            DATA     X'22222222'
     2051   01 0077D    22222222 A            DATA     X'22222222'
     2052   01 0077E    FFFFFFF8 A   AW11     DATA     -8                AW     KI=0,GJ=1,PRJ=0
     2053   01 0077F    30C004A2              AW,12    MEMORY            KK=1,GK=0,PRK=0
     2054   01 00780    F72001F4              K        15,7,2,FXPOSW     KL=1,GL=0,PRL=1
     2055   01 00781    E7200179              K        14,7,2,LOC+2      KM=1,GM=0,PRM=1
     2056   01 00782    BBBBBBBB A            DATA     X'BBBBBBBB'
     2057   01 00783    44444443 A            DATA     X'44444443'
     2058   01 00784    88888888 A            DATA     X'88888888'
     2059   01 00785    88888888 A            DATA     X'88888888'
     2060   01 00786    FFFFFFF8 A   AW12     DATA     -8                AW     KI=0,GJ=1,PRK=0
     2061   01 00787    30C004A2              AW,12    MEMORY            KK=0,GK=0,PRK=1
     2062   01 00788    072001F4              K        0,7,2,FXPOSW      KL=1,GL=0,PRK=0
     2063   01 00789    E7200179              K        14,7,2,LOC+2      KM=1,GM=0,PRK=1
     2064   01 0078A    DDDDDDDD A            DATA     X'DDDDDDDD'
     2065   01 0078B    66666665 A            DATA     X'66666665'
     2066   01 0078C    88888888 A            DATA     X'88888888'
     2067   01 0078D    88888888 A            DATA     X'88888888'
     2068   01 0078E    FFFFFFF8 A   AW13     DATA     -8                AW     KJ=0,GJ=1,PRJ=0
     2069   01 0078F    30C004A2              AW,12    MEMORY            KK=0,GK=0,PRK=1
     2070   01 00790    F72001F4              K        15,7,2,FXPOSW     KL=0,GL=0,PRL=1
     2071   01 00791    E7200179              K        14,7,2,LOC+2      KM=1,GM=0,PRM=0
     2072   01 00792    CCCCCCCC A            DATA     X'CCCCCCCC'
     2073   01 00793    77777776 A            DATA     X'77777776'
     2074   01 00794    AAAAAAAA A            DATA     X'AAAAAAAA'
     2075   01 00795    AAAAAAAA A            DATA     X'AAAAAAAA'
     2076   01 00796    FFFFFFF8 A   AW14     DATA     -8                AW     KI=0,GI=0,PRJ=0
     2077   01 00797    30C004A2              AW,12    MEMORY            PRK=1
     2078   01 00798    772001F4              K        7,7,2,FXPOSW      PRK=1
     2079   01 00799    27200179              K        2,7,2,LOC+2       PRK=1
     2080   01 0079A    22222222 A            DATA     X'22222222'
     2081   01 0079B    77777777 A            DATA     X'77777777'
     2082   01 0079C    55555555 A            DATA     X'55555555'
     2083   01 0079D    55555555 A            DATA     X'55555555'
     2084   01 0079E    FFFFFFF8 A   AW15     DATA     -8                AW     KJ=0,GJ=0,PRJ=0
     2085   01 0079F    30C004A2              AW,12    MEMORY            KK=1,GK=0,PRK=0
     2086   01 007A0    772001F4              K        7,7,2,FXPOSW      KL=1,GL=0,PRL=1
     2087   01 007A1    27200179              K        2,7,2,LOC+2       KM=0,GM=1,PRM=0
     2088   01 007A2    33333333 A            DATA     X'33333333'
     2089   01 007A3    44444444 A            DATA     X'44444444'
     2090   01 007A4    11111111 A            DATA     X'11111111'
     2091   01 007A5    11111111 A            DATA     X'11111111'
     2092   01 007A6    FFFFFFF8 A   AW16     DATA     -8                AW     KJ=0,GJ=0,PRJ=0
     2093   01 007A7    30C004A2              AW,12    MEMORY            KK=0,GK=0,PRK=1
     2094   01 007A8    072001F4              K        0,7,2,FXPOSW      KL=1,GL=0,PRL=0
     2095   01 007A9    27200179              K        2,7,2,LOC+2       KM=0,GM=1,PRM=0
     2096   01 007AA    11111111 A            DATA     X'11111111'
     2097   01 007AB    66666666 A            DATA     X'66666666'
     2098   01 007AC    55555555 A            DATA     X'55555555'
     2099   01 007AD    55555555 A            DATA     X'55555555'
     2100   01 007AE    FFFFFFF8 A   AW17     DATA     -8                AW     KI=1,GJ=1,PRJ=0 (K31=0)
     2101   01 007AF    30C004A2              AW,12    MEMORY            GK=0 PRK=1
     2102   01 007B0    772001F4              K        7,7,2,FXPOSW      GL=0,PRL=1
     2103   01 007B1    97200179              K        9,7,2,LOC+2       GM=0,PRM=1
     2104   01 007B2    DDDDDDDD A            DATA     X'DDDDDDDD'
     2105   01 007B3    88888887 A            DATA     X'88888887'
     2106   01 007B4    AAAAAAAA A            DATA     X'AAAAAAAA'
     2107   01 007B5    AAAAAAAA A            DATA     X'AAAAAAAA'
     2108   01 007B6    FFFFFFF8 A   AW18     DATA     -8                AW     KJ=1,GJ=0,PRJ=0
     2109   01 007B7    30C004A2              AW,12    MEMORY            KK=1,GK=0,PRK=1
     2110   01 007B8    F72001F4              K        15,7,2,FXPOSW     KL=1,GL=0,PRL=1
     2111   01 007B9    57200179              K        5,7,2,LOC+2       KM=0,GM=1,PRM=1
     2112   01 007BA    55555555 A            DATA     X'55555555'
     2113   01 007BB    88888888 A            DATA     X'88888888'
     2114   01 007BC    33333333 A            DATA     X'33333333'
     2115   01 007BD    33333333 A            DATA     X'33333333'
     2116   01 007BE    FFFFFFF8 A   AW19     DATA     -8                AW     KJ=1,GJ=0,PRJ=0
     2117   01 007BF    30C004A2              AW,12    MEMORY            KK=1,GK=0,PK=01
     2118   01 007C0    072001F4              K        0,7,2,FXPOSW      KL=0,GL=1,PL=00
     2119   01 007C1    57200179              K        5,7,2,LOC+2       KM=0,GM=0,PM=00
     2120   01 007C2    66666666 A            DATA     X'66666666'
     2121   01 007C3    88888888 A            DATA     X'88888888'
     2122   01 007C4    22222222 A            DATA     X'22222222'
     2123   01 007C5    22222222 A            DATA     X'22222222'
     2124   01 007C6    FFFFFFF8 A   AW20     DATA     -8                AW     KI=1,GJ=0,PRI=0
     2125   01 007C7    30C004A2              AW,12    MEMORY            KK=0,GK=1
     2126   01 007C8    272001F4              K        2,7,2,FXPOSW      KL=0,GL=0
     2127   01 007C9    57200179              K        5,7,2,LOC+2       KM=0,GM=0
     2128   01 007CA    44444444 A            DATA     X'44444444'
     2129   01 007CB    88888888 A            DATA     X'88888888'
     2130   01 007CC    44444444 A            DATA     X'44444444'
     2131   01 007CD    44444444 A            DATA     X'44444444'
     2132   01 007CE    FFFFFFF8 A   AW21     DATA     -8                AW     KK=1,GM=1,PR5=1
     2133   01 007CF    30C004A2              AW,12    MEMORY            KL=1     PRL=1
     2134   01 007D0    072001F4              K        0,7,2,FXPOSW
     2135   01 007D1    17200179              K        1,7,2,LOC+2
     2136   01 007D2    BBBBBBBB A            DATA     X'BBBBBBBB'
     2137   01 007D3    CCCCCCCC A            DATA     X'CCCCCCCC'
     2138   01 007D4    11111111 A            DATA     X'11111111'
     2139   01 007D5    11111111 A            DATA     X'11111111'
     2140   01 007D6    FFFFFFF8 A   AW22     DATA     -8                AW     KL=1,GM=1,PRJ=1
     2141   01 007D7    30C004A2              AW,12    MEMORY            PRK=1
     2142   01 007D8    072001F4              K        0,7,2,FXPOSW
     2143   01 007D9    17200179              K        1,7,2,LOC+2
     2144   01 007DA    DDDDDDDD A            DATA     X'DDDDDDDD'
     2145   01 007DB    EEEEEEEE A            DATA     X'EEEEEEEE'
     2146   01 007DC    11111111 A            DATA     X'11111111'
     2147   01 007DD    11111111 A            DATA     X'11111111'
     2148   01 007DE    FFFFFFF8 A   AW23     DATA     -8                AW     KI=0,GI=0,PRJ=1
     2149   01 007DF    30C004A2              AW,12    MEMORY            PRK=1
     2150   01 007E0    072001F4              K        0,7,2,FXPOSW      PRL=1
     2151   01 007E1    17200179              K        1,7,2,LOC+2
     2152   01 007E2    88888888 A            DATA     X'88888888'
     2153   01 007E3    EEEEEEEE A            DATA     X'EEEEEEEE'
     2154   01 007E4    66666666 A            DATA     X'66666666'
     2155   01 007E5    66666666 A            DATA     X'66666666'
     2156   01 007E6    FFFFFFF8 A   AW24     DATA     -8                AW     KK=1,GL=1,PRJ=1
     2157   01 007E7    30C004A2              AW,12    MEMORY
     2158   01 007E8    072001F4              K        0,7,2,FXPOSW
     2159   01 007E9    17200179              K        1,7,2,LOC+2
     2160   01 007EA    AAAAAAAA A            DATA     X'AAAAAAAA'
     2161   01 007EB    CCCCCCCC A            DATA     X'CCCCCCCC'
     2162   01 007EC    22222222 A            DATA     X'22222222'
     2163   01 007ED    22222222 A            DATA     X'22222222'
     2164   01 007EE    FFFFFFF8 A   AW25     DATA     -8                AW     KI=0,GI=0,PRJ=1
     2165   01 007EF    30C004A2              AW,12    MEMORY            PRK=1
     2166   01 007F0    072001F4              K        0,7,2,FXPOSW
     2167   01 007F1    17200179              K        1,7,2,LOC+2
     2168   01 007F2    88888888 A            DATA     X'88888888'
     2169   01 007F3    CCCCCCCC A            DATA     X'CCCCCCCC'
     2170   01 007F4    44444444 A            DATA     X'44444444'
     2171   01 007F5    44444444 A            DATA     X'44444444'
     2172                            ** AW26 TESTS:  G1215= G14.PR12.PR13, G2831= G30.PR28.PR29
     2173                            ** K00= PR00-11.G1215, K03=PR04-11.G1215, K07= PR0811.G1215
     2174                            ** K0=  PR01.PR02.PR03.K03, K01= PR02.PR03.K03, K02= PR03.K03
     2175                            ** K12= PR13.G14, K16= PR17.PR18.PR19.K19, K17= PR18.PR19.K19
     2176                            ** K28= PR29.G30
     2177   01 007F6    FFFFFFF8 A   AW26     DATA     -8                AW     KI=1(EXCEPT K14,K30,K31)
     2178   01 007F7    30C004A2              AW,12    MEMORY            TEST ALL CARRY(K) TERMS GATED
     2179   01 007F8    072001F4              K        0,7,2,FXPOSW      BY G14 AND G30.
     2180   01 007F9    A7200179              K        10,7,2,LOC+2
     2181   01 007FA    FFFEFFFE A            DATA     X'FFFEFFFE'
     2182   01 007FB    00010000 A            DATA     X'10000'
     2183   01 007FC    00020002 A            DATA     X'20002'
     2184   01 007FD    00020002 A            DATA     X'20002'
     2185                            ** AW27 TESTS:  G1215= G13.PR12, G2831= G29.PR28
     2186   01 007FE    FFFFFFF8 A   AW27     DATA     -8                AW     KI=1(EXCEPT K13,K29-K31)
     2187   01 007FF    30C004A2              AW,12    MEMORY            TEST ALL G13,G29 TERMS
     2188   01 00800    F72001F4              K        15,7,2,FXPOSW
     2189   01 00801    A7200179              K        10,7,2,LOC+2
     2190   01 00802    FFFDFFFC A            DATA     X'FFFDFFFC'
     2191   01 00803    00020000 A            DATA     X'20000'
     2192   01 00804    00040004 A            DATA     X'40004'
     2193   01 00805    00040004 A            DATA     X'40004'
     2194   01 00806    FFFFFFF8 A   AW28     DATA     -8                AW     KI=1(EXCEPT K12,K28-K31)
     2195   01 00807    30C004A2              AW,12    MEMORY            TEST G12,G28 TERMS
     2196   01 00808    F72001F4              K        15,7,2,FXPOSW
     2197   01 00809    A7200179              K        10,7,2,LOC+2
     2198   01 0080A    FFFBFFF8 A            DATA     X'FFFBFFF8'
     2199   01 0080B    00040000 A            DATA     X'40000'
     2200   01 0080C    00080008 A            DATA     X'80008'
     2201   01 0080D    00080008 A            DATA     X'80008'
     2202                            ** AW29 TESTS: G0811= G11.PR08.PR09.PR10, G2427= G27.PR24.PR25.PR26
     2203                            ** K00=  PR00-PR07.G0811, K03= PR0407.G0811, K15= PR16-23.G2427
     2204                            ** K19=  PR2023.G2427, K08= PR09.PR10.G11, K09= PR10.G11
     2205                            ** K24=  PR25.PR26.G27, K25= PR26.G27
     2206   01 0080E    FFFFFFF8 A   AW29     DATA     -8                AW     29=1,(EXCEPT K11,K27-K31
     2207   01 0080F    30C004A2              AW,12    MEMORY            TEST G11,G27 TERMS
     2208   01 00810    F72001F4              K        15,7,2,FXPOSW
     2209   01 00811    A7200179              K        10,7,2,LOC+2
     2210   01 00812    FFF7FFF0 A            DATA     X'FFF7FFF0'
     2211   01 00813    00080000 A            DATA     X'80000'
     2212   01 00814    00100010 A            DATA     X'100010'
     2213   01 00815    00100010 A            DATA     X'100010'
     2214                            ** AW30 TESTS:  G0811= G10.PR08.PR09, G2427= G24.PR24.PR25, K24=PR25.G26
     2215   01 00816    FFFFFFF8 A   AW30     DATA     -8                AW     KI=1(EXCEPT K10,K26-K31)
     2216   01 00817    30C004A2              AW,12    MEMORY            TEST G10,G26
     2217   01 00818    F72001F4              K        15,7,2,FXPOSW
     2218   01 00819    A7200179              K        10,7,2,LOC+2
     2219   01 0081A    FFEFFFE0 A            DATA     X'FFEFFFE0'
     2220   01 0081B    00100000 A            DATA     X'100000'
     2221   01 0081C    00200020 A            DATA     X'200020'
     2222   01 0081D    00200020 A            DATA     X'200020'
     2223                            ** AW31 TESTS:  G0811= G09.PR08, G2427= G25.PR24
     2224   01 0081E    FFFFFFF8 A   AW31     DATA     -8                AW     KI=1(EXCEPT K9,K25-K31)
     2225   01 0081F    30C004A2              AW,12    MEMORY            TEST G9,G25
     2226   01 00820    072001F4              K        0,7,2,FXPOSW
     2227   01 00821    A7200179              K        10,7,2,LOC+2
     2228   01 00822    FFDFFFC0 A            DATA     X'FFDFFFC0'
     2229   01 00823    00200000 A            DATA     X'200000'
     2230   01 00824    00400040 A            DATA     X'400040'
     2231   01 00825    00400040 A            DATA     X'400040'
     2232   01 00826    FFFFFFF8 A   AW32     DATA     -8                AW     KI=1(EXCEPT K8,K24-K31)
     2233   01 00827    30C004A2              AW,12    MEMORY            TEST G8,G24
     2234   01 00828    F72001F4              K        15,7,2,FXPOSW
     2235   01 00829    A7200179              K        10,7,2,LOC+2
     2236   01 0082A    FFBFFF80 A            DATA     X'FFBFFF80'
     2237   01 0082B    00400000 A            DATA     X'400000'
     2238   01 0082C    00800080 A            DATA     X'800080'
     2239   01 0082D    00800080 A            DATA     X'800080'
     2240                            ** AW33 TESTS:  G0407= G07.PR04.PR05.PR06, G2023= G23.PR20.PR21.PR22
     2241                            ** K00= PR0003.G0407, K15= PR1619.G2023, K4= PR05.PR06.G07, K5=PR06.G07
     2242                            ** K20= PR21.PR22.G23, K21= PR22.G23
     2243   01 0082E    FFFFFFF8 A   AW33     DATA     -8                AW     KI=1(EXCEPT K7,K23-K31)
     2244   01 0082F    30C004A2              AW,12    MEMORY            TEST G7,G23
     2245   01 00830    672001F4              K        6,7,2,FXPOSW
     2246   01 00831    A7200179              K        10,7,2,LOC+2
     2247   01 00832    FF7FFF00 A            DATA     X'FF7FFF00'
     2248   01 00833    00800000 A            DATA     X'800000'
     2249   01 00834    01000100 A            DATA     X'1000100'
     2250   01 00835    01000100 A            DATA     X'1000100'
     2251                            ** AW34 TESTS:  G0407= G06.PR04.PR05, G2023= G22.PR20.PR21, K4=PR05.G06
     2252                            ** K20= G22.PR21
     2253   01 00836    FFFFFFF8 A   AW34     DATA     -8                AW *   KI=1(EXCEPT K6,K22-K31)
     2254   01 00837    B0C0049C              AW,12    *IA               TEST G6,G22
     2255   01 00838    572001F4              K        5,7,2,FXPOSW
     2256   01 00839    A7200179              K        10,7,2,LOC+2
     2257   01 0083A    FEFFFE00 A            DATA     X'FEFFFE00'
     2258   01 0083B    01000000 A            DATA     X'1000000'
     2259   01 0083C    02000200 A            DATA     X'2000200'
     2260   01 0083D    02000200 A            DATA     X'2000200'
     2261                            ** AW35 TESTS:  G0407= G05.PR04, G2023= PR20.G21
     2262   01 0083E    FFFFFFF8 A   AW35     DATA     -8                AW     KI=1(EXCEPT K5,K21-K31)
     2263   01 0083F    30C004A2              AW,12    MEMORY            TEST G5,G21
     2264   01 00840    472001F4              K        4,7,2,FXPOSW
     2265   01 00841    A7200179              K        10,7,2,LOC+2
     2266   01 00842    FDFFFC00 A            DATA     X'FDFFFC00'
     2267   01 00843    02000000 A            DATA     X'2000000'
     2268   01 00844    04000400 A            DATA     X'4000400'
     2269   01 00845    04000400 A            DATA     X'4000400'
     2270   01 00846    FFFFFFF8 A   AW36     DATA     -8                AW     KI=1(EXCEPT K4,K20-K31)
     2271   01 00847    30C004A2              AW,12    MEMORY            TEST G4,G20
     2272   01 00848    072001F4              K        0,7,2,FXPOSW
     2273   01 00849    A7200179              K        10,7,2,LOC+2
     2274   01 0084A    FBFFF800 A            DATA     X'FBFFF800'
     2275   01 0084B    04000000 A            DATA     X'4000000'
     2276   01 0084C    08000800 A            DATA     X'8000800'
     2277   01 0084D    08000800 A            DATA     X'8000800'
     2278                            ** AW37 TESTS:  G1619= G19.PR16.PR17.PR18, K16= PR17.PR18.G19
     2279                            ** K17= PR18.G19
     2280   01 0084E    FFFFFFF8 A   AW37     DATA     -8                AW     K15,K16,K17,K18=1
     2281   01 0084F    30C004A2              AW,12    MEMORY            TEST G19
     2282   01 00850    B72001F4              K        11,7,2,FXPOSW
     2283   01 00851    27200179              K        2,7,2,LOC+2
     2284   01 00852    0000F000 A            DATA     X'F000'
     2285   01 00853    00010000 A            DATA     X'10000'
     2286   01 00854    00001000 A            DATA     X'1000'
     2287   01 00855    00001000 A            DATA     X'1000'
     2288                            ** AW38 TESTS: G1619= G18.PR16.PR17, K16= PR17.G18
     2289   01 00856    FFFFFFF8 A   AW38     DATA     -8                AW     K15,K16,K17=1
     2290   01 00857    30C004A2              AW,12    MEMORY            TEST G18
     2291   01 00858    F72001F4              K        15,7,2,FXPOSW
     2292   01 00859    27200179              K        2,7,2,LOC+2
     2293   01 0085A    0000E000 A            DATA     X'E000'
     2294   01 0085B    00010000 A            DATA     X'10000'
     2295   01 0085C    00002000 A            DATA     X'2000'
     2296   01 0085D    00002000 A            DATA     X'2000'
     2297                            ** AW39 TESTS: G1619= PR16.G17
     2298   01 0085E    FFFFFFF8 A   AW39     DATA     -8                AW     K15,K16=1
     2299   01 0085F    30C004A2              AW,12    MEMORY            TEST G17
     2300   01 00860    072001F4              K        0,7,2,FXPOSW
     2301   01 00861    27200179              K        2,7,2,LOC+2
     2302   01 00862    0000C000 A            DATA     X'C000'
     2303   01 00863    00010000 A            DATA     X'10000'
     2304   01 00864    00004000 A            DATA     X'4000'
     2305   01 00865    00004000 A            DATA     X'4000'
     2306                            ** AW40 TESTS: G1215= G15.PR12.PR13.PR14, K12= G15.PR13.PR14
     2307                            ** K13= G15.PR14
     2308   01 00866    FFFFFFF8 A   AW40     DATA     -8                AW     TEST G15
     2309   01 00867    30C004A2              AW,12    MEMORY
     2310   01 00868    072001F4              K        0,7,2,FXPOSW
     2311   01 00869    27200179              K        2,7,2,LOC+2
     2312   01 0086A    0FFF0000 A            DATA     X'FFF0000'
     2313   01 0086B    10000000 A            DATA     X'10000000'
     2314   01 0086C    00010000 A            DATA     X'10000'
     2315   01 0086D    00010000 A            DATA     X'10000'
     2316   01 0086E    FFFFFFF8 A   AW41     DATA     -8                AW   TEST OVERFLOW TRAP - TO +
     2317   01 0086F    30C004A2              AW,12    MEMORY
     2318   01 00870    073001F4              K        0,7,3,FXPOSW
     2319   01 00871    E7300084              K        14,7,3,FPORET+1
     2320   01 00872    89ABEF17 A            DATA     X'89ABEF17'
     2321   01 00873    70FF0579 A            DATA     X'70FF0579'
     2322   01 00874    E7531662 A            DATA     X'E7531662'
     2323   01 00875    E7531662 A            DATA     X'E7531662'
     2324   01 00876    FFFFFFF8 A   AW42     DATA     -8                AW   TEST OVERFLOW TRAP + TO -
     2325   01 00877    30C004A2              AW,12    MEMORY
     2326   01 00878    073001FE              K        0,7,3,FXPOPSDW    CHECK RETURNED PSDW
     2327   01 00879    57300177              K        5,7,3,LOC
     2328   01 0087A    61754221 A            DATA     X'61754221'
     2329   01 0087B    80000000 A            DATA     X'80000000'
     2330   01 0087C    1E8ABDDF A            DATA     X'1E8ABDDF'
     2331   01 0087D    1E8ABDDF A            DATA     X'1E8ABDDF'
     2332                            ** TEST G00-03=G03.PR00.PR01.PR02 ,K0=PR01.PR02.G3, K1=PR02.G03
     2333   01 0087E    FFFFFFF4 A   AW43     DATA     -12
     2334   01 0087F    30C004A2              AW,12    MEMORY
     2335   01 00880    77300139              K        7,7,3,SETPSW
     2336   01 00881    87300179              K        8,7,3,LOC+2
     2337   01 00882    F0000000 A            DATA     X'F0000000'
     2338   01 00883    00000000 A            DATA     0
     2339   01 00884    10000000 A            DATA     X'10000000'
     2340   01 00885    10000000 A            DATA     X'10000000'
     2341   01 00886    FFFFFFFF A            DATA     -1,-1,100,100
            01 00887    FFFFFFFF A
            01 00888    00000064 A
            01 00889    00000064 A
     2342                            ** NO OVERFLOW (-)+(+) TO (+)
     2343                            ** TEST G0003= G02.PR00.PR01, K0=PR01.G02
     2344   01 0088A    FFFFFFF4 A   AW44     DATA     -12
     2345   01 0088B    30C004A3              AW,12    MEMORY+1
     2346   01 0088C    07300139              K        0,7,3,SETPSW
     2347   01 0088D    87300179              K        8,7,3,LOC+2
     2348   01 0088E    E0000000 A            DATA     X'E0000000'
     2349   01 0088F    00000000 A            DATA     0
     2350   01 00890    00000000 A            DATA     0,0,8,8,X'20000000',X'20000000'
            01 00891    00000000 A
            01 00892    00000008 A
            01 00893    00000008 A
            01 00894    20000000 A
            01 00895    20000000 A
     2351                            ** TEST G0003= G01.PR00  NO OVERFLOW (+)+(-) TO (+)
     2352   01 00896    FFFFFFF4 A   AW45     DATA     -12
     2353   01 00897    30D004A3              AW,13    MEMORY+1
     2354   01 00898    07300139              K        0,7,3,SETPSW
     2355   01 00899    87300179              K        8,7,3,LOC+2
     2356   01 0089A    00000001 A            DATA     1,1,100,100,X'40000000',0,X'C0000000',X'C0000000'
            01 0089B    00000001 A
            01 0089C    00000064 A
            01 0089D    00000064 A
            01 0089E    40000000 A
            01 0089F    00000000 A
            01 008A0    C0000000 A
            01 008A1    C0000000 A
     2357                            ** TEST NO OVERFLOW  (-)+(+) TO (-)
     2358   01 008A2    FFFFFFF8 A   AW46     DATA     -8
     2359   01 008A3    30C004A2              AW,12    MEMORY
     2360   01 008A4    07300139              K        0,7,3,SETPSW
     2361   01 008A5    17300179              K        1,7,3,LOC+2
     2362   01 008A6    FFFFFF9C A            DATA     -100,-90,10,10
            01 008A7    FFFFFFA6 A
            01 008A8    0000000A A
            01 008A9    0000000A A
     2363                            ** TEST NO OVERFLOW (+)+(-) TO (-)
     2364   01 008AA    FFFFFFF8 A   AW47     DATA     -8
     2365   01 008AB    30C004A2              AW,12    MEMORY
     2366   01 008AC    07300139              K        0,7,3,SETPSW
     2367   01 008AD    17300179              K        1,7,3,LOC+2
     2368   01 008AE    0000000A A            DATA     10,-90,-100,-100
            01 008AF    FFFFFFA6 A
            01 008B0    FFFFFF9C A
            01 008B1    FFFFFF9C A
     2369   01 008B2    FFFFFFF8 A   SW01     DATA     -8                SW
     2370   01 008B3    38C004A2              SW,12    MEMORY
     2371   01 008B4    77300139              K        7,7,3,SETPSW
     2372   01 008B5    87300179              K        8,7,3,LOC+2
     2373   01 008B6    FFFFFFFF A            DATA     -1
     2374   01 008B7    00000000 A            DATA     0
     2375   01 008B8    FFFFFFFF A            DATA     -1
     2376   01 008B9    FFFFFFFF A            DATA     -1
     2377   01 008BA    FFFFFFFC A   SW02     DATA     -4                SW *
     2378   01 008BB    B8C0049C              SW,12    *IA
     2379   01 008BC    F73001F4              K        15,7,3,FXPOSW
     2380   01 008BD    87300179              K        8,7,3,LOC+2
     2381   01 008BE    FFFFFFF8 A   SW03     DATA     -8                SW
     2382   01 008BF    38C004A2              SW,12    MEMORY
     2383   01 008C0    273001F4              K        2,7,3,FXPOSW
     2384   01 008C1    57300084              K        5,7,3,FPORET+1
     2385   01 008C2    7FFFFFFF A            DATA     X'7FFFFFFF'
     2386   01 008C3    80000000 A            DATA     X'80000000'
     2387   01 008C4    FFFFFFFF A            DATA     -1
     2388   01 008C5    FFFFFFFF A            DATA     -1
     2389   01 008C6    FFFFFFFA A   SW04     DATA     -6                SW
     2390   01 008C7    38C0000C A            SW,12    12
     2391   01 008C8    773001F4              K        7,7,3,FXPOSW
     2392   01 008C9    87300179              K        8,7,3,LOC+2
     2393   01 008CA    80000000 A            DATA     X'80000000'
     2394   01 008CB    00000000 A            DATA     0
     2395   01 008CC    FFFFFFF8 A   SW05     DATA     -8                SW     PRI=1
     2396   01 008CD    38C004A2              SW,12    MEMORY            TEST KM=1
     2397   01 008CE    00000139              K        0,0,0,SETPSW
     2398   01 008CF    50000179              K        5,0,0,LOC+2
     2399   01 008D0    7FFFFFFF A            DATA     X'7FFFFFFF'
     2400   01 008D1    80000000 A            DATA     X'80000000'
     2401   01 008D2    FFFFFFFF A            DATA     -1
     2402   01 008D3    FFFFFFFF A            DATA     -1
     2403   01 008D4    FFFFFFF8 A   SW06     DATA     -8                SW     TEST K31 WITH RR16-PR31
     2404   01 008D5    38C004A2              SW,12    MEMORY
     2405   01 008D6    073001F4              K        0,7,3,FXPOSW
     2406   01 008D7    27300179              K        2,7,3,LOC+2
     2407   01 008D8    0000FFFF A            DATA     X'FFFF'
     2408   01 008D9    00010000 A            DATA     X'10000'
     2409   01 008DA    FFFFFFFF A            DATA     -1
     2410   01 008DB    FFFFFFFF A            DATA     -1
     2411                            ** S/PH10 = FUBIR.PH1.NBRPH9; BRPH9 = FUBIR.PH1.NS0; S0=1 THUS S/PH10 =1
     2412   01 008DC    FFFFFFF8 A   BIR01    DATA     -8                BRANCH
     2413   01 008DD    65C004A2              BIR,12   MEMORY
     2414   01 008DE    F7300139              K        15,7,3,SETPSW
     2415   01 008DF    F73004A3              K        15,7,3,MEMORY+1
     2416   01 008E0    FFFFFFFE A            DATA     -2
     2417   01 008E1    FFFFFFFF A            DATA     -1
     2418   01 008E2    0F0004A6              XPSD,0   RETURN
     2419   01 008E3    0F0004A6              XPSD,0   RETURN
     2420                            ** S0=0 THUS BRPH9 IS TRUE
     2421   01 008E4    FFFFFFFA A   BIR02    DATA     -6                NBRANCH
     2422   01 008E5    65C00047              BIR,12   BRANCH
     2423   01 008E6    00000139              K        0,0,0,SETPSW
     2424   01 008E7    00000179              K        0,0,0,LOC+2
     2425   01 008E8    FFFFFFFF A            DATA     -1
     2426   01 008E9    00000000 A            DATA     0
     2427                            ** S/PH10 IS TRUE FROM FUBDR.PH1.SGTZ
     2428   01 008EA    FFFFFFFA A   BDR01    DATA     -6                BRANCH
     2429   01 008EB    64C00047              BDR,12   BRANCH
     2430   01 008EC    00000139              K        0,0,0,SETPSW
     2431   01 008ED    00000048              K        0,0,0,BRANCH+1
     2432   01 008EE    00000002 A            DATA     2
     2433   01 008EF    00000001 A            DATA     1
     2434                            ** S/PH10 IS FALSE BECAUSE SGTZ IS FALSE
     2435   01 008F0    FFFFFFFA A   BDR02    DATA     -6                NBRANCH
     2436   01 008F1    64C00047              BDR,12   BRANCH
     2437   01 008F2    00000139              K        0,0,0,SETPSW
     2438   01 008F3    00000179              K        0,0,0,LOC+2
     2439   01 008F4    FFFFFFFF A            DATA     -1
     2440   01 008F5    FFFFFFFE A            DATA     -2
     2441   01 008F6    FFFFFFFA A   BAL01    DATA     -6                BAL C     BRANCH
     2442   01 008F7    6AC00047              BAL,12   BRANCH
     2443   01 008F8    F7300139              K        15,7,3,SETPSW
     2444   01 008F9    F7300048              K        15,7,3,BRANCH+1
     2445   01 008FA    08C00000 A            K        0,8,12,0
     2446   01 008FB    00000178              DATA     LOC+1
     2447   01 008FC    FFFFFFF6 A   BAL02    DATA     -10               BAL D  X  MEMORY
     2448   01 008FD    6AD325F5 S            BAL,13   MEMORY-X'DEAD',1
     2449   01 008FE    01300139              K        0,1,3,SETPSW
     2450   01 008FF    013004A3              K        0,1,3,MEMORY+1
     2451   01 00900    0000DEAD A            DATA     X'DEAD'
     2452   01 00901    0000DEAD A            DATA     X'DEAD'
     2453   01 00902    0F0004A6              XPSD,0   RETURN
     2454   01 00903    0F0004A6              XPSD,0   RETURN
     2455   01 00904    11112222 A            DATA     X'11112222'
     2456   01 00905    00000178              DATA     LOC+1
     2457   01 00906    FFFFFFF8 A   BAL03    DATA     -8                BAL D  *  MEMORY
     2458   01 00907    EAC0049C              BAL,12   *IA
     2459   01 00908    00000139              DATA     SETPSW
     2460   01 00909    000004A3              DATA     MEMORY+1
     2461   01 0090A    FFFFFFFF A            DATA     -1
     2462   01 0090B    00000178              DATA     LOC+1
     2463   01 0090C    0F0004A6              XPSD,0   RETURN
     2464   01 0090D    0F0004A6              XPSD,0   RETURN
     2465   01 0090E    FFFFFFFA A   BAL04    DATA     -6                BAL C  *X BRANCH
     2466   01 0090F    EAC204A2              BAL,12   *MEMORY,1
     2467   01 00910    F7300139              K        15,7,3,SETPSW
     2468   01 00911    F7300048              K        15,7,3,BRANCH+1
     2469   01 00912    00000047              DATA     BRANCH
     2470   01 00913    00000178              DATA     LOC+1
     2471                            ** BAL TO NONEXSISTENT MEMORY. C(R) WILL BE MODIFIED AND TRAP WILL OCCUR
     2472                            *  ON FIRST PASS  THE INST IS  B  END.  IF NON-EXSISTENT MEMORY IS
     2473                            *  PRESENT A  BAL,12  -----  WILL BE INSERTED.
     2474   01 00914    FFFFFFFA A   BAL05    DATA     -6
     2475   01 00915    6AC1FFFF A            BAL,12   X'1FFFF'
     2476   01 00916    B00001E8              K        11,0,0,SI9NAO
     2477   01 00917    F0000067              K        15,0,0,NEARET+1
     2478   01 00918    00000000 A            DATA     0
     2479   01 00919    00000178              DATA     LOC+1
     2480   01 0091A    FFFFFFF8 A   LH01     DATA     -8                LH    HW 0    SE=1 1-1,1-0
     2481   01 0091B    52C004A2              LH,12    MEMORY
     2482   01 0091C    70200139              K        7,0,2,SETPSW
     2483   01 0091D    50200179              K        5,0,2,LOC+2
     2484   01 0091E    FFFF0000 A            DATA     X'FFFF0000'
     2485   01 0091F    FFFFFFFF A            DATA     -1
     2486   01 00920    FFFF3210 A            DATA     X'FFFF3210'
     2487   01 00921    FFFF3210 A            DATA     X'FFFF3210'
     2488   01 00922    FFFFFFF8 A   LH02     DATA     -8                LH    HW 0    SE=1 1-0,0-1
     2489   01 00923    52C004A2              LH,12    MEMORY
     2490   01 00924    E0300139              K        14,0,3,SETPSW
     2491   01 00925    D0300179              K        13,0,3,LOC+2
     2492   01 00926    00007FFF A            DATA     X'7FFF'
     2493   01 00927    FFFF8000 A            DATA     X'FFFF8000'
     2494   01 00928    80000000 A            DATA     X'80000000'
     2495   01 00929    80000000 A            DATA     X'80000000'
     2496   01 0092A    FFFFFFF8 A   LH03     DATA     -8                LH *  HW 0    SE=0 0-1,1-1
     2497   01 0092B    D2C0049C              LH,12    *IA
     2498   01 0092C    F7300139              K        15,7,3,SETPSW
     2499   01 0092D    E7300179              K        14,7,3,LOC+2
     2500   01 0092E    FFFFFFFF A            DATA     -1
     2501   01 0092F    00007FFF A            DATA     X'7FFF'
     2502   01 00930    7FFF0000 A            DATA     X'7FFF0000'
     2503   01 00931    7FFF0000 A            DATA     X'7FFF0000'
     2504   01 00932    FFFFFFFA A   LH04     DATA     -6                LH    HW 0    SE=0 0-0,0-1
     2505   01 00933    52C0000C A            LH,12    12
     2506   01 00934    30300139              K        3,0,3,SETPSW
     2507   01 00935    00300179              K        0,0,3,LOC+2
     2508   01 00936    0000FFFF A            DATA     X'FFFF'
     2509   01 00937    00000000 A            DATA     0
     2510   01 00938    FFFFFFFA A   LH05     DATA     -6                LH  X HW 1    SE=0 0-1,0-0
     2511   01 00939    52CE000C A            LH,12    12,7
     2512   01 0093A    77300139              K        7,7,3,SETPSW
     2513   01 0093B    67300179              K        6,7,3,LOC+2
     2514   01 0093C    FFFE0001 A            DATA     X'FFFE0001'
     2515   01 0093D    00000001 A            DATA     1
     2516   01 0093E    FFFFFFF8 A   LH06     DATA     -8                LH  X HW 1    SE=0 0-0,1-1
     2517   01 0093F    52C304A3 S            LH,12    MEMORY-X'FFFF',1
     2518   01 00940    70300139              K        7,0,3,SETPSW
     2519   01 00941    60300179              K        6,0,3,LOC+2
     2520   01 00942    0001FFFF A            DATA     X'1FFFF'
     2521   01 00943    00007FFF A            DATA     X'7FFF'
     2522   01 00944    00007FFF A            DATA     X'7FFF'
     2523   01 00945    00007FFF A            DATA     X'7FFF'
     2524   01 00946    FFFFFFF4 A   LH07     DATA     -12               LH *X HW=1 SE=1 1-1,0-1
     2525   01 00947    D2D204A2              LH,13    *MEMORY,1
     2526   01 00948    F7300139              K        15,7,3,SETPSW
     2527   01 00949    D7300179              K        13,7,3,LOC+2
     2528   01 0094A    00000723 A            DATA     2*(MEMORY-CYCLE)+3
     2529   01 0094B    00000723 A            DATA     2*(MEMORY-CYCLE)+3
     2530   01 0094C    00000112              DATA     CYCLE
     2531   01 0094D    00000112              DATA     CYCLE
     2532   01 0094E    FFFFFFFF A            DATA     -1
     2533   01 0094F    FFFF8000 A            DATA     X'FFFF8000'
     2534   01 00950    00008000 A            DATA     X'8000'
     2535   01 00951    00008000 A            DATA     X'8000'
     2536   01 00952    FFFFFFF4 A   LH08     DATA     -12               LH *X HW=1 SE=1 1-0,1-0
     2537   01 00953    D2D204A2              LH,13    *MEMORY,1
     2538   01 00954    03300139              K        0,3,3,SETPSW
     2539   01 00955    13300179              K        1,3,3,LOC+2
     2540   01 00956    0000023B              DATA     HA(CLEAR)+3
     2541   01 00957    0000023B              DATA     HA(CLEAR)+3
     2542   01 00958    00000386 A            DATA     MEMORY-CLEAR
     2543   01 00959    00000386 A            DATA     MEMORY-CLEAR
     2544   01 0095A    00000000 A            DATA     0
     2545   01 0095B    FFFFFFFF A            DATA     -1
     2546   01 0095C    1234FFFF A            DATA     X'1234FFFF'
     2547   01 0095D    1234FFFF A            DATA     X'1234FFFF'
     2548   01 0095E    FFFFFFF8 A   LB01     DATA     -8                LB    B 0 0-0,1-0
     2549   01 0095F    72C004A2              LB,12    MEMORY
     2550   01 00960    F7200139              K        15,7,2,SETPSW
     2551   01 00961    E7200179              K        14,7,2,LOC+2
     2552   01 00962    00000000 A            DATA     0
     2553   01 00963    000000FF A            DATA     X'FF'
     2554   01 00964    FF000000 A            DATA     X'FF000000'
     2555   01 00965    FF000000 A            DATA     X'FF000000'
     2556   01 00966    FFFFFFF8 A   LB02     DATA     -8                LB    B 0 0-0,0-1
     2557   01 00967    72C004A2              LB,12    MEMORY
     2558   01 00968    F7300139              K        15,7,3,SETPSW
     2559   01 00969    C7300179              K        12,7,3,LOC+2
     2560   01 0096A    000000FF A            DATA     X'FF'
     2561   01 0096B    00000000 A            DATA     0
     2562   01 0096C    00FFFFFF A            DATA     X'FFFFFF'
     2563   01 0096D    00FFFFFF A            DATA     X'FFFFFF'
     2564   01 0096E    FFFFFFF8 A   LB03     DATA     -8                LB X  B 0  0-1,0-0
     2565   01 0096F    72C204C2              LB,12    MEMORY+X'20',1
     2566   01 00970    F7300139              K        15,7,3,SETPSW
     2567   01 00971    C7300179              K        12,7,3,LOC+2
     2568   01 00972    FFFFFF80 A            DATA     X'FFFFFF80'
     2569   01 00973    00000000 A            DATA     0
     2570   01 00974    00FFFFFF A            DATA     X'FFFFFF'
     2571   01 00975    00FFFFFF A            DATA     X'FFFFFF'
     2572   01 00976    FFFFFFF8 A   LB04     DATA     -8                LB *  BYTE 0-1,1-1
     2573   01 00977    F2C0049C              LB,12    *IA
     2574   01 00978    00200139              K        0,0,2,SETPSW
     2575   01 00979    20200179              K        2,0,2,LOC+2
     2576   01 0097A    FFFFFFFF A            DATA     -1
     2577   01 0097B    000000FF A            DATA     X'FF'
     2578   01 0097C    FF000000 A            DATA     X'FF000000'
     2579   01 0097D    FF000000 A            DATA     X'FF000000'
     2580   01 0097E    FFFFFFF8 A   LB05     DATA     -8                LB *  B 0 0-1,0-1,1-1
     2581   01 0097F    F2C0049C              LB,12    *IA
     2582   01 00980    37300139              K        3,7,3,SETPSW
     2583   01 00981    27300179              K        2,7,3,LOC+2
     2584   01 00982    FFFFFFFF A            DATA     -1
     2585   01 00983    000000A2 A            DATA     X'A2'
     2586   01 00984    A2FFFFFF A            DATA     X'A2FFFFFF'
     2587   01 00985    A2FFFFFF A            DATA     X'A2FFFFFF'
     2588   01 00986    FFFFFFF6 A   LB06     DATA     -10               LB  X B 2
     2589   01 00987    72D204AC              LB,13    PASS,1
     2590   01 00988    50300139              K        5,0,3,SETPSW
     2591   01 00989    60300179              K        6,0,3,LOC+2
     2592   01 0098A    FFFFFFDA A            DATA     4*(MEMORY-PASS)+2
     2593   01 0098B    FFFFFFDA A            DATA     4*(MEMORY-PASS)+2
     2594   01 0098C    FFFF89FF A            DATA     X'FFFF89FF'
     2595   01 0098D    FFFF89FF A            DATA     X'FFFF89FF'
     2596   01 0098E    FFFFFFFF A            DATA     -1
     2597   01 0098F    00000089 A            DATA     X'89'
     2598   01 00990    FFFFFFFA A   LB07     DATA     -6                LB  X B 1
     2599   01 00991    72C3800D A            LB,12    12+X'18001',1
     2600   01 00992    15200139              K        1,5,2,SETPSW
     2601   01 00993    25200179              K        2,5,2,LOC+2
     2602   01 00994    FF99FFFD A            DATA     X'FF99FFFD'
     2603   01 00995    00000099 A            DATA     X'99'
     2604   01 00996    FFFFFFF8 A   LB08     DATA     -8                LB  X B 3
     2605   01 00997    72C204A2              LB,12    MEMORY,1
     2606   01 00998    01300139              K        0,1,3,SETPSW
     2607   01 00999    21300179              K        2,1,3,LOC+2
     2608   01 0099A    00000003 A            DATA     3
     2609   01 0099B    000000FF A            DATA     X'FF'
     2610   01 0099C    FFFFFFFF A            DATA     -1
     2611   01 0099D    FFFFFFFF A            DATA     -1
     2612   01 0099E    FFFFFFF4 A   LB09     DATA     -12               LB  *,IX
     2613   01 0099F    F2CE04A2              LB,12    *MEMORY,7
     2614   01 009A0    10000139              K        1,0,0,SETPSW
     2615   01 009A1    20000179              K        2,0,0,LOC+2
     2616   01 009A2    FFFFFFFF A            DATA     -1,X'27',MEMORY+1,MEMORY+1,X'F027F2F3',X'F027F2F3'
            01 009A3    00000027 A
            01 009A4    000004A3
            01 009A5    000004A3
            01 009A6    F027F2F3 A
            01 009A7    F027F2F3 A
     2617   01 009A8    F027F2F3 A            DATA     X'F027F2F3',X'F027F2F3'
            01 009A9    F027F2F3 A
     2618   01 009AA    FFFFFFF6 A   LD01     DATA     -10               LD    RE  ME
     2619   01 009AB    12C004A2              LD,12    MEMORY
     2620   01 009AC    F7300139              K        15,7,3,SETPSW
     2621   01 009AD    C7300179              K        12,7,3,LOC+2
     2622   01 009AE    FFFFFFFF A            DATA     -1
     2623   01 009AF    00000000 A            DATA     0
     2624   01 009B0    00000000 A            DATA     0
     2625   01 009B1    00000000 A            DATA     0
     2626   01 009B2    FFFFFFFF A            DATA     -1
     2627   01 009B3    00000000 A            DATA     0
     2628   01 009B4    FFFFFFF4 A   LD02     DATA     -12               LD *  RE  ME
     2629   01 009B5    92C0049C              LD,12    *IA
     2630   01 009B6    77300139              K        7,7,3,SETPSW
     2631   01 009B7    57300179              K        5,7,3,LOC+2
     2632   01 009B8    00000000 A            DATA     0
     2633   01 009B9    FFFFFFFF A            DATA     -1
     2634   01 009BA    FFFFFFFF A            DATA     -1
     2635   01 009BB    FFFFFFFF A            DATA     -1
     2636   01 009BC    00000000 A            DATA     0
     2637   01 009BD    FFFFFFFF A            DATA     -1
     2638   01 009BE    FFFFFFFF A            DATA     -1
     2639   01 009BF    FFFFFFFF A            DATA     -1
     2640   01 009C0    FFFFFFF4 A   LD03     DATA     -12               LD  X RE  ME
     2641   01 009C1    12C20048              LD,12    BRANCH+1,1
     2642   01 009C2    07300139              K        0,7,3,SETPSW
     2643   01 009C3    27300179              K        2,7,3,LOC+2
     2644   01 009C4    0000022D A            DATA     (MEMORY-BRANCH-1)/2
     2645   01 009C5    00000000 A            DATA     0
     2646   01 009C6    00000000 A            DATA     0
     2647   01 009C7    00000000 A            DATA     0
     2648   01 009C8    ACEBEDAD A            DATA     X'ACEBEDAD'
     2649   01 009C9    BEADFADE A            DATA     X'BEADFADE'
     2650   01 009CA    BEADFADE A            DATA     X'BEADFADE'
     2651   01 009CB    BEADFADE A            DATA     X'BEADFADE'
     2652   01 009CC    FFFFFFF4 A   LD04     DATA     -12               LD *  RE  ME
     2653   01 009CD    92C0049C              LD,12    *IA
     2654   01 009CE    F7300139              K        15,7,3,SETPSW
     2655   01 009CF    D7300179              K        13,7,3,LOC+2
     2656   01 009D0    0000022D A            DATA     (MEMORY-BRANCH-1)/2
     2657   01 009D1    F234ABCD A            DATA     X'F234ABCD'
     2658   01 009D2    F234ABCD A            DATA     X'F234ABCD'
     2659   01 009D3    F234ABCD A            DATA     X'F234ABCD'
     2660   01 009D4    F2397572 A            DATA     X'F2397572'
     2661   01 009D5    1E2783F9 A            DATA     X'1E2783F9'
     2662   01 009D6    1E2783F9 A            DATA     X'1E2783F9'
     2663   01 009D7    1E2783F9 A            DATA     X'1E2783F9'
     2664   01 009D8    FFFFFFF4 A   LD05     DATA     -12               LD    RO  MO
     2665   01 009D9    12D004A3              LD,13    MEMORY+1
     2666   01 009DA    D7300139              K        13,7,3,SETPSW
     2667   01 009DB    E7300179              K        14,7,3,LOC+2
     2668   01 009DC    ABCDEF01 A            DATA     X'ABCDEF01'
     2669   01 009DD    ABCDEF01 A            DATA     X'ABCDEF01'
     2670   01 009DE    543210FE A            DATA     X'543210FE'
     2671   01 009DF    543210FE A            DATA     X'543210FE'
     2672   01 009E0    12345678 A            DATA     X'12345678'
     2673   01 009E1    543210FE A            DATA     X'543210FE'
     2674   01 009E2    EDCBA987 A            DATA     X'EDCBA987'
     2675   01 009E3    EDCBA987 A            DATA     X'EDCBA987'
     2676   01 009E4    FFFFFFF4 A   LD06     DATA     -12               LD  X RO  ME
     2677   01 009E5    12D2CCE4 S            LD,13    MEMORY-2*X'9BDF',1
     2678   01 009E6    27300139              K        2,7,3,SETPSW
     2679   01 009E7    17300179              K        1,7,3,LOC+2
     2680   01 009E8    13579BDF A            DATA     X'13579BDF'
     2681   01 009E9    13579BDF A            DATA     X'13579BDF'
     2682   01 009EA    ECA86420 A            DATA     X'ECA86420'
     2683   01 009EB    ECA86420 A            DATA     X'ECA86420'
     2684   01 009EC    2468ACE0 A            DATA     X'2468ACE0'
     2685   01 009ED    ECA86420 A            DATA     X'ECA86420'
     2686   01 009EE    DB97531F A            DATA     X'DB97531F'
     2687   01 009EF    DB97531F A            DATA     X'DB97531F'
     2688   01 009F0    FFFFFFF4 A   LD07     DATA     -12               LD *  RO  ME
     2689   01 009F1    92D0049C              LD,13    *IA
     2690   01 009F2    07300139              K        0,7,3,SETPSW
     2691   01 009F3    27300179              K        2,7,3,LOC+2
     2692   01 009F4    FFFFFFFD A            DATA     -3
     2693   01 009F5    FFFFFFFD A            DATA     -3
     2694   01 009F6    00000000 A            DATA     0
     2695   01 009F7    00000000 A            DATA     0
     2696   01 009F8    FFFFFFFF A            DATA     -1
     2697   01 009F9    00000000 A            DATA     0
     2698   01 009FA    00000001 A            DATA     1
     2699   01 009FB    00000001 A            DATA     1
     2700   01 009FC    FFFFFFF4 A   LD08     DATA     -12               LD        MO
     2701   01 009FD    12C004A3              LD,12    MEMORY+1
     2702   01 009FE    97300139              K        9,7,3,SETPSW
     2703   01 009FF    A7300179              K        10,7,3,LOC+2
     2704   01 00A00    EDCBA987 A            DATA     X'EDCBA987'
     2705   01 00A01    12345678 A            DATA     X'12345678'
     2706   01 00A02    12345678 A            DATA     X'12345678'
     2707   01 00A03    12345678 A            DATA     X'12345678'
     2708   01 00A04    6543210F A            DATA     X'6543210F'
     2709   01 00A05    9ABCDEF0 A            DATA     X'9ABCDEF0'
     2710   01 00A06    9ABCDEF0 A            DATA     X'9ABCDEF0'
     2711   01 00A07    9ABCDEF0 A            DATA     X'9ABCDEF0'
     2712   01 00A08    FFFFFFF4 A   LD09     DATA     -12               LD      RE   RE
     2713   01 00A09    12C00008 A            LD,12    8
     2714   01 00A0A    70000139              K        7,0,0,SETPSW
     2715   01 00A0B    60000179              K        6,0,0,LOC+2
     2716   01 00A0C    12345678 A            DATA     X'12345678'
     2717   01 00A0D    0FEDCBA9 A            DATA     X'0FEDCBA9'
     2718   01 00A0E    0FEDCBA9 A            DATA     X'0FEDCBA9'
     2719   01 00A0F    0FEDCBA9 A            DATA     X'0FEDCBA9'
     2720   01 00A10    9ABCDEF0 A            DATA     X'9ABCDEF0'
     2721   01 00A11    87654321 A            DATA     X'87654321'
     2722   01 00A12    87654321 A            DATA     X'87654321'
     2723   01 00A13    87654321 A            DATA     X'87654321'
     2724   01 00A14    FFFFFFF4 A   LD10     DATA     -12               LD    RO  RE
     2725   01 00A15    12D00008 A            LD,13    8
     2726   01 00A16    10000139              K        1,0,0,SETPSW
     2727   01 00A17    20000179              K        2,0,0,LOC+2
     2728   01 00A18    13579BDF A            DATA     X'13579BDF'
     2729   01 00A19    13579BDF A            DATA     X'13579BDF'
     2730   01 00A1A    02468ACE A            DATA     X'02468ACE'
     2731   01 00A1B    02468ACE A            DATA     X'02468ACE'
     2732   01 00A1C    ECA86420 A            DATA     X'ECA86420'
     2733   01 00A1D    02468ACE A            DATA     X'02468ACE'
     2734   01 00A1E    ECA86420 A            DATA     X'ECA86420'
     2735   01 00A1F    ECA86420 A            DATA     X'ECA86420'
     2736   01 00A20    FFFFFFF4 A   LD11     DATA     -12               LD    RE  RO
     2737   01 00A21    12C00009 A            LD,12    9
     2738   01 00A22    10000139              K        1,0,0,SETPSW
     2739   01 00A23    20000179              K        2,0,0,LOC+2
     2740   01 00A24    ABCDEF01 A            DATA     X'ABCDEF01'
     2741   01 00A25    12347956 A            DATA     X'12347956'
     2742   01 00A26    12347956 A            DATA     X'12347956'
     2743   01 00A27    12347956 A            DATA     X'12347956'
     2744   01 00A28    10345768 A            DATA     X'10345768'
     2745   01 00A29    ACDEFB29 A            DATA     X'ACDEFB29'
     2746   01 00A2A    ACDEFB29 A            DATA     X'ACDEFB29'
     2747   01 00A2B    ACDEFB29 A            DATA     X'ACDEFB29'
     2748   01 00A2C    FFFFFFF4 A   LD12     DATA     -12               LD    RO  RO
     2749   01 00A2D    12D00009 A            LD,13    9
     2750   01 00A2E    00000139              K        0,0,0,SETPSW
     2751   01 00A2F    20000179              K        2,0,0,LOC+2
     2752   01 00A30    11111111 A            DATA     X'11111111'
     2753   01 00A31    11111111 A            DATA     X'11111111'
     2754   01 00A32    5AB91233 A            DATA     X'5AB91233'
     2755   01 00A33    5AB91233 A            DATA     X'5AB91233'
     2756   01 00A34    33445566 A            DATA     X'33445566'
     2757   01 00A35    5AB91233 A            DATA     X'5AB91233'
     2758   01 00A36    FFFFFFFF A            DATA     -1
     2759   01 00A37    FFFFFFFF A            DATA     -1
     2760   01 00A38    FFFFFFF4 A   LD13     DATA     -12               LD *,IX
     2761   01 00A39    92CE04A2              LD,12    *MEMORY,7
     2762   01 00A3A    00000139              K        0,0,0,SETPSW
     2763   01 00A3B    20000179              K        2,0,0,LOC+2
     2764   01 00A3C    FFFFFFFF A            DATA     -1,MEMORY-1,MEMORY-1,MEMORY-1,-1,-16,-16,-16
            01 00A3D    000004A1
            01 00A3E    000004A1
            01 00A3F    000004A1
            01 00A40    FFFFFFFF A
            01 00A41    FFFFFFF0 A
            01 00A42    FFFFFFF0 A
            01 00A43    FFFFFFF0 A
     2765                            ** LW WITH INDEXING
     2766   01 00A44    FFFFFFF4 A   LWIX     DATA     -12
     2767   01 00A45    32CE000C A            LW,12    12,7
     2768   01 00A46    00000139              K        0,0,0,SETPSW
     2769   01 00A47    10000179              K        1,0,0,LOC+2
     2770   01 00A48    00000000 A            DATA     0,-1,1,1,-1,-1,MEMORY,MEMORY
            01 00A49    FFFFFFFF A
            01 00A4A    00000001 A
            01 00A4B    00000001 A
            01 00A4C    FFFFFFFF A
            01 00A4D    FFFFFFFF A
            01 00A4E    000004A2
            01 00A4F    000004A2
     2771                            ** LW WITH INDEXING AND IA
     2772   01 00A50    FFFFFFF4 A   LWIXIA   DATA     -12
     2773   01 00A51    B2D2049C              LW,13    *IA,1
     2774   01 00A52    00000139              K        0,0,0,SETPSW
     2775   01 00A53    20000179              K        2,0,0,LOC+2
     2776   01 00A54    00000001 A            DATA     1,1,0,0,-1,4,4,4
            01 00A55    00000001 A
            01 00A56    00000000 A
            01 00A57    00000000 A
            01 00A58    FFFFFFFF A
            01 00A59    00000004 A
            01 00A5A    00000004 A
            01 00A5B    00000004 A
     2777   01 00A5C    FFFFFFFA A   LI01     DATA     -6                LI      SE=1  1-0,1-0
     2778   01 00A5D    22C9FFFF A            LI,12    X'9FFFF'
     2779   01 00A5E    F7300139              K        15,7,3,SETPSW
     2780   01 00A5F    D7300179              K        13,7,3,LOC+2
     2781   01 00A60    00000000 A            DATA     0
     2782   01 00A61    FFF9FFFF A            DATA     X'FFF9FFFF'
     2783   01 00A62    FFFFFFFA A   LI02     DATA     -6                LI      SE=0  0-1,0-1
     2784   01 00A63    22C40001 A            LI,12    X'40001'
     2785   01 00A64    07300139              K        0,7,3,SETPSW
     2786   01 00A65    27300179              K        2,7,3,LOC+2
     2787   01 00A66    FFFFFFFF A            DATA     -1
     2788   01 00A67    00040001 A            DATA     X'40001'
     2789   01 00A68    FFFFFFFA A   LI03     DATA     -6                LI      SE=1  1-1,0-0
     2790   01 00A69    22C80000 A            LI,12    X'80000'
     2791   01 00A6A    F7300139              K        15,7,3,SETPSW
     2792   01 00A6B    D7300179              K        13,7,3,LOC+2
     2793   01 00A6C    FFF00000 A            DATA     X'FFF00000'
     2794   01 00A6D    FFF80000 A            DATA     X'FFF80000'
     2795   01 00A6E    FFFFFFFA A   LI04     DATA     -6                LI      SE=0  0-0 1-1
     2796   01 00A6F    22C7FFFF A            LI,12    X'7FFFF'
     2797   01 00A70    F7300139              K        15,7,3,SETPSW
     2798   01 00A71    E7300179              K        14,7,3,LOC+2
     2799   01 00A72    000FFFFF A            DATA     X'FFFFF'
     2800   01 00A73    0007FFFF A            DATA     X'7FFFF'
     2801   01 00A74    FFFFFFFA A   LI05     DATA     -6                LI *
     2802   01 00A75    A2C004A2              LI,12    *MEMORY
     2803   01 00A76    173001E8              K        1,7,3,SI9NAO
     2804   01 00A77    9730006B              K        9,7,3,NEIRET+1
     2805   01 00A78    FFFFFFFF A            DATA     -1
     2806   01 00A79    FFFFFFFF A            DATA     -1
     2807   01 00A7A    FFFFFFF6 A   LS01     DATA     -10
     2808   01 00A7B    4AC004A2              LS,12    MEMORY             PH1 : C(S)= EW.RU1  = 18181818
     2809   01 00A7C    F7300139              K        15,7,3,SETPSW
     2810   01 00A7D    D7300179              K        13,7,3,LOC+2       PH3 : C(S)= R.NRU1  = 81818181
     2811   01 00A7E    C3C3C3C3 A            DATA     X'C3C3C3C3'
     2812   01 00A7F    99999999 A            DATA     X'99999999'        PH4 : C(S)= PH1+PH3 = 99999999
     2813   01 00A80    3C3C3C3C A            DATA     X'3C3C3C3C'
     2814   01 00A81    3C3C3C3C A            DATA     X'3C3C3C3C'
     2815   01 00A82    5A5A5A5A A            DATA     X'5A5A5A5A'
     2816   01 00A83    5A5A5A5A A            DATA     X'5A5A5A5A'
     2817   01 00A84    FFFFFFF6 A   LS02     DATA     -10
     2818   01 00A85    4AC004A2              LS,12    MEMORY             PH1 : C(S)= EW.RU1  = 81818181
     2819   01 00A86    07300139              K        0,7,3,SETPSW
     2820   01 00A87    17300179              K        1,7,3,LOC+2        PH3 : C(S)= R.NRU1  = 18181818
     2821   01 00A88    3C3C3C3C A            DATA     X'3C3C3C3C'
     2822   01 00A89    99999999 A            DATA     X'99999999'        PH4 : C(S)= PH1+PH3 =99999999
     2823   01 00A8A    C3C3C3C3 A            DATA     X'C3C3C3C3'
     2824   01 00A8B    C3C3C3C3 A            DATA     X'C3C3C3C3'
     2825   01 00A8C    A5A5A5A5 A            DATA     X'A5A5A5A5'
     2826   01 00A8D    A5A5A5A5 A            DATA     X'A5A5A5A5'
     2827   01 00A8E    FFFFFFF6 A   LS03     DATA     -10
     2828   01 00A8F    4AC004A2              LS,12    MEMORY             PH1 : C(S)= EW.RU1  = 24242424
     2829   01 00A90    F7300139              K        15,7,3,SETPSW
     2830   01 00A91    E7300179              K        14,7,3,LOC+2       PH3 : C(S)= R.NRU1  = 42424242
     2831   01 00A92    5A5A5A5A A            DATA     X'5A5A5A5A'
     2832   01 00A93    66666666 A            DATA     X'66666666'        PH4 : C(S)= PH1+PH3 = 66666666
     2833   01 00A94    A5A5A5A5 A            DATA     X'A5A5A5A5'
     2834   01 00A95    A5A5A5A5 A            DATA     X'A5A5A5A5'
     2835   01 00A96    3C3C3C3C A            DATA     X'3C3C3C3C'
     2836   01 00A97    3C3C3C3C A            DATA     X'3C3C3C3C'
     2837   01 00A98    FFFFFFF6 A   LS04     DATA     -10
     2838   01 00A99    4AC004A2              LS,12    MEMORY             PH1 : C(S)= EW.RU1  = 42424242
     2839   01 00A9A    07300139              K        0,7,3,SETPSW
     2840   01 00A9B    27300179              K        2,7,3,LOC+2        PH3 : C(S)= R.NRU1  = 24242424
     2841   01 00A9C    A5A5A5A5 A            DATA     X'A5A5A5A5'
     2842   01 00A9D    66666666 A            DATA     X'66666666'        PH4 : C(S)= PH1+PH3 = 66666666
     2843   01 00A9E    5A5A5A5A A            DATA     X'5A5A5A5A'
     2844   01 00A9F    5A5A5A5A A            DATA     X'5A5A5A5A'
     2845   01 00AA0    C3C3C3C3 A            DATA     X'C3C3C3C3'
     2846   01 00AA1    C3C3C3C3 A            DATA     X'C3C3C3C3'
     2847                            ** ODD R FIELD CAUSING R AND RU1 TO BE THE SAME. ALSO USES R AS EW
     2848   01 00AA2    FFFFFFFA A   LS05     DATA     -6
     2849   01 00AA3    4AD0000C A            LS,13    12                 PH1 : C(S)= EW.RU1  = 0
     2850   01 00AA4    37300139              K        3,7,3,SETPSW
     2851   01 00AA5    07300179              K        0,7,3,LOC+2        PH3 : C(S)= R.NRU1  = 0
     2852   01 00AA6    FFFFFFFF A            DATA     -1
     2853   01 00AA7    FFFFFFFF A            DATA     -1                 PH4 : C(S)= PH1+PH3 = 0
     2854   01 00AA8    FFFFFFFA A   LCF06    DATA     -6                LCF 3  X 10 INTO E7 = 10 BYTE 1
     2855   01 00AA9    70320041              LCF,3    BRANCH-6,1
     2856   01 00AAA    E7300139              K        14,7,3,SETPSW
     2857   01 00AAB    17300179              K        1,7,3,LOC+2
     2858   01 00AAC    1117FF2D A            DATA     X'1117FF2D'
     2859   01 00AAD    1117FF2D A            DATA     X'1117FF2D'
     2860   01 00AAE    FFFFFFF4 A   LCF07    DATA     -12               LCF 3 *X FF INTO 00 = F7 BYTE 3
     2861   01 00AAF    F03204A2              LCF,3    *MEMORY,1
     2862   01 00AB0    00300139              K        0,0,3,SETPSW
     2863   01 00AB1    F7300179              K        15,7,3,LOC+2
     2864   01 00AB2    00000123              DATA     BA(BRANCH)+7
     2865   01 00AB3    00000123              DATA     BA(BRANCH)+7
     2866   01 00AB4    0000045B A            DATA     MEMORY-BRANCH
     2867   01 00AB5    0000045B A            DATA     MEMORY-BRANCH
     2868   01 00AB6    4537FE21 A            DATA     X'4537FE21'
     2869   01 00AB7    4537FE21 A            DATA     X'4537FE21'
     2870   01 00AB8    000000FF A            DATA     X'FF'
     2871   01 00AB9    000000FF A            DATA     X'FF'
     2872   01 00ABA    FFFFFFF8 A   LCF08    DATA     -8                LCF 3  X 56 INTO A1 = 56 BYTE 2
     2873   01 00ABB    7032011C              LCF,3    CLEAR,1
     2874   01 00ABC    A1300139              K        10,1,3,SETPSW
     2875   01 00ABD    56300179              K        5,6,3,LOC+2
     2876   01 00ABE    00000E1A A            DATA     4*(MEMORY-CLEAR)+2
     2877   01 00ABF    00000E1A A            DATA     4*(MEMORY-CLEAR)+2
     2878   01 00AC0    12345678 A            DATA     X'12345678'
     2879   01 00AC1    12345678 A            DATA     X'12345678'
     2880   01 00AC2    FFFFFFF8 A   LCF09    DATA     -8
     2881   01 00AC3    70C004A2              LCF,12   MEMORY
     2882   01 00AC4    00000139              K        0,0,0,SETPSW
     2883   01 00AC5    00000179              K        0,0,0,LOC+2
     2884   01 00AC6    00000000 A            DATA     0,0,-1,-1
            01 00AC7    00000000 A
            01 00AC8    FFFFFFFF A
            01 00AC9    FFFFFFFF A
     2885   01 00ACA    FFFFFFFC A   LCFI01   DATA     -4                LCFI 0 FF INTO 00 IS 00
     2886   01 00ACB    020000FF A            LCFI,0   X'FF'
     2887   01 00ACC    00000139              DATA     SETPSW
     2888   01 00ACD    00000179              DATA     LOC+2
     2889   01 00ACE    FFFFFFFC A   LCFI02   DATA     -4                LCFI 3 00 INTO F7 IS 00
     2890   01 00ACF    02300000 A            LCFI,3   0
     2891   01 00AD0    F7300139              K        15,7,3,SETPSW
     2892   01 00AD1    00300179              K        0,0,3,LOC+2
     2893   01 00AD2    FFFFFFFC A   LCFI03   DATA     -4                LCFI 2 57 INTO A0 IS 50
     2894   01 00AD3    02200057 A            LCFI,2   X'57'
     2895   01 00AD4    A0200139              K        10,0,2,SETPSW
     2896   01 00AD5    50200179              K        5,0,2,LOC+2
     2897   01 00AD6    FFFFFFFC A   LCFI04   DATA     -4                LCFI 1 D9 INTO 26 IS 21
     2898   01 00AD7    021000D9 A            LCFI,1   X'D9'
     2899   01 00AD8    26100139              K        2,6,1,SETPSW
     2900   01 00AD9    21100179              K        2,1,1,LOC+2
     2901   01 00ADA    FFFFFFF8 A   LCFI05   DATA     -8                LCFI 3 FF INTO 00 IS FF INDEX
     2902   01 00ADB    023000FF A            LCFI,3   X'FF',1
     2903   01 00ADC    00000139              DATA     SETPSW
     2904   01 00ADD    F7000179              K        15,7,0,LOC+2
     2905   01 00ADE    12345678 A            DATA     X'12345678'
     2906   01 00ADF    12345678 A            DATA     X'12345678'
     2907   01 00AE0    9ABCDEF0 A            DATA     X'9ABCDEF0'
     2908   01 00AE1    9ABCDEF0 A            DATA     X'9ABCDEF0'
     2909   01 00AE2    FFFFFFFC A   LCFI06   DATA     -4                LCFI *
     2910   01 00AE3    823004A2              LCFI,3   *MEMORY
     2911   01 00AE4    773001E8              K        7,7,3,SI9NAO
     2912   01 00AE5    F730006B              K        15,7,3,NEIRET+1
     2913   01 00AE6    FFFFFFFC A   LCFI07   DATA     -4
     2914   01 00AE7    02120011 A            LCFI,1   X'20011'
     2915   01 00AE8    80000139              K        8,0,0,SETPSW
     2916   01 00AE9    81000179              K        8,1,0,LOC+2
     2917   01 00AEA    FFFFFFF8 A   LAW01    DATA     -8                LAW
     2918   01 00AEB    3BC004A2              LAW,12   MEMORY
     2919   01 00AEC    F7300139              K        15,7,3,SETPSW
     2920   01 00AED    87300179              K        8,7,3,LOC+2
     2921   01 00AEE    FFFFFFFF A            DATA     -1
     2922   01 00AEF    00000000 A            DATA     0
     2923   01 00AF0    00000000 A            DATA     0
     2924   01 00AF1    00000000 A            DATA     0
     2925   01 00AF2    FFFFFFF8 A   LAW02    DATA     -8                LAW  X
     2926   01 00AF3    3BC204A3              LAW,12   MEMORY+1,1
     2927   01 00AF4    17300139              K        1,7,3,SETPSW
     2928   01 00AF5    27300179              K        2,7,3,LOC+2
     2929   01 00AF6    FFFFFFFF A            DATA     -1
     2930   01 00AF7    00000001 A            DATA     1
     2931   01 00AF8    FFFFFFFF A            DATA     -1
     2932   01 00AF9    FFFFFFFF A            DATA     -1
     2933   01 00AFA    FFFFFFF8 A   LAW03    DATA     -8                LAW *     OF NTRAP
     2934   01 00AFB    BBC0049C              LAW,12   *IA
     2935   01 00AFC    37200139              K        3,7,2,SETPSW
     2936   01 00AFD    57200179              K        5,7,2,LOC+2
     2937   01 00AFE    7FFFFFFF A            DATA     X'7FFFFFFF'
     2938   01 00AFF    80000000 A            DATA     X'80000000'
     2939   01 00B00    80000000 A            DATA     X'80000000'
     2940   01 00B01    80000000 A            DATA     X'80000000'
     2941   01 00B02    FFFFFFF4 A   LAW04    DATA     -12               LAW *X    OF TRAP
     2942   01 00B03    BBD204A3              LAW,13   *MEMORY+1,1
     2943   01 00B04    F73001F4              K        15,7,3,FXPOSW
     2944   01 00B05    D7300084              K        13,7,3,FPORET+1
     2945   01 00B06    000004AC              DATA     REPEAT
     2946   01 00B07    000004AC              DATA     REPEAT
     2947   01 00B08    80000000 A            DATA     X'80000000'
     2948   01 00B09    80000000 A            DATA     X'80000000'
     2949   01 00B0A    FDBCA972 A            DATA     X'FDBCA972'
     2950   01 00B0B    80000000 A            DATA     X'80000000'
     2951   01 00B0C    FFFFFFF6 A            DATA     MEMORY-REPEAT
     2952   01 00B0D    FFFFFFF6 A            DATA     MEMORY-REPEAT
     2953   01 00B0E    FFFFFFF8 A   LAW05    DATA     -8                LAW
     2954   01 00B0F    3BC004A2              LAW,12   MEMORY
     2955   01 00B10    07300139              K        0,7,3,SETPSW
     2956   01 00B11    27300179              K        2,7,3,LOC+2
     2957   01 00B12    00000000 A            DATA     0
     2958   01 00B13    7FFFFFFF A            DATA     X'7FFFFFFF'
     2959   01 00B14    80000001 A            DATA     X'80000001'
     2960   01 00B15    80000001 A            DATA     X'80000001'
     2961                            ** INSURE THAT PROBEOVER/H IS DISABLED BY FAMT
     2962   01 00B16    FFFFFFF8 A   LAH01    DATA     -8                LAH
     2963   01 00B17    5BC004A2              LAH,12   MEMORY
     2964   01 00B18    07300139              K        0,7,3,SETPSW
     2965   01 00B19    27300179              K        2,7,3,LOC+2
     2966   01 00B1A    FFFFFFFF A            DATA     -1
     2967   01 00B1B    00008000 A            DATA     X'8000'
     2968   01 00B1C    8000FFFF A            DATA     X'8000FFFF'
     2969   01 00B1D    8000FFFF A            DATA     X'8000FFFF'
     2970   01 00B1E    FFFFFFF8 A   LAH011   DATA     -8
     2971   01 00B1F    5BC004A2              LAH,12   MEMORY
     2972   01 00B20    07300139              K        0,7,3,SETPSW
     2973   01 00B21    27300179              K        2,7,3,LOC+2
     2974   01 00B22    00007878 A            DATA     X'7878',X'7878',X'78784040',X'78784040'
            01 00B23    00007878 A
            01 00B24    78784040 A
            01 00B25    78784040 A
     2975   01 00B26    FFFFFFF8 A   LAH012   DATA     -8
     2976   01 00B27    5BC004A2              LAH,12   MEMORY
     2977   01 00B28    07300139              K        0,7,3,SETPSW
     2978   01 00B29    07300179              K        0,7,3,LOC+2
     2979   01 00B2A    00000000 A            DATA     0,0,0,0
            01 00B2B    00000000 A
            01 00B2C    00000000 A
            01 00B2D    00000000 A
     2980   01 00B2E    FFFFFFF8 A   LAH02    DATA     -8                LAH  X
     2981   01 00B2F    5BC3FFF6 A            LAH,12   MEMORY-REPEAT,1
     2982   01 00B30    37300139              K        3,7,3,SETPSW
     2983   01 00B31    07300179              K        0,7,3,LOC+2
     2984   01 00B32    00000959              DATA     HA(REPEAT)+1
     2985   01 00B33    00000000 A            DATA     0
     2986   01 00B34    FFFF0000 A            DATA     X'FFFF0000'
     2987   01 00B35    FFFF0000 A            DATA     X'FFFF0000'
     2988   01 00B36    FFFFFFF8 A   LAH03    DATA     -8                LAH 8
     2989   01 00B37    DBC0049C              LAH,12   *IA
     2990   01 00B38    17300139              K        1,7,3,SETPSW
     2991   01 00B39    27300179              K        2,7,3,LOC+2
     2992   01 00B3A    FFFFFFFF A            DATA     -1
     2993   01 00B3B    00000001 A            DATA     1
     2994   01 00B3C    FFFF0000 A            DATA     X'FFFF0000'
     2995   01 00B3D    FFFF0000 A            DATA     X'FFFF0000'
     2996   01 00B3E    FFFFFFF4 A   LAD01    DATA     -12               LAD    RE
     2997   01 00B3F    1BC004A2              LAD,12   MEMORY
     2998   01 00B40    17300139              K        1,7,3,SETPSW
     2999   01 00B41    27300179              K        2,7,3,LOC+2
     3000   01 00B42    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3001   01 00B43    7FFFFFFF A            DATA     X'7FFFFFFF'
     3002   01 00B44    80000000 A            DATA     X'80000000'
     3003   01 00B45    80000000 A            DATA     X'80000000'
     3004   01 00B46    12345678 A            DATA     X'12345678'
     3005   01 00B47    FFFFFFFF A            DATA     -1
     3006   01 00B48    00000001 A            DATA     1
     3007   01 00B49    00000001 A            DATA     1
     3008   01 00B4A    FFFFFFF4 A   LAD02    DATA     -12               LAD MO RE
     3009   01 00B4B    1BC004A3              LAD,12   MEMORY+1
     3010   01 00B4C    37300139              K        3,7,3,SETPSW
     3011   01 00B4D    07300179              K        0,7,3,LOC+2
     3012   01 00B4E    FFFFFFFF A            DATA     -1
     3013   01 00B4F    00000000 A            DATA     0
     3014   01 00B50    00000000 A            DATA     0
     3015   01 00B51    00000000 A            DATA     0
     3016   01 00B52    FFFFFFFF A            DATA     -1
     3017   01 00B53    00000000 A            DATA     0
     3018   01 00B54    00000000 A            DATA     0
     3019   01 00B55    00000000 A            DATA     0
     3020   01 00B56    FFFFFFF4 A   LAD03    DATA     -12               LAD X  RE
     3021   01 00B57    1BC204AC              LAD,12   REPEAT,1
     3022   01 00B58    37300139              K        3,7,3,SETPSW
     3023   01 00B59    27300179              K        2,7,3,LOC+2
     3024   01 00B5A    FFFFFFFB A            DATA     (MEMORY-REPEAT)/2
     3025   01 00B5B    6789ABCD A            DATA     X'6789ABCD'
     3026   01 00B5C    98765432 A            DATA     X'98765432'
     3027   01 00B5D    98765432 A            DATA     X'98765432'
     3028   01 00B5E    FFFFFFFF A            DATA     -1
     3029   01 00B5F    EF012346 A            DATA     X'EF012346'
     3030   01 00B60    10FEDCBA A            DATA     X'10FEDCBA'
     3031   01 00B61    10FEDCBA A            DATA     X'10FEDCBA'
     3032   01 00B62    FFFFFFF4 A   LAD04    DATA     -12               LAD *  RE OF NTRAP
     3033   01 00B63    9BC0049C              LAD,12   *IA
     3034   01 00B64    27200139              K        2,7,2,SETPSW
     3035   01 00B65    57200179              K        5,7,2,LOC+2
     3036   01 00B66    76543210 A            DATA     X'76543210'
     3037   01 00B67    80000000 A            DATA     X'80000000'
     3038   01 00B68    80000000 A            DATA     X'80000000'
     3039   01 00B69    80000000 A            DATA     X'80000000'
     3040   01 00B6A    12345678 A            DATA     X'12345678'
     3041   01 00B6B    00000000 A            DATA     0
     3042   01 00B6C    00000000 A            DATA     0
     3043   01 00B6D    00000000 A            DATA     0
     3044   01 00B6E    FFFFFFF4 A   LAD05    DATA     -12               LAD    RE OF  TRAP
     3045   01 00B6F    1BC004A2              LAD,12   MEMORY
     3046   01 00B70    073001F4              K        0,7,3,FXPOSW
     3047   01 00B71    57300084              K        5,7,3,FPORET+1
     3048   01 00B72    00000000 A            DATA     0
     3049   01 00B73    80000000 A            DATA     X'80000000'
     3050   01 00B74    80000000 A            DATA     X'80000000'
     3051   01 00B75    80000000 A            DATA     X'80000000'
     3052   01 00B76    FFFFFFFF A            DATA     -1
     3053   01 00B77    00000000 A            DATA     0
     3054   01 00B78    00000000 A            DATA     0
     3055   01 00B79    00000000 A            DATA     0
     3056   01 00B7A    FFFFFFF4 A   LAD06    DATA     -12               LAD    RO
     3057   01 00B7B    1BD004A2              LAD,13   MEMORY
     3058   01 00B7C    B7300139              K        11,7,3,SETPSW
     3059   01 00B7D    A7300179              K        10,7,3,LOC+2
     3060   01 00B7E    92345678 A            DATA     X'92345678'
     3061   01 00B7F    92345678 A            DATA     X'92345678'
     3062   01 00B80    80000000 A            DATA     X'80000000'
     3063   01 00B81    80000000 A            DATA     X'80000000'
     3064   01 00B82    00BADBED A            DATA     X'BADBED'
     3065   01 00B83    7FFFFFFF A            DATA     X'7FFFFFFF'
     3066   01 00B84    00000001 A            DATA     1
     3067   01 00B85    00000001 A            DATA     1
     3068   01 00B86    FFFFFFF4 A   LAD07    DATA     -12               LAD    RO
     3069   01 00B87    1BD004A2              LAD,13   MEMORY
     3070   01 00B88    A7300139              K        10,7,3,SETPSW
     3071   01 00B89    A7300179              K        10,7,3,LOC+2
     3072   01 00B8A    CCCCCCCC A            DATA     X'CCCCCCCC'
     3073   01 00B8B    CCCCCCCC A            DATA     X'CCCCCCCC'
     3074   01 00B8C    7FFFFFFF A            DATA     X'7FFFFFFF'
     3075   01 00B8D    7FFFFFFF A            DATA     X'7FFFFFFF'
     3076   01 00B8E    BCDEFA98 A            DATA     X'BCDEFA98'
     3077   01 00B8F    7FFFFFFF A            DATA     X'7FFFFFFF'
     3078   01 00B90    FFFFFFFF A            DATA     -1
     3079   01 00B91    FFFFFFFF A            DATA     -1
     3080   01 00B92    FFFFFFF8 A   LCW01    DATA     -8                LCW
     3081   01 00B93    3AC004A2              LCW,12   MEMORY
     3082   01 00B94    87300139              K        8,7,3,SETPSW
     3083   01 00B95    97300179              K        9,7,3,LOC+2
     3084   01 00B96    12345678 A            DATA     X'12345678'
     3085   01 00B97    E8CD431E A            DATA     X'E8CD431E'
     3086   01 00B98    1732BCE2 A            DATA     X'1732BCE2'
     3087   01 00B99    1732BCE2 A            DATA     X'1732BCE2'
     3088   01 00B9A    FFFFFFF8 A   LCW02    DATA     -8                LCW       OF NTRAP
     3089   01 00B9B    3AC004A2              LCW,12   MEMORY
     3090   01 00B9C    07200139              K        0,7,2,SETPSW
     3091   01 00B9D    57200179              K        5,7,2,LOC+2
     3092   01 00B9E    7FFFFFFF A            DATA     X'7FFFFFFF'
     3093   01 00B9F    80000000 A            DATA     X'80000000'
     3094   01 00BA0    80000000 A            DATA     X'80000000'
     3095   01 00BA1    80000000 A            DATA     X'80000000'
     3096   01 00BA2    FFFFFFFA A   LCW03    DATA     -6                LCW     REGISTER TO REGISTER
     3097   01 00BA3    3AC0000C A            LCW,12   12
     3098   01 00BA4    27300139              K        2,7,3,SETPSW
     3099   01 00BA5    17300179              K        1,7,3,LOC+2
     3100   01 00BA6    12345678 A            DATA     X'12345678'
     3101   01 00BA7    EDCBA988 A            DATA     X'EDCBA988'
     3102   01 00BA8    FFFFFFF8 A   LCW04    DATA     -8                LCW  X    OF  TRAP
     3103   01 00BA9    3AC204A6              LCW,12   RETURN,1
     3104   01 00BAA    F73001F4              K        15,7,3,FXPOSW
     3105   01 00BAB    D7300084              K        13,7,3,FPORET+1
     3106   01 00BAC    FFFFFFFC A            DATA     MEMORY-RETURN
     3107   01 00BAD    80000000 A            DATA     X'80000000'
     3108   01 00BAE    80000000 A            DATA     X'80000000'
     3109   01 00BAF    80000000 A            DATA     X'80000000'
     3110   01 00BB0    FFFFFFF8 A   LCW05    DATA     -8                LCW *     ZERO
     3111   01 00BB1    BAC0049C              LCW,12   *IA
     3112   01 00BB2    77300139              K        7,7,3,SETPSW
     3113   01 00BB3    07300179              K        0,7,3,LOC+2
     3114   01 00BB4    FFFFFFFF A            DATA     -1
     3115   01 00BB5    00000000 A            DATA     0
     3116   01 00BB6    00000000 A            DATA     0
     3117   01 00BB7    00000000 A            DATA     0
     3118   01 00BB8    FFFFFFF8 A   LCW06    DATA     -8                LCW
     3119   01 00BB9    3AC004A2              LCW,12   MEMORY
     3120   01 00BBA    07300139              K        0,7,3,SETPSW
     3121   01 00BBB    27300179              K        2,7,3,LOC+2
     3122   01 00BBC    00000000 A            DATA     0
     3123   01 00BBD    7FFFFFFF A            DATA     X'7FFFFFFF'
     3124   01 00BBE    80000001 A            DATA     X'80000001'
     3125   01 00BBF    80000001 A            DATA     X'80000001'
     3126   01 00BC0    FFFFFFF8 A   LCH01    DATA     -8                LCH      ME
     3127   01 00BC1    5AC004A2              LCH,12   MEMORY
     3128   01 00BC2    07300139              K        0,7,3,SETPSW
     3129   01 00BC3    17300179              K        1,7,3,LOC+2
     3130   01 00BC4    FFFFFFFF A            DATA     -1
     3131   01 00BC5    FFFFEDCC A            DATA     X'FFFFEDCC'
     3132   01 00BC6    12345678 A            DATA     X'12345678'
     3133   01 00BC7    12345678 A            DATA     X'12345678'
     3134   01 00BC8    FFFFFFF8 A   LCH02    DATA     -8                LCH  X  ME
     3135   01 00BC9    5AC204AC              LCH,12   REPEAT,1
     3136   01 00BCA    07300139              K        0,7,3,SETPSW
     3137   01 00BCB    27300179              K        2,7,3,LOC+2
     3138   01 00BCC    FFFFFFEC A            DATA     2*(MEMORY-REPEAT)
     3139   01 00BCD    0000789B A            DATA     X'789B'
     3140   01 00BCE    87654321 A            DATA     X'87654321'
     3141   01 00BCF    87654321 A            DATA     X'87654321'
     3142   01 00BD0    FFFFFFF8 A   LCH03    DATA     -8                LCH *   ME
     3143   01 00BD1    DAC0049C              LCH,12   *IA
     3144   01 00BD2    37300139              K        3,7,3,SETPSW
     3145   01 00BD3    07300179              K        0,7,3,LOC+2
     3146   01 00BD4    FFFFFFFF A            DATA     -1
     3147   01 00BD5    00000000 A            DATA     0
     3148   01 00BD6    0000FFFF A            DATA     X'FFFF'
     3149   01 00BD7    0000FFFF A            DATA     X'FFFF'
     3150   01 00BD8    FFFFFFF8 A   LCH04    DATA     -8                LCH  X  MO
     3151   01 00BD9    5AC20047              LCH,12   BRANCH,1
     3152   01 00BDA    37300139              K        3,7,3,SETPSW
     3153   01 00BDB    17300179              K        1,7,3,LOC+2
     3154   01 00BDC    000008B7 A            DATA     2*(MEMORY-BRANCH)+1
     3155   01 00BDD    FFFF89AC A            DATA     X'FFFF89AC'
     3156   01 00BDE    FFFF7654 A            DATA     X'FFFF7654'
     3157   01 00BDF    FFFF7654 A            DATA     X'FFFF7654'
     3158   01 00BE0    FFFFFFF8 A   LCH05    DATA     -8                LCH  X  MO
     3159   01 00BE1    5AC204AC              LCH,12   REPEAT,1
     3160   01 00BE2    37300139              K        3,7,3,SETPSW
     3161   01 00BE3    27300179              K        2,7,3,LOC+2
     3162   01 00BE4    FFFFFFED A            DATA     2*(MEMORY-REPEAT)+1
     3163   01 00BE5    00007FFF A            DATA     X'7FFF'
     3164   01 00BE6    00008001 A            DATA     X'8001'
     3165   01 00BE7    00008001 A            DATA     X'8001'
     3166   01 00BE8    FFFFFFF4 A   LCD01    DATA     -12               LCD    RE
     3167   01 00BE9    1AC004A2              LCD,12   MEMORY
     3168   01 00BEA    17300139              K        1,7,3,SETPSW
     3169   01 00BEB    27300179              K        2,7,3,LOC+2
     3170   01 00BEC    BBBBBBBB A            DATA     X'BBBBBBBB'
     3171   01 00BED    7FFFFFFF A            DATA     X'7FFFFFFF'
     3172   01 00BEE    80000000 A            DATA     X'80000000'
     3173   01 00BEF    80000000 A            DATA     X'80000000'
     3174   01 00BF0    CCCCCCCC A            DATA     X'CCCCCCCC'
     3175   01 00BF1    FFFFFFFF A            DATA     -1
     3176   01 00BF2    00000001 A            DATA     1
     3177   01 00BF3    00000001 A            DATA     1
     3178   01 00BF4    FFFFFFF4 A   LCD02    DATA     -12               LCD  X RE
     3179   01 00BF5    1AC204AC              LCD,12   REPEAT,1
     3180   01 00BF6    27300139              K        2,7,3,SETPSW
     3181   01 00BF7    17300179              K        1,7,3,LOC+2
     3182   01 00BF8    FFFFFFFB A            DATA     (MEMORY-REPEAT)/2
     3183   01 00BF9    80000000 A            DATA     X'80000000'
     3184   01 00BFA    7FFFFFFF A            DATA     X'7FFFFFFF'
     3185   01 00BFB    7FFFFFFF A            DATA     X'7FFFFFFF'
     3186   01 00BFC    23476B9E A            DATA     X'23476B9E'
     3187   01 00BFD    00000001 A            DATA     1
     3188   01 00BFE    FFFFFFFF A            DATA     -1
     3189   01 00BFF    FFFFFFFF A            DATA     -1
     3190   01 00C00    FFFFFFF4 A   LCD03    DATA     -12               LCD *  RE
     3191   01 00C01    9AC0049C              LCD,12   *IA
     3192   01 00C02    37300139              K        3,7,3,SETPSW
     3193   01 00C03    07300179              K        0,7,3,LOC+2
     3194   01 00C04    FFFFFFFF A            DATA     -1
     3195   01 00C05    00000000 A            DATA     0
     3196   01 00C06    00000000 A            DATA     0
     3197   01 00C07    00000000 A            DATA     0
     3198   01 00C08    FFFFFFFF A            DATA     -1
     3199   01 00C09    00000000 A            DATA     0
     3200   01 00C0A    00000000 A            DATA     0
     3201   01 00C0B    00000000 A            DATA     0
     3202   01 00C0C    FFFFFFF4 A   LCD04    DATA     -12               LCD    RE OF NTRAP
     3203   01 00C0D    1AC004A2              LCD,12   MEMORY
     3204   01 00C0E    27200139              K        2,7,2,SETPSW
     3205   01 00C0F    57200179              K        5,7,2,LOC+2
     3206   01 00C10    FFFFFFFF A            DATA     -1
     3207   01 00C11    80000000 A            DATA     X'80000000'
     3208   01 00C12    80000000 A            DATA     X'80000000'
     3209   01 00C13    80000000 A            DATA     X'80000000'
     3210   01 00C14    FFFFFFFF A            DATA     -1
     3211   01 00C15    00000000 A            DATA     0
     3212   01 00C16    00000000 A            DATA     0
     3213   01 00C17    00000000 A            DATA     0
     3214   01 00C18    FFFFFFF4 A   LCD05    DATA     -12               LCD    RO OF  TRAP
     3215   01 00C19    1AD004A2              LCD,13   MEMORY
     3216   01 00C1A    973001F4              K        9,7,3,FXPOSW
     3217   01 00C1B    D7300084              K        13,7,3,FPORET+1
     3218   01 00C1C    FEEDBEAD A            DATA     X'FEEDBEAD'
     3219   01 00C1D    FEEDBEAD A            DATA     X'FEEDBEAD'
     3220   01 00C1E    80000000 A            DATA     X'80000000'
     3221   01 00C1F    80000000 A            DATA     X'80000000'
     3222   01 00C20    FFFFFFFF A            DATA     -1
     3223   01 00C21    80000000 A            DATA     X'80000000'
     3224   01 00C22    00000000 A            DATA     0
     3225   01 00C23    00000000 A            DATA     0
     3226   01 00C24    FFFFFFF6 A   LCD06    DATA     -10               LCD    REGISTER TO REGISTER
     3227   01 00C25    1AC0000C A            LCD,12   12
     3228   01 00C26    F7300139              K        15,7,3,SETPSW
     3229   01 00C27    A7300179              K        10,7,3,LOC+2
     3230   01 00C28    FFFFFFFF A            DATA     -1
     3231   01 00C29    00000000 A            DATA     0
     3232   01 00C2A    00000000 A            DATA     0
     3233   01 00C2B    00000000 A            DATA     0
     3234   01 00C2C    FFFFFFFF A            DATA     -1
     3235   01 00C2D    00000001 A            DATA     1
     3236   01 00C2E    FFFFFFF8 A   STH01    DATA     -8                STH
     3237   01 00C2F    55C004A2              STH,12   MEMORY
     3238   01 00C30    F7300139              K        15,7,3,SETPSW
     3239   01 00C31    B7300179              K        11,7,3,LOC+2
     3240   01 00C32    FFFF8000 A            DATA     X'FFFF8000'
     3241   01 00C33    FFFF8000 A            DATA     X'FFFF8000'
     3242   01 00C34    FFFFFFFF A            DATA     -1
     3243   01 00C35    8000FFFF A            DATA     X'8000FFFF'
     3244   01 00C36    FFFFFFF8 A   STH02    DATA     -8                STH  X
     3245   01 00C37    55C3C4A3 S            STH,12   MEMORY-X'3FFF',1
     3246   01 00C38    67300139              K        6,7,3,SETPSW
     3247   01 00C39    27300179              K        2,7,3,LOC+2
     3248   01 00C3A    00007FFF A            DATA     X'7FFF'
     3249   01 00C3B    00007FFF A            DATA     X'7FFF'
     3250   01 00C3C    12345678 A            DATA     X'12345678'
     3251   01 00C3D    12347FFF A            DATA     X'12347FFF'
     3252   01 00C3E    FFFFFFF8 A   STH03    DATA     -8                STH *
     3253   01 00C3F    D5C0049C              STH,12   *IA
     3254   01 00C40    A7300139              K        10,7,3,SETPSW
     3255   01 00C41    E7300179              K        14,7,3,LOC+2
     3256   01 00C42    0000FFFF A            DATA     X'FFFF'
     3257   01 00C43    0000FFFF A            DATA     X'FFFF'
     3258   01 00C44    00000000 A            DATA     0
     3259   01 00C45    FFFF0000 A            DATA     X'FFFF0000'
     3260   01 00C46    FFFFFFF8 A   STH04    DATA     -8                STH
     3261   01 00C47    55C004A2              STH,12   MEMORY
     3262   01 00C48    37300139              K        3,7,3,SETPSW
     3263   01 00C49    77300179              K        7,7,3,LOC+2
     3264   01 00C4A    80001234 A            DATA     X'80001234'
     3265   01 00C4B    80001234 A            DATA     X'80001234'
     3266   01 00C4C    56781234 A            DATA     X'56781234'
     3267   01 00C4D    12341234 A            DATA     X'12341234'
     3268   01 00C4E    FFFFFFF8 A   STH05    DATA     -8                STH
     3269   01 00C4F    55CE04A2              STH,12   MEMORY,7
     3270   01 00C50    97300139              K        9,7,3,SETPSW
     3271   01 00C51    D7300179              K        13,7,3,LOC+2
     3272   01 00C52    FFFEF379 A            DATA     X'FFFEF379'
     3273   01 00C53    FFFEF379 A            DATA     X'FFFEF379'
     3274   01 00C54    67921113 A            DATA     X'67921113'
     3275   01 00C55    6792F379 A            DATA     X'6792F379'
     3276   01 00C56    FFFFFFF8 A   STH06    DATA     -8                STH
     3277   01 00C57    55C004A2              STH,12   MEMORY
     3278   01 00C58    07300139              K        0,7,3,SETPSW
     3279   01 00C59    47300179              K        4,7,3,LOC+2
     3280   01 00C5A    7FFF1692 A            DATA     X'7FFF1692'
     3281   01 00C5B    7FFF1692 A            DATA     X'7FFF1692'
     3282   01 00C5C    00000000 A            DATA     0
     3283   01 00C5D    16920000 A            DATA     X'16920000'
     3284   01 00C5E    FFFFFFF8 A   STB01    DATA     -8                STB       BYTE 0
     3285   01 00C5F    75C004A2              STB,12   MEMORY
     3286   01 00C60    F7300139              K        15,7,3,SETPSW
     3287   01 00C61    F7300179              K        15,7,3,LOC+2
     3288   01 00C62    12345678 A            DATA     X'12345678'
     3289   01 00C63    12345678 A            DATA     X'12345678'
     3290   01 00C64    FFFFFFFF A            DATA     -1
     3291   01 00C65    78FFFFFF A            DATA     X'78FFFFFF'
     3292   01 00C66    FFFFFFF8 A   STB02    DATA     -8                STB  X    BYTE 1
     3293   01 00C67    75C20482              STB,12   MEMORY-X'20',1
     3294   01 00C68    E7300139              K        14,7,3,SETPSW
     3295   01 00C69    E7300179              K        14,7,3,LOC+2
     3296   01 00C6A    00000081 A            DATA     X'81'
     3297   01 00C6B    00000081 A            DATA     X'81'
     3298   01 00C6C    FFFFFFFF A            DATA     -1
     3299   01 00C6D    FF81FFFF A            DATA     X'FF81FFFF'
     3300   01 00C6E    FFFFFFFA A   STB03    DATA     -6                STB  X    BYTE 2
     3301   01 00C6F    75C20048 A            STB,12   X'1FFFF'&(X'C'-X'1FFC4'),1
     3302   01 00C70    D7300139              K        13,7,3,SETPSW
     3303   01 00C71    D7300179              K        13,7,3,LOC+2
     3304   01 00C72    FFFFFF12 A            DATA     X'FFFFFF12'
     3305   01 00C73    FFFF1212 A            DATA     X'FFFF1212'
     3306   01 00C74    FFFFFFF8 A   STB04    DATA     -8                STB       BYTE 3
     3307   01 00C75    75C2900D S            STB,12   MEMORY-X'17495',1
     3308   01 00C76    C7300139              K        12,7,3,SETPSW
     3309   01 00C77    C7300179              K        12,7,3,LOC+2
     3310   01 00C78    6375D257 A            DATA     X'6375D257'
     3311   01 00C79    6375D257 A            DATA     X'6375D257'
     3312   01 00C7A    FFFFFFFF A            DATA     -1
     3313   01 00C7B    FFFFFF57 A            DATA     X'FFFFFF57'
     3314   01 00C7C    FFFFFFF8 A   STB05    DATA     -8                STB       BYTE 0    ZERO
     3315   01 00C7D    F5C0049C              STB,12   *IA
     3316   01 00C7E    F7300139              K        15,7,3,SETPSW
     3317   01 00C7F    F7300179              K        15,7,3,LOC+2
     3318   01 00C80    000000FF A            DATA     X'FF'
     3319   01 00C81    000000FF A            DATA     X'FF'
     3320   01 00C82    00000000 A            DATA     0
     3321   01 00C83    FF000000 A            DATA     X'FF000000'
     3322   01 00C84    FFFFFFF4 A   STD01    DATA     -12               STD
     3323   01 00C85    15C004A2              STD,12   MEMORY
     3324   01 00C86    B7300139              K        11,7,3,SETPSW
     3325   01 00C87    B7300179              K        11,7,3,LOC+2
     3326   01 00C88    80000000 A            DATA     X'80000000'
     3327   01 00C89    80000000 A            DATA     X'80000000'
     3328   01 00C8A    7FFFFFFF A            DATA     X'7FFFFFFF'
     3329   01 00C8B    80000000 A            DATA     X'80000000'
     3330   01 00C8C    00000000 A            DATA     0
     3331   01 00C8D    00000000 A            DATA     0
     3332   01 00C8E    FFFFFFFF A            DATA     -1
     3333   01 00C8F    00000000 A            DATA     0
     3334   01 00C90    FFFFFFF4 A   STD02    DATA     -12               STD  X
     3335   01 00C91    15C2027E              STD,12   MEMORY-548,1
     3336   01 00C92    A7300139              K        10,7,3,SETPSW
     3337   01 00C93    A7300179              K        10,7,3,LOC+2
     3338   01 00C94    00000112 A            DATA     274
     3339   01 00C95    00000112 A            DATA     274
     3340   01 00C96    FFFFFFFF A            DATA     -1
     3341   01 00C97    00000112 A            DATA     274
     3342   01 00C98    FFFFFFFF A            DATA     -1
     3343   01 00C99    FFFFFFFF A            DATA     -1
     3344   01 00C9A    00000000 A            DATA     0
     3345   01 00C9B    FFFFFFFF A            DATA     -1
     3346   01 00C9C    FFFFFFF4 A   STD03    DATA     -12               STD *    RO
     3347   01 00C9D    95D0049C              STD,13   *IA
     3348   01 00C9E    97300139              K        9,7,3,SETPSW
     3349   01 00C9F    97300179              K        9,7,3,LOC+2
     3350   01 00CA0    12345678 A            DATA     X'12345678'
     3351   01 00CA1    12345678 A            DATA     X'12345678'
     3352   01 00CA2    ECBD129E A            DATA     X'ECBD129E'
     3353   01 00CA3    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3354   01 00CA4    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3355   01 00CA5    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3356   01 00CA6    56782349 A            DATA     X'56782349'
     3357   01 00CA7    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3358   01 00CA8    FFFFFFF4 A   STD04    DATA     -12               STD      MO
     3359   01 00CA9    15C004A3              STD,12   MEMORY+1
     3360   01 00CAA    87300139              K        8,7,3,SETPSW
     3361   01 00CAB    87300179              K        8,7,3,LOC+2
     3362   01 00CAC    00000000 A            DATA     0
     3363   01 00CAD    00000000 A            DATA     0
     3364   01 00CAE    FFFFFFFF A            DATA     -1
     3365   01 00CAF    00000000 A            DATA     0
     3366   01 00CB0    00000001 A            DATA     1
     3367   01 00CB1    00000001 A            DATA     1
     3368   01 00CB2    FFFFFFFE A            DATA     -2
     3369   01 00CB3    00000001 A            DATA     1
     3370   01 00CB4    FFFFFFF6 A   STS01    DATA     -10
     3371   01 00CB5    47C004A2              STS,12   MEMORY             PH1:C(S) = EW.NRU1  = FFFF0000
     3372   01 00CB6    F7300139              K        15,7,3,SETPSW
     3373   01 00CB7    F7300179              K        15,7,3,LOC+2       PH3:C(S) = RR.RU1   = 0000FFFF
     3374   01 00CB8    0000FFFF A            DATA     X'FFFF'
     3375   01 00CB9    0000FFFF A            DATA     X'FFFF'            PH4:C(S) = PH1+PH3  = FFFFFFFF
     3376   01 00CBA    FFFF0000 A            DATA     X'FFFF0000'
     3377   01 00CBB    FFFFFFFF A            DATA     -1
     3378   01 00CBC    0000FFFF A            DATA     X'FFFF'
     3379   01 00CBD    0000FFFF A            DATA     X'FFFF'
     3380                            ** USE ODD R FIELD AND EVEN R AS THE EW
     3381   01 00CBE    FFFFFFF6 A   STS02    DATA     -10
     3382   01 00CBF    47D0000C A            STS,13   12                 PH1:C(S) = EW.NRU1  = 0000FFFF
     3383   01 00CC0    07300139              K        0,7,3,SETPSW
     3384   01 00CC1    07300179              K        0,7,3,LOC+2        PH3:C(S) = RR.RU1   = FFFF0000
     3385   01 00CC2    0000FFFF A            DATA     X'FFFF'
     3386   01 00CC3    FFFFFFFF A            DATA     -1                 PH4:C(S) = PH1+PH3  = FFFFFFFF
     3387   01 00CC4    00000000 A            DATA     0
     3388   01 00CC5    00000000 A            DATA     0
     3389   01 00CC6    FFFF0000 A            DATA     X'FFFF0000'
     3390   01 00CC7    FFFF0000 A            DATA     X'FFFF0000'
     3391   01 00CC8    FFFFFFF8 A   STCF01   DATA     -8                STFC      BYTE 0
     3392   01 00CC9    740004A2              STCF,0   MEMORY
     3393   01 00CCA    F7300139              K        15,7,3,SETPSW
     3394   01 00CCB    F7300179              K        15,7,3,LOC+2
     3395   01 00CCC    00000000 A            DATA     0
     3396   01 00CCD    00000000 A            DATA     0
     3397   01 00CCE    00000000 A            DATA     0
     3398   01 00CCF    F7000000 A            DATA     X'F7000000'
     3399   01 00CD0    FFFFFFF8 A   STCF02   DATA     -8                STFC  X   BYTE 1
     3400   01 00CD1    74F2006A              STCF,15  NEIRET,1
     3401   01 00CD2    E6200139              K        14,6,2,SETPSW
     3402   01 00CD3    E6200179              K        14,6,2,LOC+2
     3403   01 00CD4    000010E1 A            DATA     4*(MEMORY-NEIRET)+1
     3404   01 00CD5    000010E1 A            DATA     4*(MEMORY-NEIRET)+1
     3405   01 00CD6    00000000 A            DATA     0
     3406   01 00CD7    00E60000 A            DATA     X'E60000'
     3407   01 00CD8    FFFFFFF8 A   STCF03   DATA     -8                STFC *X   BYTE 2
     3408   01 00CD9    F432049C              STCF,3   *IA,1
     3409   01 00CDA    D5300139              K        13,5,3,SETPSW
     3410   01 00CDB    D5300179              K        13,5,3,LOC+2
     3411   01 00CDC    00000002 A            DATA     2
     3412   01 00CDD    00000002 A            DATA     2
     3413   01 00CDE    FFFFFFFF A            DATA     -1
     3414   01 00CDF    FFFFD5FF A            DATA     X'FFFFD5FF'
     3415   01 00CE0    FFFFFFF8 A   STCF04   DATA     -8                STCF X    BYTE 3
     3416   01 00CE1    741204A2              STCF,1   MEMORY,1
     3417   01 00CE2    34300139              K        3,4,3,SETPSW
     3418   01 00CE3    34300179              K        3,4,3,LOC+2
     3419   01 00CE4    00000003 A            DATA     3
     3420   01 00CE5    00000003 A            DATA     3
     3421   01 00CE6    FFFFFFFF A            DATA     -1
     3422   01 00CE7    FFFFFF34 A            DATA     X'FFFFFF34'
     3423   01 00CE8    FFFFFFF8 A   XW01     DATA     -8                XW  RESULT IN R IS ZERO
     3424   01 00CE9    46C004A2              XW,12    MEMORY
     3425   01 00CEA    F7300139              K        15,7,3,SETPSW
     3426   01 00CEB    C7300179              K        12,7,3,LOC+2
     3427   01 00CEC    FFFFFFFF A            DATA     -1
     3428   01 00CED    00000000 A            DATA     0
     3429   01 00CEE    00000000 A            DATA     0
     3430   01 00CEF    FFFFFFFF A            DATA     -1
     3431   01 00CF0    FFFFFFF8 A   XW02     DATA     -8                XW  RESULT IN R IS POS
     3432   01 00CF1    46C004A2              XW,12    MEMORY
     3433   01 00CF2    37300139              K        3,7,3,SETPSW
     3434   01 00CF3    27300179              K        2,7,3,LOC+2
     3435   01 00CF4    FFFFFFF6 A            DATA     MEMORY-REPEAT
     3436   01 00CF5    7FFFFFFF A            DATA     X'7FFFFFFF'
     3437   01 00CF6    7FFFFFFF A            DATA     X'7FFFFFFF'
     3438   01 00CF7    FFFFFFF6 A            DATA     MEMORY-REPEAT
     3439   01 00CF8    FFFFFFF8 A   XW03     DATA     -8                XW  RESULT IN R IS NEG
     3440   01 00CF9    46C004A2              XW,12    MEMORY
     3441   01 00CFA    27300139              K        2,7,3,SETPSW
     3442   01 00CFB    17300179              K        1,7,3,LOC+2
     3443   01 00CFC    00000000 A            DATA     0
     3444   01 00CFD    FFFFFFFF A            DATA     -1
     3445   01 00CFE    FFFFFFFF A            DATA     -1
     3446   01 00CFF    00000000 A            DATA     0
     3447   01 00D00    FFFFFFF6 A   XW04     DATA     -10               XW REGISTER TO REGISTER. RESULT NEG.
     3448   01 00D01    46C0000D A            XW,12    13
     3449   01 00D02    07300139              K        0,7,3,SETPSW
     3450   01 00D03    17300179              K        1,7,3,LOC+2
     3451   01 00D04    00000001 A            DATA     1
     3452   01 00D05    FFFFFFFF A            DATA     -1
     3453   01 00D06    00000000 A            DATA     0
     3454   01 00D07    00000000 A            DATA     0
     3455   01 00D08    FFFFFFFF A            DATA     -1
     3456   01 00D09    00000001 A            DATA     1
     3457   01 00D0A    FFFFFFF6 A   INT01    DATA     -10               INT
     3458   01 00D0B    6BC004A2              INT,12   MEMORY
     3459   01 00D0C    77300139              K        7,7,3,SETPSW
     3460   01 00D0D    17300179              K        1,7,3,LOC+2
     3461   01 00D0E    FFFFFFFF A            DATA     -1
     3462   01 00D0F    00000234 A            DATA     X'234'
     3463   01 00D10    12345678 A            DATA     X'12345678'
     3464   01 00D11    12345678 A            DATA     X'12345678'
     3465   01 00D12    FFFFFFFF A            DATA     -1
     3466   01 00D13    00005678 A            DATA     X'5678'
     3467   01 00D14    FFFFFFF6 A   INT02    DATA     -10               INT
     3468   01 00D15    6BC004A2              INT,12   MEMORY
     3469   01 00D16    07300139              K        0,7,3,SETPSW
     3470   01 00D17    F7300179              K        15,7,3,LOC+2
     3471   01 00D18    000002C9 A            DATA     MEMORY-END
     3472   01 00D19    00000EDC A            DATA     X'EDC'
     3473   01 00D1A    FEDCBA98 A            DATA     X'FEDCBA98'
     3474   01 00D1B    FEDCBA98 A            DATA     X'FEDCBA98'
     3475   01 00D1C    12345678 A            DATA     X'12345678'
     3476   01 00D1D    0000BA98 A            DATA     X'BA98'
     3477   01 00D1E    FFFFFFF6 A   INT03    DATA     -10               INT ODD REG
     3478   01 00D1F    6BD004A2              INT,13   MEMORY
     3479   01 00D20    77300139              K        7,7,3,SETPSW
     3480   01 00D21    87300179              K        8,7,3,LOC+2
     3481   01 00D22    FFFFFFFF A            DATA     -1
     3482   01 00D23    FFFFFFFF A            DATA     -1
     3483   01 00D24    89ABCDEF A            DATA     X'89ABCDEF'
     3484   01 00D25    89ABCDEF A            DATA     X'89ABCDEF'
     3485   01 00D26    FFFFFFFF A            DATA     -1
     3486   01 00D27    0000CDEF A            DATA     X'CDEF'
     3487   01 00D28    FFFFFFF8 A   ANLZ01   DATA     -8                ANLZ    HALFWORD *X
     3488   01 00D29    44C004A2              ANLZ,12  MEMORY            PXS= FAS10.NFAIM.NANLZ.PRE3
     3489                            *                                   S/MRQ/2 = PREOPER.PRE/12
     3490                            *                                   PREOPER IS QUALIFIED WITH NANLZ
     3491                            *                                   BRPH5= ANLZ.PRE3
     3492   01 00D2A    F7300139              K        15,7,3,SETPSW
     3493   01 00D2B    67300179              K        6,7,3,LOC+2
     3494   01 00D2C    000003B3              DATA     HA(END)+1
     3495   01 00D2D    000005D7 A            DATA     ABSVAL(HA(CYCLE))+ABSVAL(HA(END)+1)
     3496   01 00D2E    D2F204AC              LH,15    *REPEAT,1
     3497   01 00D2F    D2F204AC              LH,15    *REPEAT,1
     3498   01 00D30    FFFFFFF8 A   ANLZ02   DATA     -8                ANLZ  X     WORD *
     3499   01 00D31    44C204AC              ANLZ,12  REPEAT,1
     3500   01 00D32    77300139              K        7,7,3,SETPSW
     3501   01 00D33    A7300179              K        10,7,3,LOC+2
     3502   01 00D34    FFFFFFF6 A            DATA     MEMORY-REPEAT
     3503   01 00D35    000004A2              DATA     MEMORY
     3504   01 00D36    B530049C              STW,3    *IA
     3505   01 00D37    B530049C              STW,3    *IA
     3506   01 00D38    FFFFFFF8 A   ANLZ03   DATA     -8                ANLZ *      BYTE *X
     3507   01 00D39    C4C0049C              ANLZ,12  *IA
     3508   01 00D3A    77300139              K        7,7,3,SETPSW
     3509   01 00D3B    27300179              K        2,7,3,LOC+2
     3510   01 00D3C    00000143 A            DATA     X'143'
     3511   01 00D3D    000013CB              DATA     BA(MEMORY)+X'143'
     3512   01 00D3E    F102049C              CB,0     *IA,1
     3513   01 00D3F    F102049C              CB,0     *IA,1
     3514   01 00D40    FFFFFFF8 A   ANLZ04   DATA     -8                ANLZ  DOUBLEWORD  X
     3515   01 00D41    44C004A2              ANLZ,12  MEMORY
     3516   01 00D42    07300139              K        0,7,3,SETPSW
     3517   01 00D43    C7300179              K        12,7,3,LOC+2
     3518   01 00D44    00000725 A            DATA     X'725'
     3519   01 00D45    00000976              DATA     DA(MEMORY+1)+X'725'
     3520   01 00D46    1B4204A3              LAD,4    MEMORY+1,1
     3521   01 00D47    1B4204A3              LAD,4    MEMORY+1,1
     3522   01 00D48    FFFFFFF8 A   ANLZ05   DATA     -8                ANLZ  IMMED WORD *X
     3523   01 00D49    44C004A2              ANLZ,12  MEMORY
     3524   01 00D4A    07300139              K        0,7,3,SETPSW
     3525   01 00D4B    B7300179              K        11,7,3,LOC+2
     3526   01 00D4C    00001234 A            DATA     X'1234'
     3527   01 00D4D    00001234 A            DATA     X'1234'
     3528   01 00D4E    A2C0049C              LI,12    *IA,1
     3529   01 00D4F    A2C0049C              LI,12    *IA,1
     3530                            *  S/PRETR = PRE1.NANLZ
     3531   01 00D50    FFFFFFF8 A   ANLZ06   DATA     -8                ANLZ ILLEGAL FAMILY (IMMEDIATE-BYTE)
     3532   01 00D51    44C004A2              ANLZ,12  MEMORY
     3533   01 00D52    07300139              K        0,7,3,SETPSW
     3534   01 00D53    17300179              K        1,7,3,LOC+2
     3535   01 00D54    FFFFFFFF A            DATA     -1
     3536   01 00D55    FFFFFFFF A            DATA     -1
     3537   01 00D56    61700752 A            MBS,7    X'752'
     3538   01 00D57    61700752 A            MBS,7    X'752'
     3539   01 00D58    FFFFFFF8 A   ANLZ07   DATA     -8                ANLZ PRIV INST IN SLAVE MODE
     3540   01 00D59    44C004A2              ANLZ,12  MEMORY            DOUBLEWORD, DIRECT ADDRESSING
     3541   01 00D5A    07900139              K        0,7,9,SETPSW
     3542   01 00D5B    C7900178              K        12,7,9,LOC+1
     3543   01 00D5C    00000000 A            DATA     0
     3544   01 00D5D    00000253              GEN      DA(RETURN)
     3545   01 00D5E    0F0004A6              XPSD,0   RETURN
     3546   01 00D5F    0F0004A6              XPSD,0   RETURN
     3547                            *  ON FIRST PASS  THE INST IS  B  END.  IF NON-EXSISTENT MEMORY IS
     3548                            *  PRESENT AN  ANLZ,12 MEMORY INSTRUCTION WILL BE INSERTED
     3549   01 00D60    FFFFFFF8 A   ANLZ08   DATA     -8
     3550   01 00D61    44C004A2              ANLZ,12  MEMORY
     3551   01 00D62    07300139              K        0,7,3,SETPSW
     3552   01 00D63    07300177              K        0,7,3,LOC
     3553   01 00D64    00000000 A            DATA     0
     3554   01 00D65    00000000 A            DATA     0
     3555   01 00D66    B2C00000 A            LW,12    *0                CHANGED TO LW,12  *(NON-EXSISTENT.
     3556   01 00D67    B2C00000 A            LW,12    *0                  MEMEMORY) AFTER ONE PASS
     3557                            *  S/MRQ/1 = FABRANCH.PRE/12.NANLZ
     3558                            *  S/RW =  FUBDR.PRE3.NANLZ
     3559   01 00D68    FFFFFFF6 A   ANLZ09   DATA     -10               ANALYZE A BRANCH THAT WILL BRANCH
     3560   01 00D69    44C004A2              ANLZ,12  MEMORY
     3561   01 00D6A    00000139              K        0,0,0,SETPSW
     3562   01 00D6B    A0000179              K        10,0,0,LOC+2
     3563   01 00D6C    00000002 A            DATA     2
     3564   01 00D6D    00001001 A            DATA     X'1001'
     3565   01 00D6E    E4CE000D A            DATA     X'E4CE000D'       BDR,12 *13,7
     3566   01 00D6F    E4CE000D A            DATA     X'E4CE000D'
     3567   01 00D70    00001000 A            DATA     X'1000'
     3568   01 00D71    00001000 A            DATA     X'1000'
     3569   01 00D72    FFFFFFF8 A   ANLZ10   DATA     -8                ANALYZE A BRANCH THAT WONT BRANCH
     3570   01 00D73    44C004A2              ANLZ,12  MEMORY
     3571   01 00D74    00000139              K        0,0,0,SETPSW
     3572   01 00D75    A0000179              K        10,0,0,LOC+2
     3573   01 00D76    00000000 A            DATA     0,1
            01 00D77    00000001 A
     3574   01 00D78    E4CE000C A            DATA     X'E4CE000C'       BDR,12 *12,7
     3575   01 00D79    E4CE000C A            DATA     X'E4CE000C'
     3576                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3577                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3578                            * PXS =  FASEL.PRE3.NOL7.NANLZ
     3579   01 00D7A    FFFFFFF4 A   ANLZ11   DATA     -12
     3580   01 00D7B    44C004A2              ANLZ,12  MEMORY
     3581   01 00D7C    F7300139              K        15,7,3,SETPSW
     3582   01 00D7D    87300179              K        8,7,3,LOC+2
     3583   01 00D7E    00000000 A            DATA     0
     3584   01 00D7F    000004A8              DATA     RETURN+2
     3585   01 00D80    4AC004A8              LS,12    RETURN+2
     3586   01 00D81    4AC004A8              LS,12    RETURN+2
     3587   01 00D82    FFFFFFFF A            DATA     -1
     3588   01 00D83    FFFFFFFF A            DATA     -1
     3589   01 00D84    0F0004A6              XPSD,0   RETURN
     3590   01 00D85    0F0004A6              XPSD,0   RETURN
     3591                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3592                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3593                            * PXS =  FUEXU.PRE3.NANLZ
     3594                            * BRP10 =FUEXU.PRE3.NANLZ
     3595   01 00D86    FFFFFFF4 A   ANLZ12   DATA     -12
     3596   01 00D87    44C004A2              ANLZ,12  MEMORY
     3597   01 00D88    00000139              K        0,0,0,SETPSW
     3598   01 00D89    80000179              K        8,0,0,LOC+2
     3599   01 00D8A    00000000 A            DATA     0
     3600   01 00D8B    000004A2              DATA     MEMORY
     3601   01 00D8C    670004A2              EXU      MEMORY
     3602   01 00D8D    670004A2              EXU      MEMORY
     3603   01 00D8E    FFFFFFFF A            DATA     -1,-1
            01 00D8F    FFFFFFFF A
     3604   01 00D90    0F0004A6              XPSD,0   RETURN
     3605   01 00D91    0F0004A6              XPSD,0   RETURN
     3606                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3607                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3608                            * PXS =  FARWD.PRE3.NANLZ
     3609   01 00D92    FFFFFFF4 A   ANLZ13   DATA     -12
     3610   01 00D93    44C004A2              ANLZ,12  MEMORY
     3611   01 00D94    00000139              K        0,0,0,SETPSW
     3612   01 00D95    80000179              K        8,0,0,LOC+2
     3613   01 00D96    FFFFFFFF A            DATA     -1
     3614   01 00D97    00000041 A            DATA     X'41'
     3615   01 00D98    6DC00041 A            WD,12    X'41'
     3616   01 00D99    6DC00041 A            WD,12    X'41'
     3617   01 00D9A    5A5A5A5A A            DATA     X'5A5A5A5A'
     3618   01 00D9B    5A5A5A5A A            DATA     X'5A5A5A5A'
     3619   01 00D9C    0F0004A6              XPSD,0   RETURN
     3620   01 00D9D    0F0004A6              XPSD,0   RETURN
     3621                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3622                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3623                            * PXS =  FAMDS.PRE3.NANLZ.NFAIM
     3624                            * BRPH3 =FAMDS.PRE/34.NBRPH5.NANLZ
     3625   01 00D9E    FFFFFFF4 A   ANLZ14   DATA     -12
     3626   01 00D9F    44C004A2              ANLZ,12  MEMORY
     3627   01 00DA0    00000139              K        0,0,0,SETPSW
     3628   01 00DA1    80000179              K        8,0,0,LOC+2
     3629   01 00DA2    00000000 A            DATA     0
     3630   01 00DA3    00000047              DATA     BRANCH
     3631   01 00DA4    37C00047              MW,12    BRANCH
     3632   01 00DA5    37C00047              MW,12    BRANCH
     3633   01 00DA6    5A5A5A5A A            DATA     X'5A5A5A5A'
     3634   01 00DA7    5A5A5A5A A            DATA     X'5A5A5A5A'
     3635   01 00DA8    0F0004A6              XPSD,0   RETURN
     3636   01 00DA9    0F0004A6              XPSD,0   RETURN
     3637                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3638                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3639                            * S/RW  = FUXW.PRE3.NANLZ
     3640   01 00DAA    FFFFFFF4 A   ANLZ15   DATA     -12
     3641   01 00DAB    44C004A2              ANLZ,12  MEMORY
     3642   01 00DAC    00000139              K        0,0,0,SETPSW
     3643   01 00DAD    80000179              K        8,0,0,LOC+2
     3644   01 00DAE    FFFFFC18 A            DATA     -1000
     3645   01 00DAF    000004A2              DATA     MEMORY
     3646   01 00DB0    46D004A2              XW,13    MEMORY
     3647   01 00DB1    46D004A2              XW,13    MEMORY
     3648   01 00DB2    5A5A5A5A A            DATA     X'5A5A5A5A'
     3649   01 00DB3    5A5A5A5A A            DATA     X'5A5A5A5A'
     3650   01 00DB4    0F0004A6              XPSD,0   RETURN
     3651   01 00DB5    0F0004A6              XPSD,0   RETURN
     3652                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3653                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3654                            * S/RW  = FUBAL.PRE3.NANLZ
     3655   01 00DB6    FFFFFFF4 A   ANLZ16   DATA     -12
     3656   01 00DB7    44C004A2              ANLZ,12  MEMORY
     3657   01 00DB8    00000139              K        0,0,0,SETPSW
     3658   01 00DB9    80000179              K        8,0,0,LOC+2
     3659   01 00DBA    000003E8 A            DATA     1000
     3660   01 00DBB    00000047              DATA     BRANCH
     3661   01 00DBC    6AD00047              BAL,13   BRANCH
     3662   01 00DBD    6AD00047              BAL,13   BRANCH
     3663   01 00DBE    5A5A5A5A A            DATA     X'5A5A5A5A'
     3664   01 00DBF    5A5A5A5A A            DATA     X'5A5A5A5A'
     3665   01 00DC0    0F0004A6              XPSD,0   RETURN
     3666   01 00DC1    0F0004A6              XPSD,0   RETURN
     3667                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3668                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3669                            * ANALYZE A BIR THAT WILL BRANCH
     3670                            * S/RW = FUBIR.PRE3.NANLZ
     3671   01 00DC2    FFFFFFF4 A   ANLZ17   DATA     -12
     3672   01 00DC3    44C004A2              ANLZ,12  MEMORY
     3673   01 00DC4    00000139              K        0,0,0,SETPSW
     3674   01 00DC5    80000179              K        8,0,0,LOC+2
     3675   01 00DC6    FFFFFFFE A            DATA     -2
     3676   01 00DC7    00000047              DATA     BRANCH
     3677   01 00DC8    65C00047              BIR,12   BRANCH
     3678   01 00DC9    65C00047              BIR,12   BRANCH
     3679   01 00DCA    5A5A5A5A A            DATA     X'5A5A5A5A'
     3680   01 00DCB    5A5A5A5A A            DATA     X'5A5A5A5A'
     3681   01 00DCC    0F0004A6              XPSD,0   RETURN
     3682   01 00DCD    0F0004A6              XPSD,0   RETURN
     3683                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3684                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3685                            * ANALYZE A BIR THAT WILL NOT BRANCH
     3686   01 00DCE    FFFFFFF4 A   ANLZ18   DATA     -12
     3687   01 00DCF    44C004A2              ANLZ,12  MEMORY
     3688   01 00DD0    00000139              K        0,0,0,SETPSW
     3689   01 00DD1    80000179              K        8,0,0,LOC+2
     3690   01 00DD2    00000001 A            DATA     1
     3691   01 00DD3    00000047              DATA     BRANCH
     3692   01 00DD4    65C00047              BIR,12   BRANCH
     3693   01 00DD5    65C00047              BIR,12   BRANCH
     3694   01 00DD6    5A5A5A5A A            DATA     X'5A5A5A5A'
     3695   01 00DD7    5A5A5A5A A            DATA     X'5A5A5A5A'
     3696   01 00DD8    0F0004A6              XPSD,0   RETURN
     3697   01 00DD9    0F0004A6              XPSD,0   RETURN
     3698                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3699                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3700                            * BRPH3 = FUSF.PRE3.NANLZ.D23
     3701   01 00DDA    FFFFFFF4 A   ANLZ19   DATA     -12
     3702   01 00DDB    44C004A2              ANLZ,12  MEMORY
     3703   01 00DDC    00000139              K        0,0,0,SETPSW
     3704   01 00DDD    80000179              K        8,0,0,LOC+2
     3705   01 00DDE    00000064 A            DATA     100
     3706   01 00DDF    00000177 A            DATA     X'177'
     3707   01 00DE0    24D00177 A            SF,13    X'177'
     3708   01 00DE1    24D00177 A            SF,13    X'177'
     3709   01 00DE2    5A5A5A5A A            DATA     X'5A5A5A5A'
     3710   01 00DE3    5A5A5A5A A            DATA     X'5A5A5A5A'
     3711   01 00DE4    0F0004A6              XPSD,0   RETURN
     3712   01 00DE5    0F0004A6              XPSD,0   RETURN
     3713                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3714                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3715                            * BRPH3 = FAPSD.PRE3.NANLZ.NO7
     3716   01 00DE6    FFFFFFF4 A   ANLZ20   DATA     -12
     3717   01 00DE7    44C004A2              ANLZ,12  MEMORY
     3718   01 00DE8    00000139              K        0,0,0,SETPSW
     3719   01 00DE9    C0000179              K        12,0,0,LOC+2
     3720   01 00DEA    00000178              DATA     LOC+1
     3721   01 00DEB    00000006 A            DATA     6
     3722   01 00DEC    0E00000C A            LPSD,0   12
     3723   01 00DED    0E00000C A            LPSD,0   12
     3724   01 00DEE    00000000 A            DATA     0
     3725   01 00DEF    00000000 A            DATA     0
     3726   01 00DF0    0F0004A6              XPSD,0   RETURN
     3727   01 00DF1    0F0004A6              XPSD,0   RETURN
     3728                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3729                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3730                            * PXS   = FAMDS.NFAIM.PRE3.NANLZ
     3731   01 00DF2    FFFFFFF4 A   ANLZ21   DATA     -12
     3732   01 00DF3    44C004A2              ANLZ,12  MEMORY
     3733   01 00DF4    00000139              K        0,0,0,SETPSW
     3734   01 00DF5    A0000179              K        10,0,0,LOC+2
     3735   01 00DF6    FFFFFFFF A            DATA     -1
     3736   01 00DF7    0001FFFF A            DATA     X'1FFFF'
     3737   01 00DF8    A5D0000C A            S,13     *12
     3738   01 00DF9    A5D0000C A            S,13     *12
     3739   01 00DFA    5A5A5A5A A            DATA     X'5A5A5A5A'
     3740   01 00DFB    5A5A5A5A A            DATA     X'5A5A5A5A'
     3741   01 00DFC    0F0004A6              XPSD,0   RETURN
     3742   01 00DFD    0F0004A6              XPSD,0   RETURN
     3743                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3744                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3745                            * BRPH6 = FAST/M.PRE3.NOU0.NANLZ
     3746   01 00DFE    FFFFFFF4 A   ANLZ22   DATA     -12
     3747   01 00DFF    44C004A2              ANLZ,12  MEMORY
     3748   01 00E00    10000139              K        1,0,0,SETPSW
     3749   01 00E01    80000179              K        8,0,0,LOC+2
     3750   01 00E02    00000000 A            DATA     0
     3751   01 00E03    00000047              DATA     BRANCH
     3752   01 00E04    2AD00047              LM,13    BRANCH
     3753   01 00E05    2AD00047              LM,13    BRANCH
     3754   01 00E06    00000000 A            DATA     0,0
            01 00E07    00000000 A
     3755   01 00E08    0F0004A6              XPSD,0   RETURN
     3756   01 00E09    0F0004A6              XPSD,0   RETURN
     3757                            ** ANLZ11 THROUGH ANLZ23 TEST NUMEROUS PRE PHASE TERMS: PXS, S/RW,
     3758                            ** BRPH3, BRPH6, AND BRPH10. REFERENCE PHASE SEQUENCE CHARTS
     3759                            * PXS = FUWAIT.PRE3.NANLZ
     3760   01 00E0A    FFFFFFF4 A   ANLZ23   DATA     -12
     3761   01 00E0B    44C004A2              ANLZ,12  MEMORY
     3762   01 00E0C    73300139              K        7,3,3,SETPSW
     3763   01 00E0D    83300179              K        8,3,3,LOC+2
     3764   01 00E0E    00000000 A            DATA     0,100
            01 00E0F    00000064 A
     3765   01 00E10    2E000064 A            WAIT     100
     3766   01 00E11    2E000064 A            WAIT     100
     3767   01 00E12    FFFFFFFF A            DATA     -1,-1
            01 00E13    FFFFFFFF A
     3768   01 00E14    0F0004A6              XPSD,0   RETURN
     3769   01 00E15    0F0004A6              XPSD,0   RETURN
     3770                            *              BRPRE4 = (LI+LCFI).PREL1.NANLZ.NC0
     3771   01 00E16    FFFFFFF8 A   ANLZ24   DATA     -8
     3772   01 00E17    44C004A2              ANLZ,12  MEMORY
     3773   01 00E18    07300139              K        0,7,3,SETPSW
     3774   01 00E19    97300179              K        9,7,3,LOC+2
     3775   01 00E1A    00000001 A            DATA     1
     3776   01 00E1B    00000001 A            DATA     1
     3777   01 00E1C    023000FF A            LCFI,3   X'FF'
     3778   01 00E1D    023000FF A            LCFI,3   X'FF'
     3779                            ** CONDITION CODE SETTINGS FOR CI,CB,CH,CW
     3780                            **  CC2  CC3  CC4
     3781                            **   -    0    0   OPERANDS EQUAL
     3782                            **   -    0    1   REGISTER WORD < EFFECTIVE WORD
     3783                            **   -    1    0   REGISTER WORD > EFFECTIVE WORD
     3784                            **   0    -    -   LOGICAL PRODUCT OF THE TWO OPERANDS IS ZERO
     3785                            **   1    -    -   LOGICAL PRODUCT OF THE TWO OPERANDS IS NONZERO
     3786                            ** COMPARE C(R) > C(EW). LOGIC PROD  ZERO
     3787                            ** CHECK THAT S0.NFACOMP DOES NOT INHIBIT SGTZ (S1CC3) ALSO
     3788                            ** CHECK THAT S0.NFACOMP DOES NOT S/CC4
     3789   01 00E1E    FFFFFFF8 A   CW01     DATA     -8
     3790   01 00E1F    31C004A2              CW,12    MEMORY
     3791   01 00E20    F7300139              K        15,7,3,SETPSW
     3792   01 00E21    A7300179              K        10,7,3,LOC+2
     3793   01 00E22    40000000 A            DATA     X'40000000'
     3794   01 00E23    40000000 A            DATA     X'40000000'
     3795   01 00E24    BFFFFFFF A            DATA     X'BFFFFFFF'
     3796   01 00E25    BFFFFFFF A            DATA     X'BFFFFFFF'
     3797                            ** COMPARE C(R) < C(EW). LOGIC PROD NEZ
     3798                            ** CHECK THAT S00.FACOMP HOLD SGTZ FALSE INHIBITING SETTING CC3
     3799                            ** CHECK THAT S00.FACOMP CAUSES S/CC4
     3800   01 00E26    FFFFFFF8 A   CW02     DATA     -8
     3801   01 00E27    31C004A2              CW,12    MEMORY
     3802   01 00E28    07300139              K        0,7,3,SETPSW
     3803   01 00E29    57300179              K        5,7,3,LOC+2
     3804   01 00E2A    FFFFFFFE A            DATA     -2
     3805   01 00E2B    FFFFFFFE A            DATA     -2
     3806   01 00E2C    7FFFFFFF A            DATA     X'7FFFFFFF'
     3807   01 00E2D    7FFFFFFF A            DATA     X'7FFFFFFF'
     3808                            ** COMPARE EQUALS. LOGIC PRODUCT ZERO (OPERANDS BOTH ZERO)
     3809   01 00E2E    FFFFFFFC A   CW03     DATA     -4
     3810   01 00E2F    31C004A2              CW,12    MEMORY
     3811   01 00E30    F7300139              K        15,7,3,SETPSW
     3812   01 00E31    87300179              K        8,7,3,LOC+2
     3813                            ** R > EW. HALFWORD ZERO BEING COMPARED. LOGICAL PRODUCT  NEZ
     3814   01 00E32    FFFFFFF8 A   CH01     DATA     -8                CH
     3815   01 00E33    51C004A2              CH,12    MEMORY
     3816   01 00E34    F7300139              K        15,7,3,SETPSW
     3817   01 00E35    C7300179              K        12,7,3,LOC+2
     3818   01 00E36    FFFF8000 A            DATA     X'FFFF8000'
     3819   01 00E37    FFFF8000 A            DATA     X'FFFF8000'
     3820   01 00E38    8000F739 A            DATA     X'8000F739'
     3821   01 00E39    8000F739 A            DATA     X'8000F739'
     3822                            ** R=EW  HALFWORD ONE BEING COMPARED. LOGICAL PRODUCT NEZ
     3823   01 00E3A    FFFFFFF8 A   CH02     DATA     -8                CH  X
     3824   01 00E3B    51CE04A2              CH,12    MEMORY,7
     3825   01 00E3C    77300139              K        7,7,3,SETPSW
     3826   01 00E3D    47300179              K        4,7,3,LOC+2
     3827   01 00E3E    00007F32 A            DATA     X'7F32'
     3828   01 00E3F    00007F32 A            DATA     X'7F32'
     3829   01 00E40    123E7F32 A            DATA     X'123E7F32'
     3830   01 00E41    123E7F32 A            DATA     X'123E7F32'
     3831                            ** EW > R. HW ZERO BEING COMPARED. LOGICAL PRODUCT EZ
     3832   01 00E42    FFFFFFF8 A   CH03     DATA     -8
     3833   01 00E43    51C004A2              CH,12    MEMORY
     3834   01 00E44    07300139              K        0,7,3,SETPSW
     3835   01 00E45    27300179              K        2,7,3,LOC+2
     3836   01 00E46    42008200 A            DATA     X'42008200'
     3837   01 00E47    42008200 A            DATA     X'42008200'
     3838   01 00E48    71140200 A            DATA     X'71140200'
     3839   01 00E49    71140200 A            DATA     X'71140200'
     3840   01 00E4A    FFFFFFF8 A   CB01     DATA     -8                CB        BYTE 0
     3841   01 00E4B    71C004A2              CB,12    MEMORY
     3842   01 00E4C    77300139              K        7,7,3,SETPSW
     3843   01 00E4D    07300179              K        0,7,3,LOC+2
     3844   01 00E4E    FFFFFF00 A            DATA     X'FFFFFF00'
     3845   01 00E4F    FFFFFF00 A            DATA     X'FFFFFF00'
     3846   01 00E50    00FFFFFF A            DATA     X'FFFFFF'
     3847   01 00E51    00FFFFFF A            DATA     X'FFFFFF'
     3848   01 00E52    FFFFFFF8 A   CB02     DATA     -8                CB        BYTE 1
     3849   01 00E53    71C20482              CB,12    MEMORY-X'20',1
     3850   01 00E54    77300139              K        7,7,3,SETPSW
     3851   01 00E55    57300179              K        5,7,3,LOC+2
     3852   01 00E56    00000081 A            DATA     X'81'
     3853   01 00E57    00000081 A            DATA     X'81'
     3854   01 00E58    FFFEFFFF A            DATA     X'FFFEFFFF'
     3855   01 00E59    FFFEFFFF A            DATA     X'FFFEFFFF'
     3856   01 00E5A    FFFFFFF8 A   CB03     DATA     -8                CB        BYTE 0
     3857   01 00E5B    71C004A2              CB,12    MEMORY
     3858   01 00E5C    37300139              K        3,7,3,SETPSW
     3859   01 00E5D    47300179              K        4,7,3,LOC+2
     3860   01 00E5E    000000FF A            DATA     X'FF'
     3861   01 00E5F    000000FF A            DATA     X'FF'
     3862   01 00E60    FFEECCDD A            DATA     X'FFEECCDD'
     3863   01 00E61    FFEECCDD A            DATA     X'FFEECCDD'
     3864   01 00E62    FFFFFFF8 A   CB04     DATA     -8                CB  X     BYTE 1
     3865   01 00E63    71C2EF04 S            CB,12    MEMORY-X'1159E',1
     3866   01 00E64    F7300139              K        15,7,3,SETPSW
     3867   01 00E65    C7300179              K        12,7,3,LOC+2
     3868   01 00E66    12345679 A            DATA     X'12345679'
     3869   01 00E67    12345679 A            DATA     X'12345679'
     3870   01 00E68    26793355 A            DATA     X'26793355'
     3871   01 00E69    26793355 A            DATA     X'26793355'
     3872   01 00E6A    FFFFFFF8 A   CB05     DATA     -8                CB *X     BYTE 2
     3873   01 00E6B    F1C2049C              CB,12    *IA,1
     3874   01 00E6C    07300139              K        0,7,3,SETPSW
     3875   01 00E6D    47300179              K        4,7,3,LOC+2
     3876   01 00E6E    00000002 A            DATA     2
     3877   01 00E6F    00000002 A            DATA     2
     3878   01 00E70    FFFF02FF A            DATA     X'FFFF02FF'
     3879   01 00E71    FFFF02FF A            DATA     X'FFFF02FF'
     3880   01 00E72    FFFFFFF8 A   CB06     DATA     -8                CB        BYTE 3
     3881   01 00E73    71C22B52 S            CB,12    MEMORY-X'1D950',1
     3882   01 00E74    07300139              K        0,7,3,SETPSW
     3883   01 00E75    47300179              K        4,7,3,LOC+2
     3884   01 00E76    ABC76543 A            DATA     X'ABC76543'
     3885   01 00E77    ABC76543 A            DATA     X'ABC76543'
     3886   01 00E78    54389A43 A            DATA     X'54389A43'
     3887   01 00E79    54389A43 A            DATA     X'54389A43'
     3888   01 00E7A    FFFFFFF8 A   CB07     DATA     -8                CB        BYTE 2
     3889   01 00E7B    71CE04A2              CB,12    MEMORY,7
     3890   01 00E7C    77300139              K        7,7,3,SETPSW
     3891   01 00E7D    17300179              K        1,7,3,LOC+2
     3892   01 00E7E    00000059 A            DATA     X'59'
     3893   01 00E7F    00000059 A            DATA     X'59'
     3894   01 00E80    58A65754 A            DATA     X'58A65754'
     3895   01 00E81    58A65754 A            DATA     X'58A65754'
     3896   01 00E82    FFFFFFF8 A   CB08     DATA     -8                CB        BYTE 0
     3897   01 00E83    71C004A2              CB,12    MEMORY
     3898   01 00E84    77300139              K        7,7,3,SETPSW
     3899   01 00E85    27300179              K        2,7,3,LOC+2
     3900   01 00E86    FFFFFFBC A            DATA     X'FFFFFFBC'
     3901   01 00E87    FFFFFFBC A            DATA     X'FFFFFFBC'
     3902   01 00E88    43210567 A            DATA     X'43210567'
     3903   01 00E89    43210567 A            DATA     X'43210567'
     3904                            ** SIGN EXTEND '0' C(R)> EW. LOGIC PRODUCT NEZ
     3905   01 00E8A    FFFFFFFA A   CI01     DATA     -6
     3906   01 00E8B    21C7FFFD A            CI,12    X'7FFFD'
     3907   01 00E8C    07300139              K        0,7,3,SETPSW
     3908   01 00E8D    67300179              K        6,7,3,LOC+2
     3909   01 00E8E    0007FFFE A            DATA     X'7FFFE'
     3910   01 00E8F    0007FFFE A            DATA     X'7FFFE'
     3911                            ** SIGN EXTEND '1' C(R) < EW.  LP = ZERO
     3912   01 00E90    FFFFFFFA A   CI02     DATA     -6
     3913   01 00E91    21C80000 A            CI,12    X'80000'
     3914   01 00E92    F7300139              K        15,7,3,SETPSW
     3915   01 00E93    A7300179              K        10,7,3,LOC+2
     3916   01 00E94    0007FFFF A            DATA     X'7FFFF'
     3917   01 00E95    0007FFFF A            DATA     X'7FFFF'
     3918   01 00E96    FFFFFFF4 A   CD01     DATA     -12               CD
     3919   01 00E97    11C004A2              CD,12    MEMORY
     3920   01 00E98    F7300139              K        15,7,3,SETPSW
     3921   01 00E99    C7300179              K        12,7,3,LOC+2
     3922   01 00E9A    12345678 A            DATA     X'12345678'
     3923   01 00E9B    12345678 A            DATA     X'12345678'
     3924   01 00E9C    12345678 A            DATA     X'12345678'
     3925   01 00E9D    12345678 A            DATA     X'12345678'
     3926   01 00E9E    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3927   01 00E9F    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3928   01 00EA0    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3929   01 00EA1    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3930   01 00EA2    FFFFFFF4 A   CD02     DATA     -12               CD  X
     3931   01 00EA3    11C357B2 S            CD,12    MEMORY-X'ACF0',1
     3932   01 00EA4    07300139              K        0,7,3,SETPSW
     3933   01 00EA5    27300179              K        2,7,3,LOC+2
     3934   01 00EA6    12345678 A            DATA     X'12345678'
     3935   01 00EA7    12345678 A            DATA     X'12345678'
     3936   01 00EA8    12345678 A            DATA     X'12345678'
     3937   01 00EA9    12345678 A            DATA     X'12345678'
     3938   01 00EAA    9ABCDEF1 A            DATA     X'9ABCDEF1'
     3939   01 00EAB    9ABCDEF1 A            DATA     X'9ABCDEF1'
     3940   01 00EAC    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3941   01 00EAD    9ABCDEF0 A            DATA     X'9ABCDEF0'
     3942   01 00EAE    FFFFFFF4 A   CD03     DATA     -12               CD *
     3943   01 00EAF    91C0049C              CD,12    *IA
     3944   01 00EB0    77300139              K        7,7,3,SETPSW
     3945   01 00EB1    57300179              K        5,7,3,LOC+2
     3946   01 00EB2    76543210 A            DATA     X'76543210'
     3947   01 00EB3    76543210 A            DATA     X'76543210'
     3948   01 00EB4    76543210 A            DATA     X'76543210'
     3949   01 00EB5    76543210 A            DATA     X'76543210'
     3950   01 00EB6    FDECBA98 A            DATA     X'FDECBA98'
     3951   01 00EB7    FDECBA98 A            DATA     X'FDECBA98'
     3952   01 00EB8    FDECBA99 A            DATA     X'FDECBA99'
     3953   01 00EB9    FDECBA99 A            DATA     X'FDECBA99'
     3954   01 00EBA    FFFFFFF4 A   CD04     DATA     -12               CD
     3955   01 00EBB    11D004A2              CD,13    MEMORY
     3956   01 00EBC    F7300139              K        15,7,3,SETPSW
     3957   01 00EBD    D7300179              K        13,7,3,LOC+2
     3958   01 00EBE    ADDEBCAD A            DATA     X'ADDEBCAD'
     3959   01 00EBF    ADDEBCAD A            DATA     X'ADDEBCAD'
     3960   01 00EC0    76543210 A            DATA     X'76543210'
     3961   01 00EC1    76543210 A            DATA     X'76543210'
     3962   01 00EC2    76543210 A            DATA     X'76543210'
     3963   01 00EC3    76543210 A            DATA     X'76543210'
     3964   01 00EC4    76543211 A            DATA     X'76543211'
     3965   01 00EC5    76543211 A            DATA     X'76543211'
     3966                            ** OPERANDS EQUAL
     3967   01 00EC6    FFFFFFF6 A   CS01     DATA     -10
     3968   01 00EC7    45C004A2              CS,12    MEMORY              PH1: C(S)= EW.RU1  = A5A5A5A5
     3969   01 00EC8    F7300139              K        15,7,3,SETPSW
     3970   01 00EC9    C7300179              K        12,7,3,LOC+2        PH3: C(S)= R.RU1   = A5A5A5A5
     3971   01 00ECA    A5A5A5A5 A            DATA     X'A5A5A5A5'
     3972   01 00ECB    A5A5A5A5 A            DATA     X'A5A5A5A5'         PH4: C(S)= PH3-PH1 = 00000000
     3973   01 00ECC    FFFFFFFF A            DATA     -1
     3974   01 00ECD    FFFFFFFF A            DATA     -1
     3975   01 00ECE    A5A5A5A5 A            DATA     X'A5A5A5A5'
     3976   01 00ECF    A5A5A5A5 A            DATA     X'A5A5A5A5'
     3977                            ** R < EW
     3978   01 00ED0    FFFFFFF6 A   CS02     DATA     -10
     3979   01 00ED1    45C004A2              CS,12    MEMORY             PH1: C(S)= EW.RU1  = A5A5A5A5
     3980   01 00ED2    07300139              K        0,7,3,SETPSW
     3981   01 00ED3    17300179              K        1,7,3,LOC+2
     3982   01 00ED4    5A5A5A5A A            DATA     X'5A5A5A5A'
     3983   01 00ED5    5A5A5A5A A            DATA     X'5A5A5A5A'        PH4: C(S)= PH3-PH1 = B4B4B4B5
     3984   01 00ED6    A5A5A5A5 A            DATA     X'A5A5A5A5'
     3985   01 00ED7    A5A5A5A5 A            DATA     X'A5A5A5A5'
     3986   01 00ED8    FFFFFFFF A            DATA     -1
     3987   01 00ED9    FFFFFFFF A            DATA     -1
     3988                            ** R > EW
     3989   01 00EDA    FFFFFFF6 A   CS03     DATA     -10
     3990   01 00EDB    45C004A2              CS,12    MEMORY             PH1: C(S)= EW.RU1  = 5A5A0000
     3991   01 00EDC    07300139              K        0,7,3,SETPSW
     3992   01 00EDD    27300179              K        2,7,3,LOC+2        PH3: C(S)= R.RU1   = A5A50000
     3993   01 00EDE    A5A5A5A5 A            DATA     X'A5A5A5A5'
     3994   01 00EDF    A5A5A5A5 A            DATA     X'A5A5A5A5'        PH4: C(S)= PH3-PH1 = 4B4B0000
     3995   01 00EE0    5A5A5A5A A            DATA     X'5A5A5A5A'
     3996   01 00EE1    5A5A5A5A A            DATA     X'5A5A5A5A'
     3997   01 00EE2    FFFF0000 A            DATA     X'FFFF0000'
     3998   01 00EE3    FFFF0000 A            DATA     X'FFFF0000'
     3999                            ** C(R) < EW. C(RU1)=EW
     4000   01 00EE4    FFFFFFF6 A   CLR01    DATA     -10
     4001   01 00EE5    39C004A2              CLR,12   MEMORY
     4002   01 00EE6    F7300139              K        15,7,3,SETPSW
     4003   01 00EE7    47300179              K        4,7,3,LOC+2
     4004   01 00EE8    00000000 A            DATA     0
     4005   01 00EE9    00000000 A            DATA     0
     4006   01 00EEA    00000000 A            DATA     0
     4007   01 00EEB    00000000 A            DATA     0
     4008   01 00EEC    FFFFFFFF A            DATA     -1
     4009   01 00EED    FFFFFFFF A            DATA     -1
     4010                            ** C(R)=EW. C(RU1)< EW
     4011   01 00EEE    FFFFFFFA A   CLR02    DATA     -6
     4012   01 00EEF    39C004A2              CLR,12   MEMORY
     4013   01 00EF0    F7300139              K        15,7,3,SETPSW
     4014   01 00EF1    17300179              K        1,7,3,LOC+2
     4015   01 00EF2    FFFFFFFF A            DATA     -1
     4016   01 00EF3    FFFFFFFF A            DATA     -1
     4017                            ** C(R) > EW. C(RU1) < EW.
     4018   01 00EF4    FFFFFFF6 A   CLR03    DATA     -10
     4019   01 00EF5    39C004A2              CLR,12   MEMORY
     4020   01 00EF6    07300139              K        0,7,3,SETPSW
     4021   01 00EF7    67300179              K        6,7,3,LOC+2
     4022   01 00EF8    00000001 A            DATA     1
     4023   01 00EF9    00000001 A            DATA     1
     4024   01 00EFA    00000000 A            DATA     0
     4025   01 00EFB    00000000 A            DATA     0
     4026   01 00EFC    FFFFFFFF A            DATA     -1
     4027   01 00EFD    FFFFFFFF A            DATA     -1
     4028                            ** C(R) <EW. C(RU1) > EW.
     4029   01 00EFE    FFFFFFF6 A   CLR04    DATA     -10
     4030   01 00EFF    39C004A2              CLR,12   MEMORY
     4031   01 00F00    07300139              K        0,7,3,SETPSW
     4032   01 00F01    97300179              K        9,7,3,LOC+2
     4033   01 00F02    FFFFFFFF A            DATA     -1
     4034   01 00F03    FFFFFFFF A            DATA     -1
     4035   01 00F04    00000000 A            DATA     0
     4036   01 00F05    00000000 A            DATA     0
     4037   01 00F06    00000001 A            DATA     1
     4038   01 00F07    00000001 A            DATA     1
     4039                            ** USE ODD R FIELD. C(R)=C(RU1)>EW.
     4040   01 00F08    FFFFFFF6 A   CLR05    DATA     -10
     4041   01 00F09    39D004A2              CLR,13   MEMORY
     4042   01 00F0A    07300139              K        0,7,3,SETPSW
     4043   01 00F0B    A7300179              K        10,7,3,LOC+2
     4044   01 00F0C    FFFFFFFF A            DATA     -1
     4045   01 00F0D    FFFFFFFF A            DATA     -1
     4046   01 00F0E    00000000 A            DATA     0
     4047   01 00F0F    00000000 A            DATA     0
     4048   01 00F10    00000001 A            DATA     1
     4049   01 00F11    00000001 A            DATA     1
     4050                            ** R > M+1. R < M
     4051   01 00F12    FFFFFFF4 A   CLM01    DATA     -12
     4052   01 00F13    19C004A2              CLM,12   MEMORY
     4053   01 00F14    07300139              K        0,7,3,SETPSW
     4054   01 00F15    97300179              K        9,7,3,LOC+2
     4055   01 00F16    00000000 A            DATA     0
     4056   01 00F17    00000000 A            DATA     0
     4057   01 00F18    00000001 A            DATA     1
     4058   01 00F19    00000001 A            DATA     1
     4059   01 00F1A    FFFFFFFF A            DATA     -1
     4060   01 00F1B    FFFFFFFF A            DATA     -1
     4061   01 00F1C    FFFFFFFF A            DATA     -1
     4062   01 00F1D    FFFFFFFF A            DATA     -1
     4063                            ** USE ODD MEMORY LOC. SHOULD STILL FETCH EVEN LOC AND ODD LOC
     4064                            ** R < M+1. R > M
     4065   01 00F1E    FFFFFFF4 A   CLM02    DATA     -12
     4066   01 00F1F    19D004A3              CLM,13   MEMORY+1
     4067   01 00F20    97300139              K        9,7,3,SETPSW
     4068   01 00F21    67300179              K        6,7,3,LOC+2
     4069   01 00F22    FFFFFFFF A            DATA     -1
     4070   01 00F23    FFFFFFFF A            DATA     -1
     4071   01 00F24    FFFFFFFF A            DATA     -1
     4072   01 00F25    FFFFFFFF A            DATA     -1
     4073   01 00F26    00000000 A            DATA     0
     4074   01 00F27    00000000 A            DATA     0
     4075   01 00F28    00000001 A            DATA     1
     4076   01 00F29    00000001 A            DATA     1
     4077                            *
     4078                            ** R = M+1. R=M
     4079   01 00F2A    FFFFFFF4 A   CLM03    DATA     -12
     4080   01 00F2B    19C004A2              CLM,12   MEMORY
     4081   01 00F2C    F7300139              K        F,7,3,SETPSW
     4082   01 00F2D    07300179              K        0,7,3,LOC+2
     4083   01 00F2E    25252525 A            DATA     X'25252525'
     4084   01 00F2F    25252525 A            DATA     X'25252525'
     4085   01 00F30    25252525 A            DATA     X'25252525'
     4086   01 00F31    25252525 A            DATA     X'25252525'
     4087   01 00F32    FFFFFFFF A            DATA     -1
     4088   01 00F33    FFFFFFFF A            DATA     -1
     4089   01 00F34    25252525 A            DATA     X'25252525'
     4090   01 00F35    25252525 A            DATA     X'25252525'
     4091                            *
     4092                            *
     4093                            ** R<M. R<M+1.
     4094   01 00F36    FFFFFFF4 A   CLM04    DATA     -12
     4095   01 00F37    19C004A2              CLM,12   MEMORY
     4096   01 00F38    07300139              K        0,7,3,SETPSW
     4097   01 00F39    57300179              K        5,7,3,LOC+2
     4098   01 00F3A    80000000 A            DATA     X'80000000'
     4099   01 00F3B    80000000 A            DATA     X'80000000'
     4100   01 00F3C    80000001 A            DATA     X'80000001'
     4101   01 00F3D    80000001 A            DATA     X'80000001'
     4102   01 00F3E    00000000 A            DATA     0
     4103   01 00F3F    00000000 A            DATA     0
     4104   01 00F40    FFFFFFFF A            DATA     -1
     4105   01 00F41    FFFFFFFF A            DATA     -1
     4106                            *
     4107                            ** R>M. R>M+1
     4108   01 00F42    FFFFFFF4 A   CLM05    DATA     -12
     4109   01 00F43    19D2AD08 S            CLM,13   MEMORY-2*X'ABCD',1
     4110   01 00F44    07300139              K        0,7,3,SETPSW
     4111   01 00F45    A7300179              K        10,7,3,LOC+2
     4112   01 00F46    6789ABCD A            DATA     X'6789ABCD'
     4113   01 00F47    6789ABCD A            DATA     X'6789ABCD'
     4114   01 00F48    7FFFFFFE A            DATA     X'7FFFFFFE'
     4115   01 00F49    7FFFFFFE A            DATA     X'7FFFFFFE'
     4116   01 00F4A    7FFFFFFF A            DATA     X'7FFFFFFF'
     4117   01 00F4B    7FFFFFFF A            DATA     X'7FFFFFFF'
     4118   01 00F4C    FFFFFFFF A            DATA     -1
     4119   01 00F4D    FFFFFFFF A            DATA     -1
     4120                            *
     4121                            ** R = M.R > M+1
     4122   01 00F4E    FFFFFFF4 A   CLM06    DATA     -12
     4123   01 00F4F    19C004A3              CLM,12   MEMORY+1
     4124   01 00F50    77300139              K        7,7,3,SETPSW
     4125   01 00F51    87300179              K        8,7,3,LOC+2
     4126   01 00F52    02345678 A            DATA     X'2345678'
     4127   01 00F53    02345678 A            DATA     X'2345678'
     4128   01 00F54    02345678 A            DATA     X'2345678'
     4129   01 00F55    02345678 A            DATA     X'2345678'
     4130   01 00F56    00000000 A            DATA     0
     4131   01 00F57    00000000 A            DATA     0
     4132   01 00F58    02345677 A            DATA     X'2345677'
     4133   01 00F59    02345677 A            DATA     X'2345677'
     4134                            ** CHECK OVERFLOW NO TRAP
     4135   01 00F5A    FFFFFFFA A   MTW01    DATA     -6                MTW
     4136   01 00F5B    33F0000C A            MTW,15   12
     4137   01 00F5C    072001F4              K        0,7,2,FXPOSW
     4138   01 00F5D    E7200179              K        14,7,2,LOC+2
     4139   01 00F5E    80000000 A            DATA     X'80000000'
     4140   01 00F5F    7FFFFFFF A            DATA     X'7FFFFFFF'
     4141   01 00F60    FFFFFFFA A   MTW02    DATA     -6                MTW
     4142   01 00F61    3300000C A            MTW,0    12
     4143   01 00F62    07300139              K        0,7,3,SETPSW
     4144   01 00F63    17300179              K        1,7,3,LOC+2
     4145   01 00F64    80000000 A            DATA     X'80000000'
     4146   01 00F65    80000000 A            DATA     X'80000000'
     4147   01 00F66    FFFFFFF8 A   MTW03    DATA     -8                MTW  X
     4148   01 00F67    33D2122C S            MTW,13   MEMORY-X'1F276',1
     4149   01 00F68    77300139              K        7,7,3,SETPSW
     4150   01 00F69    87300179              K        8,7,3,LOC+2
     4151   01 00F6A    0001F276 A            DATA     X'1F276'
     4152   01 00F6B    0001F276 A            DATA     X'1F276'
     4153   01 00F6C    00000003 A            DATA     3
     4154   01 00F6D    00000000 A            DATA     0
     4155                            ** CHECK OVERFLOW TRAP
     4156   01 00F6E    FFFFFFF8 A   MTW04    DATA     -8                MTW *
     4157   01 00F6F    B310049C              MTW,1    *IA
     4158   01 00F70    073001F4              K        0,7,3,FXPOSW
     4159   01 00F71    57300084              K        5,7,3,FPORET+1
     4160   01 00F72    00000000 A            DATA     0
     4161   01 00F73    00000000 A            DATA     0
     4162   01 00F74    7FFFFFFF A            DATA     X'7FFFFFFF'
     4163   01 00F75    80000000 A            DATA     X'80000000'
     4164   01 00F76    FFFFFFF8 A   MTW05    DATA     -8                MTW
     4165   01 00F77    337004A2              MTW,7    MEMORY
     4166   01 00F78    F7300139              K        15,7,3,SETPSW
     4167   01 00F79    17300179              K        1,7,3,LOC+2
     4168   01 00F7A    FFFFFFFF A            DATA     -1
     4169   01 00F7B    FFFFFFFF A            DATA     -1
     4170   01 00F7C    FFFFFFF8 A            DATA     X'FFFFFFF8'
     4171   01 00F7D    FFFFFFFF A            DATA     -1
     4172   01 00F7E    FFFFFFFA A   MTH01    DATA     -6                MTH
     4173   01 00F7F    5300000C A            MTH,0    12
     4174   01 00F80    07300139              K        0,7,3,SETPSW
     4175   01 00F81    27300179              K        2,7,3,LOC+2
     4176   01 00F82    00010000 A            DATA     X'10000'
     4177   01 00F83    00010000 A            DATA     X'10000'
     4178   01 00F84    FFFFFFF8 A   MTH02    DATA     -8                MTH  X
     4179   01 00F85    5323C05E S            MTH,2    MEMORY-X'4444',1
     4180   01 00F86    77300139              K        7,7,3,SETPSW
     4181   01 00F87    87300179              K        8,7,3,LOC+2
     4182   01 00F88    00008889 A            DATA     X'8889'
     4183   01 00F89    00008889 A            DATA     X'8889'
     4184   01 00F8A    7FFFFFFE A            DATA     X'7FFFFFFE'
     4185   01 00F8B    7FFF0000 A            DATA     X'7FFF0000'
     4186                            ** CHECK OVERFLOW NO TRAP
     4187   01 00F8C    FFFFFFF8 A   MTH03    DATA     -8                MTH *
     4188   01 00F8D    D3E2049C              MTH,14   *IA,1
     4189   01 00F8E    172001F4              K        1,7,2,FXPOSW
     4190   01 00F8F    E7200179              K        14,7,2,LOC+2
     4191   01 00F90    00000001 A            DATA     1
     4192   01 00F91    00000001 A            DATA     1
     4193   01 00F92    FFFF8000 A            DATA     X'FFFF8000'
     4194   01 00F93    FFFF7FFE A            DATA     X'FFFF7FFE'
     4195                            ** CHECK OVERFLOW TRAP
     4196   01 00F94    FFFFFFF8 A   MTH04    DATA     -8                MTH  X
     4197   01 00F95    533204A2              MTH,3    MEMORY,1
     4198   01 00F96    273001F4              K        2,7,3,FXPOSW
     4199   01 00F97    57300084              K        5,7,3,FPORET+1
     4200   01 00F98    00000001 A            DATA     1
     4201   01 00F99    00000001 A            DATA     1
     4202   01 00F9A    7FFF7FFF A            DATA     X'7FFF7FFF'
     4203   01 00F9B    7FFF8002 A            DATA     X'7FFF8002'
     4204   01 00F9C    FFFFFFF8 A   MTH05    DATA     -8                MTH  X(X=0)
     4205   01 00F9D    539204A2              MTH,9    MEMORY,1
     4206   01 00F9E    F7300139              K        15,7,3,SETPSW
     4207   01 00F9F    97300179              K        9,7,3,LOC+2
     4208   01 00FA0    00000000 A            DATA     0
     4209   01 00FA1    00000000 A            DATA     0
     4210   01 00FA2    FFF979AB A            DATA     X'FFF979AB'
     4211   01 00FA3    FFF279AB A            DATA     X'FFF279AB'
     4212   01 00FA4    FFFFFFF8 A   MTB01    DATA     -8                MTB       BYTE 0
     4213   01 00FA5    730004A2              MTB,0    MEMORY
     4214   01 00FA6    F7300139              K        15,7,3,SETPSW
     4215   01 00FA7    07300179              K        0,7,3,LOC+2
     4216   01 00FA8    00000000 A            DATA     0
     4217   01 00FA9    00000000 A            DATA     0
     4218   01 00FAA    00FFFFFF A            DATA     X'FFFFFF'
     4219   01 00FAB    00FFFFFF A            DATA     X'FFFFFF'
     4220   01 00FAC    FFFFFFF8 A   MTB02    DATA     -8                MTB  X    BYTE 1
     4221   01 00FAD    73C204A2              MTB,12   MEMORY,1
     4222   01 00FAE    F7300139              K        15,7,3,SETPSW
     4223   01 00FAF    A7300179              K        10,7,3,LOC+2
     4224   01 00FB0    00000001 A            DATA     1
     4225   01 00FB1    00000001 A            DATA     1
     4226   01 00FB2    F0F5F300 A            DATA     X'F0F5F300'
     4227   01 00FB3    F0F1F300 A            DATA     X'F0F1F300'
     4228   01 00FB4    FFFFFFF8 A   MTB03    DATA     -8                MTB *X    BYTE 2
     4229   01 00FB5    F342049C              MTB,4    *IA,1
     4230   01 00FB6    07300139              K        0,7,3,SETPSW
     4231   01 00FB7    A7300179              K        10,7,3,LOC+2
     4232   01 00FB8    00000002 A            DATA     2
     4233   01 00FB9    00000002 A            DATA     2
     4234   01 00FBA    F0F9FF03 A            DATA     X'F0F9FF03'
     4235   01 00FBB    F0F90303 A            DATA     X'F0F90303'
     4236   01 00FBC    FFFFFFF8 A   MTB04    DATA     -8                MTH  X    BYTE 3
     4237   01 00FBD    73B204A2              MTB,11   MEMORY,1
     4238   01 00FBE    77300139              K        7,7,3,SETPSW
     4239   01 00FBF    87300179              K        8,7,3,LOC+2
     4240   01 00FC0    00000003 A            DATA     3
     4241   01 00FC1    00000003 A            DATA     3
     4242   01 00FC2    FFFFFF05 A            DATA     X'FFFFFF05'
     4243   01 00FC3    FFFFFF00 A            DATA     -256
     4244   01 00FC4    FFFFFFFA A   MTB05    DATA     -6                MTB       BYTE 1
     4245   01 00FC5    738E000C A            MTB,8    12,7
     4246   01 00FC6    77300139              K        7,7,3,SETPSW
     4247   01 00FC7    87300179              K        8,7,3,LOC+2
     4248   01 00FC8    FF08FFFF A            DATA     X'FF08FFFF'
     4249   01 00FC9    FF00FFFF A            DATA     X'FF00FFFF'
     4250   01 00FCA    FFFFFFFA A   MTB06    DATA     -6                MTB       BYTE 2
     4251   01 00FCB    7352014C A            MTB,5    X'1FFFF'&(X'C'-X'1FEC0'),1
     4252   01 00FCC    07300139              K        0,7,3,SETPSW
     4253   01 00FCD    87300179              K        8,7,3,LOC+2
     4254   01 00FCE    FFFFFB02 A            DATA     X'FFFFFB02'
     4255   01 00FCF    FFFF0002 A            DATA     X'FFFF0002'
     4256   01 00FD0    FFFFFFFA A   MTB07    DATA     -6                MTB       BYTE 0
     4257   01 00FD1    73A0000C A            MTB,10   12
     4258   01 00FD2    37300139              K        3,7,3,SETPSW
     4259   01 00FD3    87300179              K        8,7,3,LOC+2
     4260   01 00FD4    06123457 A            DATA     X'6123457'
     4261   01 00FD5    00123457 A            DATA     X'123457'
     4262   01 00FD6    FFFFFFFA A   MTB08    DATA     -6
     4263   01 00FD7    7360000C A            MTB,6    12
     4264   01 00FD8    57300139              K        5,7,3,SETPSW
     4265   01 00FD9    27300179              K        2,7,3,LOC+2
     4266   01 00FDA    00000000 A            DATA     0
     4267   01 00FDB    06000000 A            DATA     X'6000000'
     4268   01 00FDC    FFFFFFF8 A   AH01     DATA     -8                AH
     4269   01 00FDD    50C004A2              AH,12    MEMORY
     4270   01 00FDE    673001F4              K        6,7,3,FXPOSW
     4271   01 00FDF    97300179              K        9,7,3,LOC+2
     4272   01 00FE0    FFFF7654 A            DATA     X'FFFF7654'
     4273   01 00FE1    FFFEFFFF A            DATA     X'FFFEFFFF'
     4274   01 00FE2    89AB0000 A            DATA     X'89AB0000'
     4275   01 00FE3    89AB0000 A            DATA     X'89AB0000'
     4276   01 00FE4    FFFFFFF8 A   AH02     DATA     -8                AH  X
     4277   01 00FE5    50CE04A2              AH,12    MEMORY,7
     4278   01 00FE6    573001F4              K        5,7,3,FXPOSW
     4279   01 00FE7    27300179              K        2,7,3,LOC+2
     4280   01 00FE8    7FFFDCBB A            DATA     X'7FFFDCBB'
     4281   01 00FE9    7FFFFFFF A            DATA     X'7FFFFFFF'
     4282   01 00FEA    23452344 A            DATA     X'23452344'
     4283   01 00FEB    23452344 A            DATA     X'23452344'
     4284   01 00FEC    FFFFFFF8 A   AH03     DATA     -8                AH *
     4285   01 00FED    D0CE049C              AH,12    *IA,7
     4286   01 00FEE    072001F4              K        0,7,2,FXPOSW
     4287   01 00FEF    E7200179              K        14,7,2,LOC+2
     4288   01 00FF0    80000000 A            DATA     X'80000000'
     4289   01 00FF1    7FFFFFFF A            DATA     X'7FFFFFFF'
     4290   01 00FF2    7FFFFFFF A            DATA     X'7FFFFFFF'
     4291   01 00FF3    7FFFFFFF A            DATA     X'7FFFFFFF'
     4292   01 00FF4    FFFFFFFA A   AH04     DATA     -6                AH
     4293   01 00FF5    50C0000C A            AH,12    12
     4294   01 00FF6    273001F4              K        2,7,3,FXPOSW
     4295   01 00FF7    57300084              K        5,7,3,FPORET+1
     4296   01 00FF8    7FFF8001 A            DATA     X'7FFF8001'
     4297   01 00FF9    80000000 A            DATA     X'80000000'
     4298   01 00FFA    FFFFFFFA A   AI01     DATA     -6                AI
     4299   01 00FFB    20C70000 A            AI,12    X'70000'
     4300   01 00FFC    773001F4              K        7,7,3,FXPOSW
     4301   01 00FFD    17300179              K        1,7,3,LOC+2
     4302   01 00FFE    80000000 A            DATA     X'80000000'
     4303   01 00FFF    80070000 A            DATA     X'80070000'
     4304   01 01000    FFFFFFFA A   AI02     DATA     -6                AI
     4305   01 01001    20C80000 A            AI,12    X'80000'
     4306   01 01002    173001F4              K        1,7,3,FXPOSW
     4307   01 01003    E7300084              K        14,7,3,FPORET+1
     4308   01 01004    80000000 A            DATA     X'80000000'
     4309   01 01005    7FF80000 A            DATA     X'7FF80000'
     4310   01 01006    FFFFFFFC A   AI03     DATA     -4                AI *
     4311   01 01007    A0C0049C              AI,12    *IA
     4312   01 01008    173001E9              K        1,7,3,RI9NAO
     4313   01 01009    97300063              K        9,7,3,NAORET+1
     4314   01 0100A    FFFFFFF4 A   AD01     DATA     -12               AD
     4315   01 0100B    10C004A2              AD,12    MEMORY
     4316   01 0100C    773001F4              K        7,7,3,FXPOSW
     4317   01 0100D    87300179              K        8,7,3,LOC+2
     4318   01 0100E    FFFFFFFF A            DATA     -1
     4319   01 0100F    00000000 A            DATA     0
     4320   01 01010    00000000 A            DATA     0
     4321   01 01011    00000000 A            DATA     0
     4322   01 01012    FFFFFFFF A            DATA     -1
     4323   01 01013    00000000 A            DATA     0
     4324   01 01014    00000001 A            DATA     1
     4325   01 01015    00000001 A            DATA     1
     4326   01 01016    FFFFFFF4 A   AD02     DATA     -12               AD  X     OF   TRAP
     4327   01 01017    10C204A4              AD,12    MEMORY+2,1
     4328   01 01018    273001F4              K        2,7,3,FXPOSW
     4329   01 01019    57300084              K        5,7,3,FPORET+1
     4330   01 0101A    7FFFFFFF A            DATA     X'7FFFFFFF'
     4331   01 0101B    80000000 A            DATA     X'80000000'
     4332   01 0101C    00000000 A            DATA     0
     4333   01 0101D    00000000 A            DATA     0
     4334   01 0101E    FFFFFFFF A            DATA     -1
     4335   01 0101F    00000000 A            DATA     0
     4336   01 01020    00000001 A            DATA     1
     4337   01 01021    00000001 A            DATA     1
     4338   01 01022    FFFFFFF4 A   AD03     DATA     -12               AD *      OF  NTRAP
     4339   01 01023    90C0049C              AD,12    *IA
     4340   01 01024    172001F4              K        1,7,2,FXPOSW
     4341   01 01025    E7200179              K        14,7,2,LOC+2
     4342   01 01026    87654321 A            DATA     X'87654321'
     4343   01 01027    7FFFFFFF A            DATA     X'7FFFFFFF'
     4344   01 01028    F89ABCDE A            DATA     X'F89ABCDE'
     4345   01 01029    F89ABCDE A            DATA     X'F89ABCDE'
     4346   01 0102A    0FEDCBA9 A            DATA     X'0FEDCBA9'
     4347   01 0102B    FFFFFFFF A            DATA     -1
     4348   01 0102C    F0123456 A            DATA     X'F0123456'
     4349   01 0102D    F0123456 A            DATA     X'F0123456'
     4350   01 0102E    FFFFFFF4 A   AD04     DATA     -12               AD    MO    TRAP
     4351   01 0102F    10C004A3              AD,12    MEMORY+1
     4352   01 01030    F73001F4              K        15,7,3,FXPOSW
     4353   01 01031    17300179              K        1,7,3,LOC+2
     4354   01 01032    83759624 A            DATA     X'83759624'
     4355   01 01033    F5D02CDA A            DATA     X'F5D02CDA'
     4356   01 01034    725A96B5 A            DATA     X'725A96B5'
     4357   01 01035    725A96B5 A            DATA     X'725A96B5'
     4358   01 01036    F65219AC A            DATA     X'F65219AC'
     4359   01 01037    2FA47D20 A            DATA     X'2FA47D20'
     4360   01 01038    39526374 A            DATA     X'39526374'
     4361   01 01039    39526374 A            DATA     X'39526374'
     4362                            ** CHECK THAT OVERFLOW OF LSW DOES NOT CAUSE AN OVERFLOW
     4363   01 0103A    FFFFFFF4 A   AD05     DATA     -12
     4364   01 0103B    10C004A2              AD,12    MEMORY
     4365   01 0103C    07300139              K        0,7,3,SETPSW
     4366   01 0103D    27300179              K        2,7,3,LOC+2
     4367   01 0103E    00000000 A            DATA     0,0,0,0,X'40000000',X'80000000'
            01 0103F    00000000 A
            01 01040    00000000 A
            01 01041    00000000 A
            01 01042    40000000 A
            01 01043    80000000 A
     4368   01 01044    40000000 A            DATA     X'40000000',X'40000000'
            01 01045    40000000 A
     4369                            ** CHECK  K15= PR16-31.K31, K19= PR20-31.K31, K23=PR24-31.K31
     4370                            ** K27 = PR2831.K31
     4371   01 01046    FFFFFFF4 A   AD06     DATA     -12
     4372   01 01047    10C004A2              AD,12    MEMORY
     4373   01 01048    07300139              K        0,7,3,SETPSW
     4374   01 01049    27300179              K        2,7,3,LOC+2
     4375   01 0104A    00000000 A            DATA     0,X'10000',X'FFFF',X'FFFF'
            01 0104B    00010000 A
            01 0104C    0000FFFF A
            01 0104D    0000FFFF A
     4376   01 0104E    80000000 A            DATA     X'80000000',0,X'80000000',X'80000000'
            01 0104F    00000000 A
            01 01050    80000000 A
            01 01051    80000000 A
     4377                            ** CHECK  THAT AWM GENERATES PROBEOVER TO CHECK FOR OVERFLOW AND CAUSE
     4378                            ** A TRAP
     4379   01 01052    FFFFFFF8 A   AWM01    DATA     -8                AWM OF  TRAP
     4380   01 01053    66C004A2              AWM,12   MEMORY
     4381   01 01054    273001F4              K        2,7,3,FXPOSW
     4382   01 01055    57300084              K        5,7,3,FPORET+1
     4383   01 01056    2375694B A            DATA     X'2375694B'
     4384   01 01057    2375694B A            DATA     X'2375694B'
     4385   01 01058    7235641C A            DATA     X'7235641C'
     4386   01 01059    95AACD67 A            DATA     X'95AACD67'
     4387   01 0105A    FFFFFFF8 A   AWM02    DATA     -8                AWM  X
     4388   01 0105B    66C26E2D S            AWM,12   MEMORY-X'19675',1
     4389   01 0105C    F73001F4              K        15,7,3,FXPOSW
     4390   01 0105D    A7300179              K        10,7,3,LOC+2
     4391   01 0105E    F3219675 A            DATA     X'F3219675'
     4392   01 0105F    F3219675 A            DATA     X'F3219675'
     4393   01 01060    691ABCDE A            DATA     X'691ABCDE'
     4394   01 01061    5C3C5353 A            DATA     X'5C3C5353'
     4395   01 01062    FFFFFFF8 A   AWM03    DATA     -8                AWM *
     4396   01 01063    E6C0049C              AWM,12   *IA
     4397   01 01064    773001F4              K        7,7,3,FXPOSW
     4398   01 01065    87300179              K        8,7,3,LOC+2
     4399   01 01066    00000007 A            DATA     7
     4400   01 01067    00000007 A            DATA     7
     4401   01 01068    FFFFFFF9 A            DATA     -7
     4402   01 01069    00000000 A            DATA     0
     4403                            ** AWM WITH IX AND IA
     4404   01 0106A    FFFFFFF4 A   AWM04    DATA     -12
     4405   01 0106B    E6CE049C              AWM,12   *IA,7
     4406   01 0106C    F0000139              K        15,0,0,SETPSW
     4407   01 0106D    20000179              K        2,0,0,LOC+2
     4408   01 0106E    00000007 A            DATA     7,7,MEMORY,MEMORY,-1,-1,1,8
            01 0106F    00000007 A
            01 01070    000004A2
            01 01071    000004A2
            01 01072    FFFFFFFF A
            01 01073    FFFFFFFF A
            01 01074    00000001 A
            01 01075    00000008 A
     4409   01 01076    FFFFFFF8 A   SH01     DATA     -8                SH        OF   NTRAP
     4410   01 01077    58C004A2              SH,12    MEMORY
     4411   01 01078    072001F4              K        0,7,2,FXPOSW
     4412   01 01079    E7200179              K        14,7,2,LOC+2
     4413   01 0107A    80003946 A            DATA     X'80003946'
     4414   01 0107B    7FFFFFFF A            DATA     X'7FFFFFFF'
     4415   01 0107C    3947F261 A            DATA     X'3947F261'
     4416   01 0107D    3947F261 A            DATA     X'3947F261'
     4417   01 0107E    FFFFFFF8 A   SH02     DATA     -8                SH  X     OF   TRAP
     4418   01 0107F    58CE04A2              SH,12    MEMORY,7
     4419   01 01080    773001F4              K        7,7,3,FXPOSW
     4420   01 01081    57300084              K        5,7,3,FPORET+1
     4421   01 01082    7FFFB375 A            DATA     X'7FFFB375'
     4422   01 01083    80002B34 A            DATA     X'80002B34'
     4423   01 01084    7FFF8841 A            DATA     X'7FFF8841'
     4424   01 01085    7FFF8841 A            DATA     X'7FFF8841'
     4425   01 01086    FFFFFFF8 A   SH03     DATA     -8                SH *X
     4426   01 01087    D8CE049C              SH,12    *IA,7
     4427   01 01088    07300139              K        0,7,3,SETPSW
     4428   01 01089    87300179              K        8,7,3,LOC+2
     4429   01 0108A    00000000 A            DATA     0
     4430   01 0108B    00000000 A            DATA     0
     4431   01 0108C    FFFF0000 A            DATA     X'FFFF0000'
     4432   01 0108D    FFFF0000 A            DATA     X'FFFF0000'
     4433   01 0108E    FFFFFFF4 A   SD01     DATA     -12               SD
     4434   01 0108F    18C004A2              SD,12    MEMORY
     4435   01 01090    07300139              K        0,7,3,SETPSW
     4436   01 01091    17300179              K        1,7,3,LOC+2
     4437   01 01092    37562981 A            DATA     X'37562981'
     4438   01 01093    FFFFFFFF A            DATA     -1
     4439   01 01094    37562981 A            DATA     X'37562981'
     4440   01 01095    37562981 A            DATA     X'37562981'
     4441   01 01096    854BA76C A            DATA     X'854BA76C'
     4442   01 01097    FFFFFFFF A            DATA     -1
     4443   01 01098    854BA76D A            DATA     X'854BA76D'
     4444   01 01099    854BA76D A            DATA     X'854BA76D'
     4445   01 0109A    FFFFFFF4 A   SD02     DATA     -12               SD *      OF    TRAP
     4446   01 0109B    98C0049C              SD,12    *IA
     4447   01 0109C    173001F4              K        1,7,3,FXPOSW
     4448   01 0109D    E7300084              K        14,7,3,FPORET+1
     4449   01 0109E    80000000 A            DATA     X'80000000'
     4450   01 0109F    7FFFFFFF A            DATA     X'7FFFFFFF'
     4451   01 010A0    00000000 A            DATA     0
     4452   01 010A1    00000000 A            DATA     0
     4453   01 010A2    00000000 A            DATA     0
     4454   01 010A3    FFFFFFFF A            DATA     -1
     4455   01 010A4    00000001 A            DATA     1
     4456   01 010A5    00000001 A            DATA     1
     4457   01 010A6    FFFFFFF4 A   SD03     DATA     -12               SD  X
     4458   01 010A7    18C357B2 S            SD,12    MEMORY-X'ACF0',1
     4459   01 010A8    573001F4              K        5,7,3,FXPOSW
     4460   01 010A9    A7300179              K        10,7,3,LOC+2
     4461   01 010AA    12345678 A            DATA     X'12345678'
     4462   01 010AB    00000000 A            DATA     0
     4463   01 010AC    12345678 A            DATA     X'12345678'
     4464   01 010AD    12345678 A            DATA     X'12345678'
     4465   01 010AE    9ABCDEF1 A            DATA     X'9ABCDEF1'
     4466   01 010AF    00000001 A            DATA     1
     4467   01 010B0    9ABCDEF0 A            DATA     X'9ABCDEF0'
     4468   01 010B1    9ABCDEF0 A            DATA     X'9ABCDEF0'
     4469   01 010B2    FFFFFFF4 A   SD04     DATA     -12               SD    MO  OF    TRAP
     4470   01 010B3    18C004A3              SD,12    MEMORY+1
     4471   01 010B4    F73001F4              K        15,7,3,FXPOSW
     4472   01 010B5    57300084              K        5,7,3,FPORET+1
     4473   01 010B6    798436AB A            DATA     X'798436AB'
     4474   01 010B7    F54ABF33 A            DATA     X'F54ABF33'
     4475   01 010B8    84397777 A            DATA     X'84397777'
     4476   01 010B9    84397777 A            DATA     X'84397777'
     4477   01 010BA    E319C566 A            DATA     X'E319C566'
     4478   01 010BB    EC87B211 A            DATA     X'EC87B211'
     4479   01 010BC    F6921355 A            DATA     X'F6921355'
     4480   01 010BD    F6921355 A            DATA     X'F6921355'
     4481                            ** LOGICAL SHIFT LEFT OF 31. CHECKS THAT ALL SET AND RESET INPUTS
     4482                            ** EXCEPTING BIT 0 AND 31 WORK PROPERLY
     4483   01 010BE    FFFFFFF6 A   S001     DATA     -10
     4484   01 010BF    25C0001F A            S,12     31
     4485   01 010C0    F7300139              K        15,7,3,SETPSW
     4486   01 010C1    77300179              K        7,7,3,LOC+2
     4487   01 010C2    00000001 A            DATA     1,X'80000000',-1,-1,-1,-1
            01 010C3    80000000 A
            01 010C4    FFFFFFFF A
            01 010C5    FFFFFFFF A
            01 010C6    FFFFFFFF A
            01 010C7    FFFFFFFF A
     4488                            ** ARITH SHIFT LEFT. VERIFIES BIT 0  AND EVEN PARITY. SHIFT OF 8
     4489   01 010C8    FFFFFFF6 A   S002     DATA     -10
     4490   01 010C9    25C00408 A            S,12     X'408'
     4491   01 010CA    80000139              K        8,0,0,SETPSW
     4492   01 010CB    40000179              K        4,0,0,LOC+2
     4493   01 010CC    C3A53C5A A            DATA     X'C3A53C5A',X'A53C5A00',0,0,-1,-1
            01 010CD    A53C5A00 A
            01 010CE    00000000 A
            01 010CF    00000000 A
            01 010D0    FFFFFFFF A
            01 010D1    FFFFFFFF A
     4494                            ** LOGICAL SHIFT LEFT DOUBLE.  CHECK B REG INPUTS. SHIFT OF 33 BITS
     4495   01 010D2    FFFFFFF6 A   S003     DATA     -10
     4496   01 010D3    25C00121 A            S,12     X'121'
     4497   01 010D4    C0000139              K        12,0,0,SETPSW
     4498   01 010D5    00000179              K        0,0,0,LOC+2
     4499   01 010D6    00000000 A            DATA     0,2,-1,-1,1,0
            01 010D7    00000002 A
            01 010D8    FFFFFFFF A
            01 010D9    FFFFFFFF A
            01 010DA    00000001 A
            01 010DB    00000000 A
     4500                            ** LOGICAL SHIFT LEFT DOUBLE. PARITY ODD. SHIFT OF 12 BITS
     4501   01 010DC    FFFFFFF6 A   S004     DATA     -10
     4502   01 010DD    25C0010C A            S,12     X'10C'
     4503   01 010DE    07300139              K        0,7,3,SETPSW
     4504   01 010DF    C7300179              K        12,7,3,LOC+2
     4505   01 010E0    B5C35A3C A            DATA     X'B5C35A3C',X'35A3C3CA',0,0,X'3CA5C35A',X'5C35A000'
            01 010E1    35A3C3CA A
            01 010E2    00000000 A
            01 010E3    00000000 A
            01 010E4    3CA5C35A A
            01 010E5    5C35A000 A
     4506                            ** CYCLICAL SHIFT LEFT SINGLE. SHIFT 16 BITS
     4507   01 010E6    FFFFFFF6 A   S005     DATA     -10
     4508   01 010E7    25C00210 A            S,12     X'210'
     4509   01 010E8    00000139              K        0,0,0,SETPSW
     4510   01 010E9    40000179              K        4,0,0,LOC+2
     4511   01 010EA    3CA5C35A A            DATA     X'3CA5C35A',X'C35A3CA5',0,0,X'FFFF',X'FFFF'
            01 010EB    C35A3CA5 A
            01 010EC    00000000 A
            01 010ED    00000000 A
            01 010EE    0000FFFF A
            01 010EF    0000FFFF A
     4512                            ** CYCLICAL SHIFT LEFT SINGLE. ODD REGISTER. SHIFT 16 BITS
     4513   01 010F0    FFFFFFF6 A   S006     DATA     -10
     4514   01 010F1    25D00210 A            S,13     X'210'
     4515   01 010F2    00000139              K        0,0,0,SETPSW
     4516   01 010F3    40000179              K        4,0,0,LOC+2
     4517   01 010F4    A5A5C3C3 A            DATA     X'A5A5C3C3',X'A5A5C3C3',-1,-1,X'C53AA3C5',X'A3C5C53A'
            01 010F5    A5A5C3C3 A
            01 010F6    FFFFFFFF A
            01 010F7    FFFFFFFF A
            01 010F8    C53AA3C5 A
            01 010F9    A3C5C53A A
     4518                            ** CYCLICAL LEFT SHIFT DOUBLE. SWAP R WITH RU1 (32 BIT SHIFT)
     4519   01 010FA    FFFFFFF6 A   S007     DATA     -10
     4520   01 010FB    25C00320 A            S,12     X'320'
     4521   01 010FC    F7300139              K        15,7,3,SETPSW
     4522   01 010FD    77300179              K        7,7,3,LOC+2
     4523   01 010FE    EDB77BDE A            DATA     X'EDB77BDE',X'A53C5AC3',0,0,X'A53C5AC3',X'EDB77BDE'
            01 010FF    A53C5AC3 A
            01 01100    00000000 A
            01 01101    00000000 A
            01 01102    A53C5AC3 A
            01 01103    EDB77BDE A
     4524                            ** CYCLICAL LEFT SHIFT DOUBLE. SHIFT OF MAX COUNT (EQUIVALENT TO SHIFT
     4525                            ** RIGHT CYCLICAL BY 1 BIT)
     4526   01 01104    FFFFFFF6 A   S008     DATA     -10
     4527   01 01105    25C0033F A            S,12     X'33F'
     4528   01 01106    07300139              K        0,7,3,SETPSW
     4529   01 01107    47300179              K        4,7,3,LOC+2
     4530   01 01108    5A5A5A5A A            DATA     X'5A5A5A5A',X'2D2D2D2D',0,0,X'5A5A5A5A',X'2D2D2D2D'
            01 01109    2D2D2D2D A
            01 0110A    00000000 A
            01 0110B    00000000 A
            01 0110C    5A5A5A5A A
            01 0110D    2D2D2D2D A
     4531                            ** LOGICAL SHIFT RIGHT. ODD REGISTER. TEST SET OF ODD BITS. SHIFT OF 31
     4532   01 0110E    FFFFFFF6 A   S009     DATA     -10
     4533   01 0110F    25D00061 A            S,13     X'61'
     4534   01 01110    F7300139              K        15,7,3,SETPSW
     4535   01 01111    37300179              K        3,7,3,LOC+2
     4536   01 01112    00000000 A            DATA     0,0,0,0,X'80000000',1
            01 01113    00000000 A
            01 01114    00000000 A
            01 01115    00000000 A
            01 01116    80000000 A
            01 01117    00000001 A
     4537                            ** LOGICAL SHIFT RIGHT. TEST SET OF EVEN BIT POSITIONS. SHIFT OF 30
     4538   01 01118    FFFFFFFA A   S010     DATA     -6
     4539   01 01119    25C00062 A            S,12     X'62'
     4540   01 0111A    00000139              K        0,0,0,SETPSW
     4541   01 0111B    00000179              K        0,0,0,LOC+2
     4542   01 0111C    80000000 A            DATA     X'80000000',2
            01 0111D    00000002 A
     4543                            ** ARITH SHIFT RIGHT. FILL WITH ONES. SHIFT OF 12 BITS
     4544   01 0111E    FFFFFFFA A   S011     DATA     -6
     4545   01 0111F    25C00474 A            S,12     X'474'
     4546   01 01120    00000139              DATA     SETPSW,LOC+2,X'A5A5A5A5',X'FFFA5A5A'
            01 01121    00000179
            01 01122    A5A5A5A5 A
            01 01123    FFFA5A5A A
     4547                            ** ARITH SHIFT RIGHT. FILL WITH ZEROES. DOUBLE REG. SHIFT OF 34 BITS
     4548                            ** CHECKS SET OF ODD B REG BITS
     4549   01 01124    FFFFFFF6 A   S012     DATA     -10
     4550   01 01125    25C0055E A            S,12     X'55E'
     4551   01 01126    00000139              DATA     SETPSW,LOC+2,5,0,7,7,0,1
            01 01127    00000179
            01 01128    00000005 A
            01 01129    00000000 A
            01 0112A    00000007 A
            01 0112B    00000007 A
            01 0112C    00000000 A
            01 0112D    00000001 A
     4552                            ** ARITH SHIFT RIGHT. FILL WITH ONES. DOUBLE REG. SHIFT OF 31 BITS
     4553   01 0112E    FFFFFFF6 A   S013     DATA     -10
     4554   01 0112F    25C00561 A            S,12     X'561'
     4555   01 01130    00000139              DATA     SETPSW,LOC+2,X'C3C3C3C3',-1,0,0,X'80005AC3'
            01 01131    00000179
            01 01132    C3C3C3C3 A
            01 01133    FFFFFFFF A
            01 01134    00000000 A
            01 01135    00000000 A
            01 01136    80005AC3 A
     4556   01 01137    87878787 A            DATA     X'87878787'
     4557                            ** CIRCULAR RIGHT SHIFT SINGLE REG.   13 BITS
     4558   01 01138    FFFFFFFA A   S014     DATA     -6
     4559   01 01139    25C00273 A            S,12     X'273'
     4560   01 0113A    00000139              DATA     SETPSW,LOC+2,X'A5A5A5A5',X'2D2D2D2D'
            01 0113B    00000179
            01 0113C    A5A5A5A5 A
            01 0113D    2D2D2D2D A
     4561                            ** CIRCULAR RIGHT SHIFT SINGLE REGISTER.  13 BITS
     4562   01 0113E    FFFFFFFA A   S015     DATA     -6
     4563   01 0113F    25C00273 A            S,12     X'273'
     4564   01 01140    00000139              DATA     SETPSW,LOC+2,X'5A5A5A5A',X'D2D2D2D2'
            01 01141    00000179
            01 01142    5A5A5A5A A
            01 01143    D2D2D2D2 A
     4565                            ** CIRCULAR LEFT SHIFT SINGLE REGISTER  13 BITS.
     4566   01 01144    FFFFFFFA A   SO14A    DATA     -6
     4567   01 01145    25C0020D A            SCS,12   13
     4568   01 01146    00000139              DATA     SETPSW
     4569   01 01147    40000179              K        4,,,LOC+2
     4570   01 01148    A5A5A5A5 A           DATA     X'A5A5A5A5',X'B4B4B4B4'
            01 01149    B4B4B4B4 A
     4571                            ** CIRCULAR LEFT SHIFT SINGLE REGISTER  13 BITS.
     4572   01 0114A    FFFFFFFA A   SO15A    DATA     -6
     4573   01 0114B    25C0020D A            SCS,12   13
     4574   01 0114C    00000139              DATA     SETPSW
     4575   01 0114D    C0000179              K      12,,,LOC+2
     4576   01 0114E    5A5A5A5A A            DATA     X'5A5A5A5A',X'4B4B4B4B'
            01 0114F    4B4B4B4B A
     4577                            ** CIRCULAR RIGHT SHIFT DOUBLE REGISTER  13 BITS
     4578   01 01150    FFFFFFF6 A   S016     DATA     -10
     4579   01 01151    25C00373 A            S,12     X'373'
     4580   01 01152    00000139              DATA     SETPSW,LOC+2,X'CA35CA35',X'2D2E51AE',0,0
            01 01153    00000179
            01 01154    CA35CA35 A
            01 01155    2D2E51AE A
            01 01156    00000000 A
            01 01157    00000000 A
     4581   01 01158    A5A5A5A5 A            DATA     X'A5A5A5A5',X'51AD2D2D'
            01 01159    51AD2D2D A
     4582                            ** CIRCULAR RIGHT SHIFT DOUBLE REGISTER.  13 BITS
     4583   01 0115A    FFFFFFF6 A   S017     DATA     -10
     4584   01 0115B    25C00373 A            S,12     X'373'
     4585   01 0115C    00000139              DATA     SETPSW,LOC+2,X'5C3A35AC',X'D2D2E1D1',0,0
            01 0115D    00000179
            01 0115E    5C3A35AC A
            01 0115F    D2D2E1D1 A
            01 01160    00000000 A
            01 01161    00000000 A
     4586   01 01162    5A5A5A5A A            DATA     X'5A5A5A5A',X'AD62D2D2'
            01 01163    AD62D2D2 A
     4587                            ** CIRCULAR RIGHT SHIFT. IA. ODD REG. MAX SHIFT COUNT OF 64
     4588   01 01164    FFFFFFF6 A   S018     DATA     -10
     4589   01 01165    A5D004A2              S,13     *MEMORY
     4590   01 01166    00000139              DATA     SETPSW,LOC+2,-1,-1,X'340',X'340',1,1
            01 01167    00000179
            01 01168    FFFFFFFF A
            01 01169    FFFFFFFF A
            01 0116A    00000340 A
            01 0116B    00000340 A
            01 0116C    00000001 A
            01 0116D    00000001 A
     4591                            ** ARITH RIGHT SHIFT. INDEXING. SHIFT OF 1
     4592   01 0116E    FFFFFFF8 A   S019     DATA     -8
     4593   01 0116F    25C2FFCF A            S,12     X'FFCF',1
     4594   01 01170    00000139              DATA     SETPSW,LOC+2
            01 01171    00000179
     4595   01 01172    00000430 A            DATA     X'430',X'218',X'FFF4F',X'FFF4F'
            01 01173    00000218 A
            01 01174    000FFF4F A
            01 01175    000FFF4F A
     4596                            ** ARITH LEFT SHIFT.  IA AND IX.  SHIFT OF 0
     4597   01 01176    FFFFFFF8 A   S020     DATA     -8
     4598   01 01177    A5CE000C A            S,12     *12,7
     4599   01 01178    00000139              DATA     SETPSW,LOC+2,X'47F',X'47F',1,1
            01 01179    00000179
            01 0117A    0000047F A
            01 0117B    0000047F A
            01 0117C    00000001 A
            01 0117D    00000001 A
     4600                            **** THE REMAINING SHIFT TESTS ARE REDUNDANT BUT MAY AID IN UNCOVERING
     4601                            **** PATTERN SENSITIVE FAILURE MODES
     4602   01 0117E    FFFFFFFA A   S01      DATA     -6                ALS  1    OF SL1 ALT 1'S + 0'S
     4603   01 0117F    25C00401 A            S,12     X'401'            0 INTO A31
     4604   01 01180    073001F4              K        0,7,3,FXPOSW      OVF 01
     4605   01 01181    47300179              K        4,7,3,LOC+2
     4606   01 01182    55555555 A            DATA     X'55555555'
     4607   01 01183    AAAAAAAA A            DATA     X'AAAAAAAA'
     4608   01 01184    FFFFFFFA A   S02      DATA     -6                ALS  1
     4609   01 01185    25C00401 A            S,12     X'401'
     4610   01 01186    373001F4              K        3,7,3,FXPOSW
     4611   01 01187    F7300179              K        15,7,3,LOC+2
     4612   01 01188    AAAAAAAA A            DATA     X'AAAAAAAA'
     4613   01 01189    55555554 A            DATA     X'55555554'
     4614   01 0118A    FFFFFFFA A   S03      DATA     -6                ALS  4       SL4 ALT 1'S + 0'S
     4615   01 0118B    25C00404 A            S,12     X'404'            PARITY 1111
     4616   01 0118C    373001F4              K        3,7,3,FXPOSW      OVF 10
     4617   01 0118D    77300179              K        7,7,3,LOC+2
     4618   01 0118E    F0F0F0F0 A            DATA     X'F0F0F0F0'
     4619   01 0118F    0F0F0F00 A            DATA     X'0F0F0F00'
     4620   01 01190    FFFFFFFA A   S04      DATA     -6                ALS  4
     4621   01 01191    25C00404 A            S,12     X'404'            PARITY 0000
     4622   01 01192    F73001F4              K        15,7,3,FXPOSW
     4623   01 01193    77300179              K        7,7,3,LOC+2
     4624   01 01194    0F0F0F0F A            DATA     X'0F0F0F0F'
     4625   01 01195    F0F0F0F0 A            DATA     X'F0F0F0F0'
     4626   01 01196    FFFFFFFA A   S05      DATA     -6                ALS  0       SUIFT 0
     4627   01 01197    25C00400 A            S,12     X'400'
     4628   01 01198    F7300139              K        15,7,3,SETPSW
     4629   01 01199    37300179              K        3,7,3,LOC+2
     4630   01 0119A    40000000 A            DATA     X'40000000'
     4631   01 0119B    40000000 A            DATA     X'40000000'
     4632   01 0119C    FFFFFFFA A   S06      DATA     -6                ALS  2     2-SL1
     4633   01 0119D    25C00402 A            S,12     X'402'
     4634   01 0119E    07300139              K        0,7,3,SETPSW
     4635   01 0119F    47300179              K        4,7,3,LOC+2
     4636   01 011A0    D2345678 A            DATA     X'D2345678'
     4637   01 011A1    48D159E0 A            DATA     X'48D159E0'
     4638   01 011A2    FFFFFFF8 A   S07      DATA     -8                ALS  3 *   3-SL1
     4639   01 011A3    A5C004A2              S,12     *MEMORY
     4640   01 011A4    37300139              K        3,7,3,SETPSW
     4641   01 011A5    B7300179              K        11,7,3,LOC+2
     4642   01 011A6    F2345678 A            DATA     X'F2345678'
     4643   01 011A7    91A2B3C0 A            DATA     X'91A2B3C0'
     4644   01 011A8    00000403 A            DATA     X'403'
     4645   01 011A9    00000403 A            DATA     X'403'
     4646   01 011AA    FFFFFFFA A   S08      DATA     -6                ALS 29
     4647   01 011AB    25C0041D A            S,12     X'41D'
     4648   01 011AC    07300139              K        0,7,3,SETPSW
     4649   01 011AD    47300179              K        4,7,3,LOC+2
     4650   01 011AE    12345674 A            DATA     X'12345674'
     4651   01 011AF    80000000 A            DATA     X'80000000'
     4652   01 011B0    FFFFFFFA A   S09      DATA     -6                ALS 27 X
     4653   01 011B1    25C2042B A            S,12     X'42B',1
     4654   01 011B2    07300139              K        0,7,3,SETPSW
     4655   01 011B3    87300179              K        8,7,3,LOC+2
     4656   01 011B4    FFFFFFF0 A            DATA     -16
     4657   01 011B5    80000000 A            DATA     X'80000000'
     4658   01 011B6    FFFFFFFA A   S10      DATA     -6                LLS  1
     4659   01 011B7    25C00001 A            S,12     1                 0 INTO A31
     4660   01 011B8    77300139              K        7,7,3,SETPSW      OVF 00
     4661   01 011B9    37300179              K        3,7,3,LOC+2
     4662   01 011BA    3C3C3C3C A            DATA     X'3C3C3C3C'
     4663   01 011BB    78787878 A            DATA     X'78787878'
     4664   01 011BC    FFFFFFFA A   S11      DATA     -6                LLS  1 X
     4665   01 011BD    25C2003E A            S,12     X'3E',1
     4666   01 011BE    87300139              K        8,7,3,SETPSW      OVF 11
     4667   01 011BF    87300179              K        8,7,3,LOC+2
     4668   01 011C0    C3C3C3C3 A            DATA     X'C3C3C3C3'
     4669   01 011C1    87878786 A            DATA     X'87878786'
     4670   01 011C2    FFFFFFF8 A   S12      DATA     -8                LLS  4
     4671   01 011C3    A5C004A2              S,12     *MEMORY
     4672   01 011C4    07300139              K        0,7,3,SETPSW
     4673   01 011C5    C7300179              K        12,7,3,LOC+2
     4674   01 011C6    23456789 A            DATA     X'23456789'
     4675   01 011C7    34567890 A            DATA     X'34567890'
     4676   01 011C8    00000004 A            DATA     4
     4677   01 011C9    00000004 A            DATA     4
     4678   01 011CA    FFFFFFFA A   S13      DATA     -6                LLS  4
     4679   01 011CB    25C00004 A            S,12     4                 PARITY 0001
     4680   01 011CC    F7300139              K        15,7,3,SETPSW
     4681   01 011CD    F7300179              K        15,7,3,LOC+2
     4682   01 011CE    12345678 A            DATA     X'12345678'
     4683   01 011CF    23456780 A            DATA     X'23456780'
     4684   01 011D0    FFFFFFFA A   S14      DATA     -6                LLS  4
     4685   01 011D1    25C00004 A            S,12     4                 PARITY 0011
     4686   01 011D2    07300139              K        0,7,3,SETPSW
     4687   01 011D3    47300179              K        4,7,3,LOC+2
     4688   01 011D4    3456789A A            DATA     X'3456789A'
     4689   01 011D5    456789A0 A            DATA     X'456789A0'
     4690   01 011D6    FFFFFFFA A   S15      DATA     -6                LLS  4
     4691   01 011D7    25C00004 A            S,12     4                 PARITY 0100
     4692   01 011D8    07300139              K        0,7,3,SETPSW
     4693   01 011D9    C7300179              K        12,7,3,LOC+2
     4694   01 011DA    456789AB A            DATA     X'456789AB'
     4695   01 011DB    56789AB0 A            DATA     X'56789AB0'
     4696   01 011DC    FFFFFFFA A   S16      DATA     -6                LLS 4
     4697   01 011DD    25C00004 A            S,12     4                 PARITY 0101
     4698   01 011DE    37300139              K        3,7,3,SETPSW
     4699   01 011DF    77300179              K        7,7,3,LOC+2
     4700   01 011E0    56789ABC A            DATA     X'56789ABC'
     4701   01 011E1    6789ABC0 A            DATA     X'6789ABC0'
     4702   01 011E2    FFFFFFFA A   S17      DATA     -6                LLS  4
     4703   01 011E3    25C00004 A            S,12     4                 PARITY 0110
     4704   01 011E4    07300139              K        0,7,3,SETPSW
     4705   01 011E5    47300179              K        4,7,3,LOC+2
     4706   01 011E6    6789ABCD A            DATA     X'6789ABCD'
     4707   01 011E7    789ABCD0 A            DATA     X'789ABCD0'
     4708   01 011E8    FFFFFFFA A   S18      DATA     -6                LLS  4
     4709   01 011E9    25C00004 A            S,12     4                 PARITY 0111
     4710   01 011EA    A7300139              K        10,7,3,SETPSW
     4711   01 011EB    E7300179              K        14,7,3,LOC+2
     4712   01 011EC    789ABCDE A            DATA     X'789ABCDE'
     4713   01 011ED    89ABCDE0 A            DATA     X'89ABCDE0'
     4714   01 011EE    FFFFFFFA A   S19      DATA     -6                LLS 32
     4715   01 011EF    25C00020 A            S,12     X'20'
     4716   01 011F0    07300139              K        0,7,3,SETPSW
     4717   01 011F1    C7300179              K        12,7,3,LOC+2
     4718   01 011F2    00000001 A            DATA     1
     4719   01 011F3    00000000 A            DATA     0
     4720   01 011F4    FFFFFFFA A   S20      DATA     -6                LLS 30
     4721   01 011F5    25C0001E A            S,12     X'1E'
     4722   01 011F6    37300139              K        3,7,3,SETPSW
     4723   01 011F7    F7300179              K        15,7,3,LOC+2
     4724   01 011F8    89ABCDE7 A            DATA     X'89ABCDE7'
     4725   01 011F9    C0000000 A            DATA     X'C0000000'
     4726   01 011FA    FFFFFFFA A   S21      DATA     -6                CLS  1
     4727   01 011FB    25C00201 A            S,12     X'201'            A0(1) INTO A31
     4728   01 011FC    07300139              K        0,7,3,SETPSW
     4729   01 011FD    C7300179              K        12,7,3,LOC+2      A0.A1(10)INTO A30 A31
     4730   01 011FE    89ABCDE0 A            DATA     X'89ABCDE0'
     4731   01 011FF    13579BC1 A            DATA     X'13579BC1'
     4732   01 01200    FFFFFFFA A   S22      DATA     -6                CLS  2  X
     4733   01 01201    25C20222 A            S,12     X'222',1
     4734   01 01202    F7300139              K        15,7,3,SETPSW
     4735   01 01203    F7300179              K        15,7,3,LOC+2
     4736   01 01204    91234560 A            DATA     X'91234560'
     4737   01 01205    448D1582 A            DATA     X'448D1582'
     4738   01 01206    FFFFFFFA A   S23      DATA     -6                CLS  3     3-SL1
     4739   01 01207    25C00203 A            S,12     X'203'
     4740   01 01208    37300139              K        3,7,3,SETPSW
     4741   01 01209    77300179              K        7,7,3,LOC+2
     4742   01 0120A    76543210 A            DATA     X'76543210'
     4743   01 0120B    B2A19083 A            DATA     X'B2A19083'
     4744   01 0120C    FFFFFFFA A   S24      DATA     -6                CLS  4
     4745   01 0120D    25C00204 A            S,12     X'204'            PARITY 1000
     4746   01 0120E    F7300139              K        15,7,3,SETPSW
     4747   01 0120F    F7300179              K        15,7,3,LOC+2
     4748   01 01210    89ABCDEF A            DATA     X'89ABCDEF'
     4749   01 01211    9ABCDEF8 A            DATA     X'9ABCDEF8'
     4750   01 01212    FFFFFFFA A   S25      DATA     -6                CLS  4
     4751   01 01213    25C00204 A            S,12     X'204'            PARITY 1001
     4752   01 01214    07300139              K        0,7,3,SETPSW
     4753   01 01215    47300179              K        4,7,3,LOC+2
     4754   01 01216    9ABCDEF0 A            DATA     X'9ABCDEF0'
     4755   01 01217    ABCDEF09 A            DATA     X'ABCDEF09'
     4756   01 01218    FFFFFFFA A   S26      DATA     -6                CLS  4
     4757   01 01219    25C00204 A            S,12     X'204'            PARITY 1010
     4758   01 0121A    07300139              K        0,7,3,SETPSW
     4759   01 0121B    47300179              K        4,7,3,LOC+2
     4760   01 0121C    ABCDEF01 A            DATA     X'ABCDEF01'
     4761   01 0121D    BCDEF01A A            DATA     X'BCDEF01A'
     4762   01 0121E    FFFFFFFA A   S27      DATA     -6                CLS  4
     4763   01 0121F    25C00204 A            S,12     X'204'            PARITY 1011
     4764   01 01220    07300139              K        0,7,3,SETPSW
     4765   01 01221    C7300179              K        12,7,3,LOC+2
     4766   01 01222    BCDEF012 A            DATA     X'BCDEF012'
     4767   01 01223    CDEF012B A            DATA     X'CDEF012B'
     4768   01 01224    FFFFFFFA A   S28      DATA     -6                CLS  4
     4769   01 01225    25C00204 A            S,12     X'204'            PARITY 1100
     4770   01 01226    07300139              K        0,7,3,SETPSW
     4771   01 01227    47300179              K        4,7,3,LOC+2
     4772   01 01228    CDEF0123 A            DATA     X'CDEF0123'
     4773   01 01229    DEF0123C A            DATA     X'DEF0123C'
     4774   01 0122A    FFFFFFFA A   S29      DATA     -6                CLS  4
     4775   01 0122B    25C00204 A            S,12     X'204'            PARITY 1101
     4776   01 0122C    07300139              K        0,7,3,SETPSW
     4777   01 0122D    C7300179              K        12,7,3,LOC+2
     4778   01 0122E    DEF01234 A            DATA     X'DEF01234'
     4779   01 0122F    EF01234D A            DATA     X'EF01234D'
     4780   01 01230    FFFFFFFA A   S30      DATA     -6                CLS  4
     4781   01 01231    25C00204 A            S,12     X'204'            PARITY 1110
     4782   01 01232    37300139              K        3,7,3,SETPSW
     4783   01 01233    F7300179              K        15,7,3,LOC+2
     4784   01 01234    EF012345 A            DATA     X'EF012345'
     4785   01 01235    F012345E A            DATA     X'F012345E'
     4786   01 01236    FFFFFFFA A   S31      DATA     -6                CLS 63
     4787   01 01237    25C0023F A            S,12     X'23F'
     4788   01 01238    07300139              K        0,7,3,SETPSW
     4789   01 01239    C7300179              K        12,7,3,LOC+2
     4790   01 0123A    76543211 A            DATA     X'76543211'
     4791   01 0123B    BB2A1908 A            DATA     X'BB2A1908'
     4792   01 0123C    FFFFFFFA A   S32      DATA     -6                CLS 31
     4793   01 0123D    25C0023F A            S,12     X'23F'
     4794   01 0123E    07300139              K        0,7,3,SETPSW
     4795   01 0123F    C7300179              K        12,7,3,LOC+2
     4796   01 01240    76543211 A            DATA     X'76543211'
     4797   01 01241    BB2A1908 A            DATA     X'BB2A1908'
     4798   01 01242    FFFFFFF6 A   S33      DATA     -10               ALD  1    B0(0) INTO A31
     4799   01 01243    25C00501 A            S,12     X'501'            (0) INTO B31
     4800   01 01244    07300139              K        0,7,3,SETPSW
     4801   01 01245    07300179              K        0,7,3,LOC+2
     4802   01 01246    12345679 A            DATA     X'12345679'
     4803   01 01247    2468ACF2 A            DATA     X'2468ACF2'
     4804   01 01248    00000000 A            DATA     0
     4805   01 01249    00000000 A            DATA     0
     4806   01 0124A    55555555 A            DATA     X'55555555'
     4807   01 0124B    AAAAAAAA A            DATA     X'AAAAAAAA'
     4808   01 0124C    FFFFFFF6 A   S34      DATA     -10               ALD  1    B0(1) INTO A31
     4809   01 0124D    25C00501 A            S,12     X'501'
     4810   01 0124E    07300139              K        0,7,3,SETPSW
     4811   01 0124F    07300179              K        0,7,3,LOC+2
     4812   01 01250    12345678 A            DATA     X'12345678'
     4813   01 01251    2468ACF1 A            DATA     X'2468ACF1'
     4814   01 01252    00000000 A            DATA     0
     4815   01 01253    00000000 A            DATA     0
     4816   01 01254    AAAAAAAB A            DATA     X'AAAAAAAB'
     4817   01 01255    55555556 A            DATA     X'55555556'
     4818   01 01256    FFFFFFF6 A   S35      DATA     -10               ALD 35  *
     4819   01 01257    A5C004A2              S,12     *MEMORY
     4820   01 01258    07300139              K        0,7,3,SETPSW
     4821   01 01259    47300179              K        4,7,3,LOC+2
     4822   01 0125A    CABBEDED A            DATA     X'CABBEDED'
     4823   01 0125B    91A2B3C0 A            DATA     X'91A2B3C0'
     4824   01 0125C    00000523 A            DATA     X'523'
     4825   01 0125D    00000523 A            DATA     X'523'
     4826   01 0125E    12345678 A            DATA     X'12345678'
     4827   01 0125F    00000000 A            DATA     0
     4828   01 01260    FFFFFFF6 A   S36      DATA     -10               ALD 17 X   RO
     4829   01 01261    25D20547 A            S,13     X'547',1
     4830   01 01262    07300139              K        0,7,3,SETPSW
     4831   01 01263    47300179              K        4,7,3,LOC+2
     4832   01 01264    1728394A A            DATA     X'1728394A'
     4833   01 01265    1728394A A            DATA     X'1728394A'
     4834   01 01266    00000000 A            DATA     0
     4835   01 01267    00000000 A            DATA     0
     4836   01 01268    92345678 A            DATA     X'92345678'
     4837   01 01269    ACF12468 A            DATA     X'ACF12468'
     4838   01 0126A    FFFFFFF6 A   S37      DATA     -10               LLD 63
     4839   01 0126B    25C0013F A            S,12     X'13F'
     4840   01 0126C    07300139              K        0,7,3,SETPSW
     4841   01 0126D    87300179              K        8,7,3,LOC+2
     4842   01 0126E    FFFFFFFF A            DATA     -1
     4843   01 0126F    80000000 A            DATA     X'80000000'
     4844   01 01270    00000000 A            DATA     0
     4845   01 01271    00000000 A            DATA     0
     4846   01 01272    FFFFFFFF A            DATA     -1
     4847   01 01273    00000000 A            DATA     0
     4848   01 01274    FFFFFFF6 A   S38      DATA     -10               LLD 47 X   RO
     4849   01 01275    25D20107 A            S,13     X'107',1
     4850   01 01276    07300139              K        0,7,3,SETPSW
     4851   01 01277    C7300179              K        12,7,3,LOC+2
     4852   01 01278    5B4A3928 A            DATA     X'5B4A3928'
     4853   01 01279    5B4A3928 A            DATA     X'5B4A3928'
     4854   01 0127A    00000000 A            DATA     0
     4855   01 0127B    00000000 A            DATA     0
     4856   01 0127C    23456789 A            DATA     X'23456789'
     4857   01 0127D    B3C48000 A            DATA     X'B3C48000'
     4858   01 0127E    FFFFFFF6 A   S39      DATA     -10               CLD 19
     4859   01 0127F    25C00313 A            S,12     X'313'
     4860   01 01280    07300139              K        0,7,3,SETPSW
     4861   01 01281    47300179              K        4,7,3,LOC+2
     4862   01 01282    12345678 A            DATA     X'12345678'
     4863   01 01283    B3C4D5E6 A            DATA     X'B3C4D5E6'
     4864   01 01284    00000000 A            DATA     0
     4865   01 01285    00000000 A            DATA     0
     4866   01 01286    9ABCDEF0 A            DATA     X'9ABCDEF0'
     4867   01 01287    F78091A2 A            DATA     X'F78091A2'
     4868   01 01288    FFFFFFFA A   S40      DATA     -6                ARS  2
     4869   01 01289    25C0047E A            S,12     X'47E'
     4870   01 0128A    F73001F4              K        15,7,3,FXPOSW
     4871   01 0128B    37300179              K        3,7,3,LOC+2
     4872   01 0128C    CCCCCCCC A            DATA     X'CCCCCCCC'
     4873   01 0128D    F3333333 A            DATA     X'F3333333'
     4874   01 0128E    FFFFFFFA A   S41      DATA     -6                ARS  2
     4875   01 0128F    25C0047E A            S,12     X'47E'
     4876   01 01290    00000139              DATA     SETPSW
     4877   01 01291    00000179              DATA     LOC+2
     4878   01 01292    33333333 A            DATA     X'33333333'
     4879   01 01293    0CCCCCCC A            DATA     X'0CCCCCCC'
     4880   01 01294    FFFFFFFA A   S42      DATA     -6                ARS  1
     4881   01 01295    25C0047F A            S,12     X'47F'
     4882   01 01296    00000139              DATA     SETPSW
     4883   01 01297    00000179              DATA     LOC+2
     4884   01 01298    AAAAAAAA A            DATA     X'AAAAAAAA'
     4885   01 01299    D5555555 A            DATA     X'D5555555'
     4886   01 0129A    FFFFFFFA A   S43      DATA     -6                ARS  1
     4887   01 0129B    25C0047F A            S,12     X'47F'
     4888   01 0129C    00000139              DATA     SETPSW
     4889   01 0129D    00000179              DATA     LOC+2
     4890   01 0129E    55555555 A            DATA     X'55555555'
     4891   01 0129F    2AAAAAAA A            DATA     X'2AAAAAAA'
     4892   01 012A0    FFFFFFFA A   S44      DATA     -6                ARS 28  X
     4893   01 012A1    25C20471 A            S,12     X'471',1
     4894   01 012A2    00000139              DATA     SETPSW
     4895   01 012A3    00000179              DATA     LOC+2
     4896   01 012A4    800000F3 A            DATA     X'800000F3'
     4897   01 012A5    FFFFFFF8 A            DATA     -8
     4898   01 012A6    FFFFFFFA A   S45      DATA     -6                LRS 13
     4899   01 012A7    25C00073 A            S,12     X'73'
     4900   01 012A8    F73001F4              K        15,7,3,FXPOSW
     4901   01 012A9    37300179              K        3,7,3,LOC+2
     4902   01 012AA    87654321 A            DATA     X'87654321'
     4903   01 012AB    00043B2A A            DATA     X'43B2A'
     4904   01 012AC    FFFFFFFA A   S46      DATA     -6                CRS 11
     4905   01 012AD    25C00275 A            S,12     X'275'
     4906   01 012AE    F73001F4              K        15,7,3,FXPOSW
     4907   01 012AF    37300179              K        3,7,3,LOC+2
     4908   01 012B0    ABCDEF89 A            DATA     X'ABCDEF89'
     4909   01 012B1    F13579BD A            DATA     X'F13579BD'
     4910   01 012B2    FFFFFFFA A   S47      DATA     -6                CRS 64
     4911   01 012B3    25C00240 A            S,12     X'240'
     4912   01 012B4    00000139              DATA     SETPSW
     4913   01 012B5    00000179              DATA     LOC+2
     4914   01 012B6    99999999 A            DATA     X'99999999'
     4915   01 012B7    99999999 A            DATA     X'99999999'
     4916   01 012B8    FFFFFFF6 A   S48      DATA     -10               ARD 33
     4917   01 012B9    25C0055F A            S,12     X'55F'
     4918   01 012BA    F73001F4              K        15,7,3,FXPOSW
     4919   01 012BB    37300179              K        3,7,3,LOC+2
     4920   01 012BC    87654321 A            DATA     X'87654321'
     4921   01 012BD    FFFFFFFF A            DATA     -1
     4922   01 012BE    00000000 A            DATA     0
     4923   01 012BF    00000000 A            DATA     0
     4924   01 012C0    0FEDCBA9 A            DATA     X'0FEDCBA9'
     4925   01 012C1    C3B2A190 A            DATA     X'C3B2A190'
     4926   01 012C2    FFFFFFF6 A   S49      DATA     -10               ARD 15  *
     4927   01 012C3    A5D004A2              S,13     *MEMORY
     4928   01 012C4    00000139              DATA     SETPSW
     4929   01 012C5    00000179              DATA     LOC+2
     4930   01 012C6    789ABCDE A            DATA     X'789ABCDE'
     4931   01 012C7    789ABCDE A            DATA     X'789ABCDE'
     4932   01 012C8    00000571 A            DATA     X'571'
     4933   01 012C9    00000571 A            DATA     X'571'
     4934   01 012CA    F0123456 A            DATA     X'F0123456'
     4935   01 012CB    FFFFE024 A            DATA     X'FFFFE024'
     4936   01 012CC    FFFFFFF6 A   S50      DATA     -10               LRD 54
     4937   01 012CD    25C0014A A            S,12     X'14A'
     4938   01 012CE    F73001F4              K        15,7,3,FXPOSW
     4939   01 012CF    37300179              K        3,7,3,LOC+2
     4940   01 012D0    87654321 A            DATA     X'87654321'
     4941   01 012D1    00000000 A            DATA     0
     4942   01 012D2    00000000 A            DATA     0
     4943   01 012D3    00000000 A            DATA     0
     4944   01 012D4    ABCDEF01 A            DATA     X'ABCDEF01'
     4945   01 012D5    0000021D A            DATA     X'21D'
     4946   01 012D6    FFFFFFF6 A   S51      DATA     -10               LRD 36     RO
     4947   01 012D7    25D0015C A            S,13     X'15C'
     4948   01 012D8    00000139              DATA     SETPSW
     4949   01 012D9    00000179              DATA     LOC+2
     4950   01 012DA    12345678 A            DATA     X'12345678'
     4951   01 012DB    12345678 A            DATA     X'12345678'
     4952   01 012DC    00000000 A            DATA     0
     4953   01 012DD    00000000 A            DATA     0
     4954   01 012DE    9ABCDEF0 A            DATA     X'9ABCDEF0'
     4955   01 012DF    00000000 A            DATA     0
     4956   01 012E0    FFFFFFF6 A   S52      DATA     -10               CRD 62 *
     4957   01 012E1    A5C004A2              S,12     *MEMORY
     4958   01 012E2    00000139              DATA     SETPSW
     4959   01 012E3    00000179              DATA     LOC+2
     4960   01 012E4    99999999 A            DATA     X'99999999'
     4961   01 012E5    66666666 A            DATA     X'66666666'
     4962   01 012E6    00000342 A            DATA     X'342'
     4963   01 012E7    00000342 A            DATA     X'342'
     4964   01 012E8    99999999 A            DATA     X'99999999'
     4965   01 012E9    66666666 A            DATA     X'66666666'
     4966   01 012EA    FFFFFFF6 A   S53      DATA     -10               CRD 31 *X  RO
     4967   01 012EB    A5D204A2              S,13     *MEMORY,1
     4968   01 012EC    F73001F4              K        15,7,3,FXPOSW
     4969   01 012ED    37300179              K        3,7,3,LOC+2
     4970   01 012EE    22222222 A            DATA     X'22222222'
     4971   01 012EF    22222222 A            DATA     X'22222222'
     4972   01 012F0    000003BF A            DATA     X'3BF'
     4973   01 012F1    000003BF A            DATA     X'3BF'
     4974   01 012F2    7BDE7BDE A            DATA     X'7BDE7BDE'
     4975   01 012F3    F7BCF7BC A            DATA     X'F7BCF7BC'
     4976                            ** NUMBER ALREADY NORMALIZED
     4977   01 012F4    FFFFFFFA A   SF001    DATA     -6
     4978   01 012F5    24C0000F A            SF,12    15
     4979   01 012F6    F7300139              K        15,7,3,SETPSW
     4980   01 012F7    A7300179              K        10,7,3,LOC+2
     4981   01 012F8    0F100000 A            DATA     X'F100000',X'F100000'
            01 012F9    0F100000 A
     4982                            ** NORMALIZED WHEN COUNT EQUALS ZERO
     4983   01 012FA    FFFFFFF6 A   SF002    DATA     -10
     4984   01 012FB    24C00104 A            SF,12    X'104'
     4985   01 012FC    07300139              K        0,7,3,SETPSW
     4986   01 012FD    A7300179              K        10,7,3,LOC+2
     4987   01 012FE    0F00002F A            DATA     X'F00002F',X'B2FFFFF',0,0,-1,X'FFFF0000'
            01 012FF    0B2FFFFF A
            01 01300    00000000 A
            01 01301    00000000 A
            01 01302    FFFFFFFF A
            01 01303    FFFF0000 A
     4988                            ** NORMALIZED BEFORE COUNT EQUALS ZERO
     4989   01 01304    FFFFFFFA A   SF003    DATA     -6
     4990   01 01305    24C00104 A            SF,12    X'104'
     4991   01 01306    70000139              K        7,0,0,SETPSW
     4992   01 01307    A0000179              K        10,0,0,LOC+2
     4993   01 01308    0F004FFF A            DATA     X'0F004FFF',X'D4FFF00'
            01 01309    0D4FFF00 A
     4994                            ** UNDERFLOW. NOT NORMALIZED COUNT NOT EQUAL ZERO   S/CC2 IN PH6
     4995   01 0130A    FFFFFFF6 A   SF004    DATA     -10
     4996   01 0130B    24C0013F A            SF,12    X'13F'
     4997   01 0130C    97300139              K        9,7,3,SETPSW
     4998   01 0130D    67300179              K        6,7,3,LOC+2
     4999   01 0130E    04000000 A            DATA     X'4000000',X'7F0F0000',0,0,X'F0000000',0
            01 0130F    7F0F0000 A
            01 01310    00000000 A
            01 01311    00000000 A
            01 01312    F0000000 A
            01 01313    00000000 A
     5000                            ** UNDERFLOW. NORMALIZED. COUNT EQUAL ZERO. S/CC2 IN PH7
     5001   01 01314    FFFFFFFA A   SF005    DATA     -6
     5002   01 01315    24C00005 A            SF,12    5
     5003   01 01316    17300139              K        1,7,3,SETPSW
     5004   01 01317    E7300179              K        14,7,3,LOC+2
     5005   01 01318    04000008 A            DATA     X'04000008',X'7F800000'
            01 01319    7F800000 A
     5006                            ** COUNT EQUALS ZERO. NOT NORMALIZED
     5007   01 0131A    FFFFFFFA A   SF006    DATA     -6
     5008   01 0131B    24C00004 A            SF,12    4
     5009   01 0131C    D7300139              K        13,7,3,SETPSW
     5010   01 0131D    27300179              K        2,7,3,LOC+2
     5011   01 0131E    0F000001 A            DATA     X'F000001',X'0B010000'
            01 0131F    0B010000 A
     5012                            ** TRUE ZERO   S/FL3 IN PH6
     5013   01 01320    FFFFFFF6 A   SF007    DATA     -10
     5014   01 01321    24C00004 A            SF,12    4
     5015   01 01322    70300139              K        7,0,3,SETPSW
     5016   01 01323    80300179              K        8,0,3,LOC+2
     5017   01 01324    03000000 A            DATA     X'3000000',0,0,0,-1,-1
            01 01325    00000000 A
            01 01326    00000000 A
            01 01327    00000000 A
            01 01328    FFFFFFFF A
            01 01329    FFFFFFFF A
     5018                            ** NEGATIVE CHARACTERISTIC
     5019   01 0132A    FFFFFFF6 A   SF008    DATA     -10
     5020   01 0132B    24C00004 A            SF,12    4
     5021   01 0132C    E7000139              K        14,7,0,SETPSW
     5022   01 0132D    17000179              K        1,7,0,LOC+2
     5023   01 0132E    F0FFFFF1 A            DATA     X'F0FFFFF1',X'F4F10000',0,0,-1,-1
            01 0132F    F4F10000 A
            01 01330    00000000 A
            01 01331    00000000 A
            01 01332    FFFFFFFF A
            01 01333    FFFFFFFF A
     5024                            ** NEG CHAR.  UNDERFLOW   ODD REG  NORMALIZED
     5025   01 01334    FFFFFFFA A   SF009    DATA     -6
     5026   01 01335    24C00004 A            SF,12    4
     5027   01 01336    27300139              K        2,7,3,SETPSW
     5028   01 01337    D7300179              K        13,7,3,LOC+2
     5029   01 01338    FEFFEFFF A            DATA     X'FEFFEFFF',X'80EFFF00'
            01 01339    80EFFF00 A
     5030                            ** NEG CHAR TO CHECK NK00 IN PH4 AND PH9
     5031   01 0133A    FFFFFFF6 A   SF010    DATA     -10
     5032   01 0133B    24C00102 A            SF,12    X'102'
     5033   01 0133C    00000139              K        0,0,0,SETPSW
     5034   01 0133D    90000179              K        9,0,0,LOC+2
     5035   01 0133E    F0FF4321 A            DATA     X'F0FF4321',X'F24321FF',0,0,-1,X'FFFFFF00'
            01 0133F    F24321FF A
            01 01340    00000000 A
            01 01341    00000000 A
            01 01342    FFFFFFFF A
            01 01343    FFFFFF00 A
     5036                            ** NEG CHAR TO CHECK K00 IN PH4 AND PH9
     5037   01 01344    FFFFFFFA A   SF011    DATA     -6
     5038   01 01345    24C00102 A            SF,12    X'102'
     5039   01 01346    63100139              K        6,3,1,SETPSW
     5040   01 01347    93100179              K        9,3,1,LOC+2
     5041   01 01348    F0FF4320 A            DATA     X'F0FF4320',X'F2432000'
            01 01349    F2432000 A
     5042                            ** TEST THAT MAX COUNT W/O NORMALIZING IS OK
     5043   01 0134A    FFFFFFF6 A   SF012    DATA     -10
     5044   01 0134B    24C0010C A            SF,12    X'10C'
     5045   01 0134C    55100139              K        5,5,1,SETPSW
     5046   01 0134D    25100179              K        2,5,1,LOC+2
     5047   01 0134E    7F000000 A            DATA     X'7F000000',X'73010000',0,0,1,0
            01 0134F    73010000 A
            01 01350    00000000 A
            01 01351    00000000 A
            01 01352    00000001 A
            01 01353    00000000 A
     5048                            ** RIGHT SHIFT. TRUE ZERO BEFORE COUNT DONE.  S/FL3 IN PH6
     5049   01 01354    FFFFFFF6 A   SF013    DATA     -10
     5050   01 01355    24D0007B A            SF,13    X'7B'
     5051   01 01356    F7300139              K        15,7,3,SETPSW
     5052   01 01357    07300179              K        0,7,3,LOC+2
     5053   01 01358    04800000 A            DATA     X'04800000',X'04800000',0,0,X'20000100',0
            01 01359    04800000 A
            01 0135A    00000000 A
            01 0135B    00000000 A
            01 0135C    20000100 A
            01 0135D    00000000 A
     5054                            ** RIGHT SHIFT OVERFLOW AT COUNT DONE. S/CC2 IN PH7
     5055   01 0135E    FFFFFFF6 A   SF014    DATA     -10
     5056   01 0135F    24C0017F A            SF,12    X'17F'
     5057   01 01360    07300139              K        0,7,3,SETPSW
     5058   01 01361    67300179              K        6,7,3,LOC+2
     5059   01 01362    7F453210 A            DATA     X'7F453210',X'00045321',0,0,-1,X'FFFFFFF'
            01 01363    00045321 A
            01 01364    00000000 A
            01 01365    00000000 A
            01 01366    FFFFFFFF A
            01 01367    0FFFFFFF A
     5060                            ** RIGHT SHIFT. OVERFLOW BEFORE COUNT DONE.  S/CC2 IN PH6
     5061   01 01368    FFFFFFF6 A   SF015    DATA     -10
     5062   01 01369    24C00170 A            SF,12    X'170'
     5063   01 0136A    F0000139              K        15,0,0,SETPSW
     5064   01 0136B    50000179              K        5,0,0,LOC+2
     5065   01 0136C    81FFFFFF A            DATA     X'81FFFFFF',-1,0,0,X'FFFFF222',X'FFFFFFF3'
            01 0136D    FFFFFFFF A
            01 0136E    00000000 A
            01 0136F    00000000 A
            01 01370    FFFFF222 A
            01 01371    FFFFFFF3 A
     5066                            ** RIGHT SHIFT.  OVERFLOW AND TRUE ZERO. AT COUNT DONE.  S/FL3 IN PH7
     5067   01 01372    FFFFFFF6 A   SF016    DATA     -10
     5068   01 01373    24C0017F A            SF,12    X'17F'
     5069   01 01374    00000139              DATA     SETPSW,LOC+2,X'7F000000',0,0,0,1,0
            01 01375    00000179
            01 01376    7F000000 A
            01 01377    00000000 A
            01 01378    00000000 A
            01 01379    00000000 A
            01 0137A    00000001 A
            01 0137B    00000000 A
     5070                            ** RIGHT SHIFT COUNT DONE. MAX COUNT W/O OVERFLOW OR TRUE ZERO
     5071   01 0137C    FFFFFFF6 A   SF017    DATA     -10
     5072   01 0137D    24C00173 A            SF,12    X'173'
     5073   01 0137E    00000139              DATA     SETPSW
     5074   01 0137F    20000179              K        2,0,0,LOC+2
     5075   01 01380    0125AC31 A            DATA     X'0125AC31',X'0E000000',0,0,X'95A3C195',2
            01 01381    0E000000 A
            01 01382    00000000 A
            01 01383    00000000 A
            01 01384    95A3C195 A
            01 01385    00000002 A
     5076                            ** THE NEXT 16 TESTS ARE LEFT SHIFTS WITH THE COUNT GOING TO ZERO
     5077                            ** EACH TEST LEAVES A SINGLE BIT IN REG B TO VERIFY EACH BIT POSITION
     5078                            ** WILL CAUSE B0031Z TO BE FALSE. CHARACTERISTICS ARE CHOSEN TO VERIFY
     5079                            ** THAT THE A DOWN COUNT LOGIC IS FUNCTIONING
     5080   01 01386    FFFFFFF6 A   SF018    DATA     -10               B00
     5081   01 01387    A4C004A2              SF,12    *MEMORY
     5082   01 01388    00000139              DATA     SETPSW
     5083   01 01389    20000179              K        2,0,0,LOC+2
     5084   01 0138A    73000000 A            DATA     X'73000000',X'71000000',X'102',X'102',X'800000'
            01 0138B    71000000 A
            01 0138C    00000102 A
            01 0138D    00000102 A
            01 0138E    00800000 A
     5085   01 0138F    80000000 A            DATA     X'80000000'
     5086   01 01390    FFFFFFF6 A   SF019    DATA     -10               B01
     5087   01 01391    24CE0100 A            SF,12    X'100',7          IX ADD 1 TO COUNT
     5088   01 01392    00000139              DATA     SETPSW
     5089   01 01393    20000179              K        2,0,0,LOC+2
     5090   01 01394    70000000 A            DATA     X'70000000',X'6F000000',0,0,X'4000000',X'40000000'
            01 01395    6F000000 A
            01 01396    00000000 A
            01 01397    00000000 A
            01 01398    04000000 A
            01 01399    40000000 A
     5091   01 0139A    FFFFFFF6 A   SF020    DATA     -10               B02
     5092   01 0139B    A4CE04A2              SF,12    *MEMORY,7
     5093   01 0139C    00000139              DATA     SETPSW
     5094   01 0139D    20000179              K        2,0,0,LOC+2
     5095   01 0139E    60000000 A            DATA     X'60000000',X'5F000000',X'100',X'100',X'2000000'
            01 0139F    5F000000 A
            01 013A0    00000100 A
            01 013A1    00000100 A
            01 013A2    02000000 A
     5096   01 013A3    20000000 A            DATA     X'20000000'
     5097   01 013A4    FFFFFFF6 A   SF021    DATA     -10               B03
     5098   01 013A5    24C00101 A            SF,12    X'101'
     5099   01 013A6    00000139              DATA     SETPSW
     5100   01 013A7    20000179              K        2,0,0,LOC+2
     5101   01 013A8    50000000 A            DATA     X'50000000',X'4F000000',0,0,X'1000000',X'10000000'
            01 013A9    4F000000 A
            01 013AA    00000000 A
            01 013AB    00000000 A
            01 013AC    01000000 A
            01 013AD    10000000 A
     5102   01 013AE    FFFFFFF6 A   SF022    DATA     -10               B04
     5103   01 013AF    24C00101 A            SF,12    X'101'
     5104   01 013B0    00000139              DATA     SETPSW
     5105   01 013B1    20000179              K        2,0,0,LOC+2
     5106   01 013B2    40000000 A            DATA     X'40000000',X'3F000000',0,0,X'800000',X'8000000'
            01 013B3    3F000000 A
            01 013B4    00000000 A
            01 013B5    00000000 A
            01 013B6    00800000 A
            01 013B7    08000000 A
     5107   01 013B8    FFFFFFF6 A   SF023    DATA     -10               B05
     5108   01 013B9    24C00101 A            SF,12    X'101'
     5109   01 013BA    00000139              DATA     SETPSW
     5110   01 013BB    20000179              K        2,0,0,LOC+2
     5111   01 013BC    30000000 A            DATA     X'30000000',X'2F000000',0,0,X'400000',X'4000000'
            01 013BD    2F000000 A
            01 013BE    00000000 A
            01 013BF    00000000 A
            01 013C0    00400000 A
            01 013C1    04000000 A
     5112   01 013C2    FFFFFFF6 A   SF024    DATA     -10               B06
     5113   01 013C3    24C00101 A            SF,12    X'101'
     5114   01 013C4    00000139              DATA     SETPSW
     5115   01 013C5    20000179              K        2,0,0,LOC+2
     5116   01 013C6    20000000 A            DATA     X'20000000',X'1F000000',0,0,X'200000',X'2000000'
            01 013C7    1F000000 A
            01 013C8    00000000 A
            01 013C9    00000000 A
            01 013CA    00200000 A
            01 013CB    02000000 A
     5117   01 013CC    FFFFFFF6 A   SF025    DATA     -10               B07
     5118   01 013CD    24C00101 A            SF,12    X'101'
     5119   01 013CE    00000139              DATA     SETPSW
     5120   01 013CF    20000179              K        2,0,0,LOC+2
     5121   01 013D0    10000000 A            DATA     X'10000000',X'0F000000',0,0,X'100000',X'1000000'
            01 013D1    0F000000 A
            01 013D2    00000000 A
            01 013D3    00000000 A
            01 013D4    00100000 A
            01 013D5    01000000 A
     5122   01 013D6    FFFFFFF6 A   SF026    DATA     -10               B08
     5123   01 013D7    24C00101 A            SF,12    X'101'
     5124   01 013D8    00000139              DATA     SETPSW
     5125   01 013D9    20000179              K        2,0,0,LOC+2
     5126   01 013DA    71000000 A            DATA     X'71000000',X'70000000',0,0,X'80000',X'800000'
            01 013DB    70000000 A
            01 013DC    00000000 A
            01 013DD    00000000 A
            01 013DE    00080000 A
            01 013DF    00800000 A
     5127   01 013E0    FFFFFFF6 A   SF027    DATA     -10               B09
     5128   01 013E1    24C00101 A            SF,12    X'101'
     5129   01 013E2    00000139              DATA     SETPSW
     5130   01 013E3    20000179              K        2,0,0,LOC+2
     5131   01 013E4    61000000 A            DATA     X'61000000',X'60000000',0,0,X'40000',X'400000'
            01 013E5    60000000 A
            01 013E6    00000000 A
            01 013E7    00000000 A
            01 013E8    00040000 A
            01 013E9    00400000 A
     5132   01 013EA    FFFFFFF6 A   SF028    DATA     -10               B10
     5133   01 013EB    24C00101 A            SF,12    X'101'
     5134   01 013EC    00000139              DATA     SETPSW
     5135   01 013ED    20000179              K        2,0,0,LOC+2
     5136   01 013EE    51000000 A            DATA     X'51000000',X'50000000',0,0,X'20000',X'200000'
            01 013EF    50000000 A
            01 013F0    00000000 A
            01 013F1    00000000 A
            01 013F2    00020000 A
            01 013F3    00200000 A
     5137   01 013F4    FFFFFFF6 A   SF029    DATA     -10               B11
     5138   01 013F5    24C00101 A            SF,12    X'101'
     5139   01 013F6    00000139              DATA     SETPSW
     5140   01 013F7    20000179              K        2,0,0,LOC+2
     5141   01 013F8    41000000 A            DATA     X'41000000',X'40000000',0,0,X'10000',X'100000'
            01 013F9    40000000 A
            01 013FA    00000000 A
            01 013FB    00000000 A
            01 013FC    00010000 A
            01 013FD    00100000 A
     5142   01 013FE    FFFFFFF6 A   SF030    DATA     -10               B12
     5143   01 013FF    24C00101 A            SF,12    X'101'
     5144   01 01400    00000139              DATA     SETPSW
     5145   01 01401    20000179              K        2,0,0,LOC+2
     5146   01 01402    31000000 A            DATA     X'31000000',X'30000000',0,0,X'8000',X'80000'
            01 01403    30000000 A
            01 01404    00000000 A
            01 01405    00000000 A
            01 01406    00008000 A
            01 01407    00080000 A
     5147   01 01408    FFFFFFF6 A   SF031    DATA     -10               B13
     5148   01 01409    24C00101 A            SF,12    X'101'
     5149   01 0140A    00000139              DATA     SETPSW
     5150   01 0140B    20000179              K        2,0,0,LOC+2
     5151   01 0140C    21000000 A            DATA     X'21000000',X'20000000',0,0,X'4000',X'40000'
            01 0140D    20000000 A
            01 0140E    00000000 A
            01 0140F    00000000 A
            01 01410    00004000 A
            01 01411    00040000 A
     5152   01 01412    FFFFFFF6 A   SF032    DATA     -10               B14
     5153   01 01413    24C00101 A            SF,12    X'101'
     5154   01 01414    00000139              DATA     SETPSW
     5155   01 01415    20000179              K        2,0,0,LOC+2
     5156   01 01416    11000000 A            DATA     X'11000000',X'10000000',0,0,X'2000',X'20000'
            01 01417    10000000 A
            01 01418    00000000 A
            01 01419    00000000 A
            01 0141A    00002000 A
            01 0141B    00020000 A
     5157   01 0141C    FFFFFFF6 A   SF033    DATA     -10               B15
     5158   01 0141D    24C00101 A            SF,12    X'101'
     5159   01 0141E    00000139              DATA     SETPSW
     5160   01 0141F    20000179              K        2,0,0,LOC+2
     5161   01 01420    01000000 A            DATA     X'01000000',0,0,0,X'1000',X'10000'
            01 01421    00000000 A
            01 01422    00000000 A
            01 01423    00000000 A
            01 01424    00001000 A
            01 01425    00010000 A
     5162                            ** THE NEXT 16 TESTS COMPLETE THE TEST OF B0031Z AND CHECK THE A UP
     5163                            ** COUNT LOGIC.
     5164   01 01426    FFFFFFF6 A   SF034    DATA     -10               B31
     5165   01 01427    24C0017F A            SF,12    X'17F'
     5166   01 01428    00000139              DATA     SETPSW
     5167   01 01429    20000179              K        2,0,0,LOC+2
     5168   01 0142A    0F000000 A            DATA     X'0F000000',X'10000000',0,0,16,1
            01 0142B    10000000 A
            01 0142C    00000000 A
            01 0142D    00000000 A
            01 0142E    00000010 A
            01 0142F    00000001 A
     5169   01 01430    FFFFFFF6 A   SF035    DATA     -10               B30
     5170   01 01431    24C0017F A            SF,12    X'17F'
     5171   01 01432    00000139              DATA     SETPSW
     5172   01 01433    20000179              K        2,0,0,LOC+2
     5173   01 01434    1F000000 A            DATA     X'1F000000',X'20000000',0,0,32,2
            01 01435    20000000 A
            01 01436    00000000 A
            01 01437    00000000 A
            01 01438    00000020 A
            01 01439    00000002 A
     5174   01 0143A    FFFFFFF6 A   SF036    DATA     -10               B29
     5175   01 0143B    24C0017F A            SF,12    X'17F'
     5176   01 0143C    00000139              DATA     SETPSW
     5177   01 0143D    20000179              K        2,0,0,LOC+2
     5178   01 0143E    2F000000 A            DATA     X'2F000000',X'30000000',0,0,64,4
            01 0143F    30000000 A
            01 01440    00000000 A
            01 01441    00000000 A
            01 01442    00000040 A
            01 01443    00000004 A
     5179   01 01444    FFFFFFF6 A   SF037    DATA     -10               B28
     5180   01 01445    24C0017F A            SF,12    X'17F'
     5181   01 01446    00000139              DATA     SETPSW
     5182   01 01447    20000179              K        2,0,0,LOC+2
     5183   01 01448    3F000000 A            DATA     X'3F000000',X'40000000',0,0,128,8
            01 01449    40000000 A
            01 0144A    00000000 A
            01 0144B    00000000 A
            01 0144C    00000080 A
            01 0144D    00000008 A
     5184   01 0144E    FFFFFFF6 A   SF038    DATA     -10               B27
     5185   01 0144F    24C0017F A            SF,12    X'17F'
     5186   01 01450    00000139              DATA     SETPSW
     5187   01 01451    20000179              K        2,0,0,LOC+2
     5188   01 01452    4F000000 A            DATA     X'4F000000',X'50000000',0,0,256,16
            01 01453    50000000 A
            01 01454    00000000 A
            01 01455    00000000 A
            01 01456    00000100 A
            01 01457    00000010 A
     5189   01 01458    FFFFFFF6 A   SF039    DATA     -10               B26
     5190   01 01459    24C0017F A            SF,12    X'17F'
     5191   01 0145A    00000139              DATA     SETPSW
     5192   01 0145B    20000179              K        2,0,0,LOC+2
     5193   01 0145C    5F000000 A            DATA     X'5F000000',X'60000000',0,0,512,32
            01 0145D    60000000 A
            01 0145E    00000000 A
            01 0145F    00000000 A
            01 01460    00000200 A
            01 01461    00000020 A
     5194   01 01462    FFFFFFF6 A   SF040    DATA     -10               B25
     5195   01 01463    24C0017F A            SF,12    X'17F'
     5196   01 01464    00000139              DATA     SETPSW
     5197   01 01465    20000179              K        2,0,0,LOC+2
     5198   01 01466    6F000000 A            DATA     X'6F000000',X'70000000',0,0,1024,64
            01 01467    70000000 A
            01 01468    00000000 A
            01 01469    00000000 A
            01 0146A    00000400 A
            01 0146B    00000040 A
     5199   01 0146C    FFFFFFF6 A   SF041    DATA     -10               B24
     5200   01 0146D    24C0017F A            SF,12    X'17F'
     5201   01 0146E    00000139              DATA     SETPSW
     5202   01 0146F    20000179              K        2,0,0,LOC+2
     5203   01 01470    06000000 A            DATA     X'6000000',X'7000000',0,0,2048,128
            01 01471    07000000 A
            01 01472    00000000 A
            01 01473    00000000 A
            01 01474    00000800 A
            01 01475    00000080 A
     5204   01 01476    FFFFFFF6 A   SF042    DATA     -10               B23
     5205   01 01477    24C0017F A            SF,12    X'17F'
     5206   01 01478    00000139              DATA     SETPSW
     5207   01 01479    20000179              K        2,0,0,LOC+2
     5208   01 0147A    70000000 A            DATA     X'70000000',X'71000000',0,0,4096,256
            01 0147B    71000000 A
            01 0147C    00000000 A
            01 0147D    00000000 A
            01 0147E    00001000 A
            01 0147F    00000100 A
     5209   01 01480    FFFFFFF6 A   SF043    DATA     -10               B22
     5210   01 01481    24C0017F A            SF,12    X'17F'
     5211   01 01482    00000139              DATA     SETPSW
     5212   01 01483    20000179              K        2,0,0,LOC+2
     5213   01 01484    60000000 A            DATA     X'60000000',X'61000000',0,0,8192,512
            01 01485    61000000 A
            01 01486    00000000 A
            01 01487    00000000 A
            01 01488    00002000 A
            01 01489    00000200 A
     5214   01 0148A    FFFFFFF6 A   SF044    DATA     -10               B21
     5215   01 0148B    24C0017F A            SF,12    X'17F'
     5216   01 0148C    00000139              DATA     SETPSW
     5217   01 0148D    20000179              K        2,0,0,LOC+2
     5218   01 0148E    50000000 A            DATA     X'50000000',X'51000000',0,0,16384,1024
            01 0148F    51000000 A
            01 01490    00000000 A
            01 01491    00000000 A
            01 01492    00004000 A
            01 01493    00000400 A
     5219   01 01494    FFFFFFF6 A   SF045    DATA     -10               B20
     5220   01 01495    24C0017F A            SF,12    X'17F'
     5221   01 01496    00000139              DATA     SETPSW
     5222   01 01497    20000179              K        2,0,0,LOC+2
     5223   01 01498    40000000 A            DATA     X'40000000',X'41000000',0,0,32768,2048
            01 01499    41000000 A
            01 0149A    00000000 A
            01 0149B    00000000 A
            01 0149C    00008000 A
            01 0149D    00000800 A
     5224   01 0149E    FFFFFFF6 A   SF046    DATA     -10               B19
     5225   01 0149F    24C0017F A            SF,12    X'17F'
     5226   01 014A0    00000139              DATA     SETPSW
     5227   01 014A1    20000179              K        2,0,0,LOC+2
     5228   01 014A2    30000000 A            DATA     X'30000000',X'31000000',0,0,65536,4096
            01 014A3    31000000 A
            01 014A4    00000000 A
            01 014A5    00000000 A
            01 014A6    00010000 A
            01 014A7    00001000 A
     5229   01 014A8    FFFFFFF6 A   SF047    DATA     -10               B18
     5230   01 014A9    24C0017F A            SF,12    X'17F'
     5231   01 014AA    00000139              DATA     SETPSW
     5232   01 014AB    20000179              K        2,0,0,LOC+2
     5233   01 014AC    20000000 A            DATA     X'20000000',X'21000000',0,0,131072,8192
            01 014AD    21000000 A
            01 014AE    00000000 A
            01 014AF    00000000 A
            01 014B0    00020000 A
            01 014B1    00002000 A
     5234   01 014B2    FFFFFFF6 A   SF048    DATA     -10               B17
     5235   01 014B3    24C0017F A            SF,12    X'17F'
     5236   01 014B4    00000139              DATA     SETPSW
     5237   01 014B5    20000179              K        2,0,0,LOC+2
     5238   01 014B6    10000000 A            DATA     X'10000000',X'11000000',0,0,262144,16384
            01 014B7    11000000 A
            01 014B8    00000000 A
            01 014B9    00000000 A
            01 014BA    00040000 A
            01 014BB    00004000 A
     5239   01 014BC    FFFFFFF6 A   SF049    DATA     -10               B16
     5240   01 014BD    24C0017F A            SF,12    X'17F'
     5241   01 014BE    00000139              DATA     SETPSW
     5242   01 014BF    20000179              K        2,0,0,LOC+2
     5243   01 014C0    00000000 A            DATA     0,X'1000000',0,0,524288,32768
            01 014C1    01000000 A
            01 014C2    00000000 A
            01 014C3    00000000 A
            01 014C4    00080000 A
            01 014C5    00008000 A
     5244                            ** CHECK THAT UNUSED BITS IN ADDRESS FIELD HAVE NO EFFECT
     5245                            ** ALSO THAT INDEXING WILL CHANGE A - COUNT TO A + COUNT
     5246   01 014C6    FFFFFFF4 A   SF050    DATA     -12
     5247   01 014C7    A4C204A2              SF,12    *MEMORY,1
     5248   01 014C8    00000139              K        0,0,0,SETPSW
     5249   01 014C9    20000179              K        2,0,0,LOC+2
     5250   01 014CA    04000011 A            DATA     X'04000011',X'03000110',X'FFFFFEF0',X'FFFFFEF0',-9,-9
            01 014CB    03000110 A
            01 014CC    FFFFFEF0 A
            01 014CD    FFFFFEF0 A
            01 014CE    FFFFFFF7 A
            01 014CF    FFFFFFF7 A
     5251   01 014D0    00000008 A            DATA     8,8
            01 014D1    00000008 A
     5252   01 014D2    FFFFFFF4 A   SF01     DATA     -12               SF
     5253   01 014D3    24C00101 A            SF,12    X'101'
     5254   01 014D4    073001FB              K        0,7,3,FLPFSW
     5255   01 014D5    A7300179              K        10,7,3,LOC+2
     5256   01 014D6    010F0F0F A            DATA     X'010F0F0F'
     5257   01 014D7    00F0F0F0 A            DATA     X'00F0F0F0'
     5258   01 014D8    00000000 A            DATA     X'0'
     5259   01 014D9    00000000 A            DATA     X'0'
     5260   01 014DA    0F0F0F0F A            DATA     X'0F0F0F0F'
     5261   01 014DB    F0F0F0F0 A            DATA     X'F0F0F0F0'
     5262   01 014DC    00000000 A            DATA     X'0'
     5263   01 014DD    00000000 A            DATA     X'0'
     5264   01 014DE    FFFFFFF4 A   SF02     DATA     -12               SF
     5265   01 014DF    24C00101 A            SF,12    X'101'
     5266   01 014E0    073001FB              K        0,7,3,FLPFSW
     5267   01 014E1    27300179              K        2,7,3,LOC+2
     5268   01 014E2    0300F0F0 A            DATA     X'0300F0F0'
     5269   01 014E3    020F0F0F A            DATA     X'020F0F0F'
     5270   01 014E4    00000000 A            DATA     X'0'
     5271   01 014E5    00000000 A            DATA     X'0'
     5272   01 014E6    F0F0F0F0 A            DATA     X'F0F0F0F0'
     5273   01 014E7    0F0F0F00 A            DATA     X'0F0F0F00'
     5274   01 014E8    00000000 A            DATA     X'0'
     5275   01 014E9    00000000 A            DATA     X'0'
     5276   01 014EA    FFFFFFF4 A   SF03     DATA     -12               SF
     5277   01 014EB    24C0017F A            SF,12    X'17F'
     5278   01 014EC    073001FB              K        0,7,3,FLPFSW
     5279   01 014ED    27300179              K        2,7,3,LOC+2
     5280   01 014EE    010F0F0F A            DATA     X'010F0F0F'
     5281   01 014EF    0200F0F0 A            DATA     X'0200F0F0'
     5282   01 014F0    00000000 A            DATA     X'0'
     5283   01 014F1    00000000 A            DATA     X'0'
     5284   01 014F2    0F0F0F0F A            DATA     X'0F0F0F0F'
     5285   01 014F3    F0F0F0F0 A            DATA     X'F0F0F0F0'
     5286   01 014F4    00000000 A            DATA     X'0'
     5287   01 014F5    00000000 A            DATA     X'0'
     5288   01 014F6    FFFFFFF4 A   SF04     DATA     -12               SF
     5289   01 014F7    24C0017F A            SF,12    X'17F'
     5290   01 014F8    073001FB              K        0,7,3,FLPFSW
     5291   01 014F9    27300179              K        2,7,3,LOC+2
     5292   01 014FA    03F0F0F0 A            DATA     X'03F0F0F0'
     5293   01 014FB    040F0F0F A            DATA     X'040F0F0F'
     5294   01 014FC    00000000 A            DATA     X'0'
     5295   01 014FD    00000000 A            DATA     X'0'
     5296   01 014FE    F0F0F0F0 A            DATA     X'F0F0F0F0'
     5297   01 014FF    0F0F0F0F A            DATA     X'0F0F0F0F'
     5298   01 01500    00000000 A            DATA     X'0'
     5299   01 01501    00000000 A            DATA     X'0'
     5300   01 01502    FFFFFFF4 A   SF05     DATA     -12               SF
     5301   01 01503    24C00101 A            SF,12    X'101'
     5302   01 01504    073001FB              K        0,7,3,FLPFSW
     5303   01 01505    87300179              K        8,7,3,LOC+2
     5304   01 01506    7F000000 A            DATA     X'7F000000'
     5305   01 01507    00000000 A            DATA     X'0'
     5306   01 01508    00000000 A            DATA     X'0'
     5307   01 01509    00000000 A            DATA     X'0'
     5308   01 0150A    00000000 A            DATA     X'0'
     5309   01 0150B    00000000 A            DATA     X'0'
     5310   01 0150C    00000000 A            DATA     X'0'
     5311   01 0150D    00000000 A            DATA     X'0'
     5312   01 0150E    FFFFFFF4 A   SF06     DATA     -12               SF
     5313   01 0150F    24C00041 A            SF,12    X'041'
     5314   01 01510    073001FB              K        0,7,3,FLPFSW
     5315   01 01511    07300179              K        0,7,3,LOC+2
     5316   01 01512    7F000000 A            DATA     X'7F000000'
     5317   01 01513    00000000 A            DATA     X'0'
     5318   01 01514    00000000 A            DATA     X'0'
     5319   01 01515    00000000 A            DATA     X'0'
     5320   01 01516    00000000 A            DATA     X'0'
     5321   01 01517    00000000 A            DATA     X'0'
     5322   01 01518    00000000 A            DATA     X'0'
     5323   01 01519    00000000 A            DATA     X'0'
     5324   01 0151A    FFFFFFF4 A   SF07     DATA     -12               SF
     5325   01 0151B    24C00101 A            SF,12    X'101'
     5326   01 0151C    073001FB              K        0,7,3,FLPFSW
     5327   01 0151D    57300179              K        5,7,3,LOC+2
     5328   01 0151E    FFFFFFFF A            DATA     X'FFFFFFFF'
     5329   01 0151F    80FFFFF0 A            DATA     X'80FFFFF0'
     5330   01 01520    00000000 A            DATA     X'0'
     5331   01 01521    00000000 A            DATA     X'0'
     5332   01 01522    00000000 A            DATA     X'0'
     5333   01 01523    00000000 A            DATA     X'0'
     5334   01 01524    00000000 A            DATA     X'0'
     5335   01 01525    00000000 A            DATA     X'0'
     5336   01 01526    FFFFFFF4 A   SF08     DATA     -12               SF
     5337   01 01527    24C00141 A            SF,12    X'141'
     5338   01 01528    073001FB              K        0,7,3,FLPFSW
     5339   01 01529    07300179              K        0,7,3,LOC+2
     5340   01 0152A    00FFFFFF A            DATA     X'00FFFFFF'
     5341   01 0152B    00000000 A            DATA     X'0'
     5342   01 0152C    00000000 A            DATA     X'0'
     5343   01 0152D    00000000 A            DATA     X'0'
     5344   01 0152E    FFFFFFFF A            DATA     X'FFFFFFFF'
     5345   01 0152F    00000000 A            DATA     X'0'
     5346   01 01530    00000000 A            DATA     X'0'
     5347   01 01531    00000000 A            DATA     X'0'
     5348   01 01532    FFFFFFF4 A   SF09     DATA     -12               SF
     5349   01 01533    24C00173 A            SF,12    X'173'
     5350   01 01534    073001FB              K        0,7,3,FLPFSW
     5351   01 01535    27300179              K        2,7,3,LOC+2
     5352   01 01536    72F00000 A            DATA     X'72F00000'
     5353   01 01537    7F000000 A            DATA     X'7F000000'
     5354   01 01538    00000000 A            DATA     X'0'
     5355   01 01539    00000000 A            DATA     X'0'
     5356   01 0153A    00000000 A            DATA     X'0'
     5357   01 0153B    0000000F A            DATA     X'0000000F'
     5358   01 0153C    00000000 A            DATA     X'0'
     5359   01 0153D    00000000 A            DATA     X'0'
     5360   01 0153E    FFFFFFF4 A   SF10     DATA     -12               SF
     5361   01 0153F    24C0013F A            SF,12    X'13F'
     5362   01 01540    073001FB              K        0,7,3,FLPFSW
     5363   01 01541    A7300179              K        10,7,3,LOC+2
     5364   01 01542    07080000 A            DATA     X'07080000'
     5365   01 01543    06800000 A            DATA     X'06800000'
     5366   01 01544    00000000 A            DATA     X'0'
     5367   01 01545    00000000 A            DATA     X'0'
     5368   01 01546    00000000 A            DATA     X'0'
     5369   01 01547    00000000 A            DATA     X'0'
     5370   01 01548    00000000 A            DATA     X'0'
     5371   01 01549    00000000 A            DATA     X'0'
     5372   01 0154A    FFFFFFF4 A   SF11     DATA     -12               SF
     5373   01 0154B    24C00172 A            SF,12    X'172'
     5374   01 0154C    073001FB              K        0,7,3,FLPFSW
     5375   01 0154D    07300179              K        0,7,3,LOC+2
     5376   01 0154E    72FFFFFF A            DATA     X'72FFFFFF'
     5377   01 0154F    00000000 A            DATA     X'0'
     5378   01 01550    00000000 A            DATA     X'0'
     5379   01 01551    00000000 A            DATA     X'0'
     5380   01 01552    FFFFFFFF A            DATA     X'FFFFFFFF'
     5381   01 01553    00000000 A            DATA     X'0'
     5382   01 01554    00000000 A            DATA     X'0'
     5383   01 01555    00000000 A            DATA     X'0'
     5384   01 01556    FFFFFFF4 A   SF12     DATA     -12               SF
     5385   01 01557    24C0010D A            SF,12    X'10D'
     5386   01 01558    073001FB              K        0,7,3,FLPFSW
     5387   01 01559    A7300179              K        10,7,3,LOC+2
     5388   01 0155A    73000000 A            DATA     X'73000000'
     5389   01 0155B    66100000 A            DATA     X'66100000'
     5390   01 0155C    00000000 A            DATA     X'0'
     5391   01 0155D    00000000 A            DATA     X'0'
     5392   01 0155E    00000001 A            DATA     X'00000001'
     5393   01 0155F    00000000 A            DATA     X'0'
     5394   01 01560    00000000 A            DATA     X'0'
     5395   01 01561    00000000 A            DATA     X'0'
     5396   01 01562    FFFFFFF4 A   SF13     DATA     -12               SF
     5397   01 01563    24C0017E A            SF,12    X'17E'
     5398   01 01564    073001FB              K        0,7,3,FLPFSW
     5399   01 01565    67300179              K        6,7,3,LOC+2
     5400   01 01566    7FF00000 A            DATA     X'7FF00000'
     5401   01 01567    000F0000 A            DATA     X'000F0000'
     5402   01 01568    00000000 A            DATA     X'0'
     5403   01 01569    00000000 A            DATA     X'0'
     5404   01 0156A    0000000F A            DATA     X'0000000F'
     5405   01 0156B    00000000 A            DATA     X'0'
     5406   01 0156C    00000000 A            DATA     X'0'
     5407   01 0156D    00000000 A            DATA     X'0'
     5408   01 0156E    FFFFFFF4 A   SF14     DATA     -12               SF
     5409   01 0156F    24C00000 A            SF,12    X'000'
     5410   01 01570    073001FB              K        0,7,3,FLPFSW
     5411   01 01571    A7300179              K        10,7,3,LOC+2
     5412   01 01572    7F555555 A            DATA     X'7F555555'
     5413   01 01573    7F555555 A            DATA     X'7F555555'
     5414   01 01574    00000000 A            DATA     X'0'
     5415   01 01575    00000000 A            DATA     X'0'
     5416   01 01576    00000000 A            DATA     X'0'
     5417   01 01577    00000000 A            DATA     X'0'
     5418   01 01578    00000000 A            DATA     X'0'
     5419   01 01579    00000000 A            DATA     X'0'
     5420   01 0157A    FFFFFFF4 A   SF15     DATA     -12               SF
     5421   01 0157B    24C00101 A            SF,12    X'101'
     5422   01 0157C    073001FB              K        0,7,3,FLPFSW
     5423   01 0157D    97300179              K        9,7,3,LOC+2
     5424   01 0157E    FE000000 A            DATA     X'FE000000'
     5425   01 0157F    FE000000 A            DATA     X'FE000000'
     5426   01 01580    00000000 A            DATA     X'0'
     5427   01 01581    00000000 A            DATA     X'0'
     5428   01 01582    FFFFFFFF A            DATA     X'FFFFFFFF'
     5429   01 01583    FFFFFFFF A            DATA     X'FFFFFFFF'
     5430   01 01584    00000000 A            DATA     X'0'
     5431   01 01585    00000000 A            DATA     X'0'
     5432   01 01586    FFFFFFF4 A   SF16     DATA     -12               SF
     5433   01 01587    24D0017E A            SF,13    X'17E'
     5434   01 01588    073001FB              K        0,7,3,FLPFSW
     5435   01 01589    27300179              K        2,7,3,LOC+2
     5436   01 0158A    7FAAAAAA A            DATA     X'7FAAAAAA'
     5437   01 0158B    7FAAAAAA A            DATA     X'7FAAAAAA'
     5438   01 0158C    00000000 A            DATA     X'0'
     5439   01 0158D    00000000 A            DATA     X'0'
     5440   01 0158E    40555555 A            DATA     X'40555555'
     5441   01 0158F    42005555 A            DATA     X'42005555'
     5442   01 01590    00000000 A            DATA     X'0'
     5443   01 01591    00000000 A            DATA     X'0'
     5444   01 01592    FFFFFFF4 A   SF17     DATA     -12               SF
     5445   01 01593    24D00104 A            SF,13    X'104'
     5446   01 01594    073001FB              K        0,7,3,FLPFSW
     5447   01 01595    A7300179              K        10,7,3,LOC+2
     5448   01 01596    00000001 A            DATA     X'00000001'
     5449   01 01597    00000001 A            DATA     X'1'
     5450   01 01598    00000000 A            DATA     X'0'
     5451   01 01599    00000000 A            DATA     X'0'
     5452   01 0159A    40000FFF A            DATA     X'40000FFF'
     5453   01 0159B    3DFFF400 A            DATA     X'3DFFF400'
     5454   01 0159C    00000000 A            DATA     X'0'
     5455   01 0159D    00000000 A            DATA     X'0'
     5456   01 0159E    FFFFFFF4 A   SF18     DATA     -12               SF
     5457   01 0159F    24C0007D A            SF,12    X'07D'
     5458   01 015A0    073001FB              K        0,7,3,FLPFSW
     5459   01 015A1    07300179              K        0,7,3,LOC+2
     5460   01 015A2    FF000000 A            DATA     X'FF000000'
     5461   01 015A3    00000000 A            DATA     X'0'
     5462   01 015A4    00000000 A            DATA     X'0'
     5463   01 015A5    00000000 A            DATA     X'0'
     5464   01 015A6    00000000 A            DATA     X'0'
     5465   01 015A7    00000000 A            DATA     X'0'
     5466   01 015A8    00000000 A            DATA     X'0'
     5467   01 015A9    00000000 A            DATA     X'0'
     5468   01 015AA    FFFFFFF4 A   SF19     DATA     -12               SF
     5469   01 015AB    24D00001 A            SF,13    X'001'
     5470   01 015AC    073001FB              K        0,7,3,FLPFSW
     5471   01 015AD    A7300179              K        10,7,3,LOC+2
     5472   01 015AE    00000000 A            DATA     X'0'
     5473   01 015AF    00000000 A            DATA     X'0'
     5474   01 015B0    00000000 A            DATA     X'0'
     5475   01 015B1    00000000 A            DATA     X'0'
     5476   01 015B2    080F0F0F A            DATA     X'080F0F0F'
     5477   01 015B3    07F0F0F0 A            DATA     X'07F0F0F0'
     5478   01 015B4    00000000 A            DATA     X'0'
     5479   01 015B5    00000000 A            DATA     X'0'
     5480   01 015B6    FFFFFFF4 A   SF20     DATA     -12               SF
     5481   01 015B7    24D0007F A            SF,13    X'07F'
     5482   01 015B8    073001FB              K        0,7,3,FLPFSW
     5483   01 015B9    27300179              K        2,7,3,LOC+2
     5484   01 015BA    00000000 A            DATA     X'0'
     5485   01 015BB    00000000 A            DATA     X'0'
     5486   01 015BC    00000000 A            DATA     X'0'
     5487   01 015BD    00000000 A            DATA     X'0'
     5488   01 015BE    07F0F0F0 A            DATA     X'07F0F0F0'
     5489   01 015BF    080F0F0F A            DATA     X'080F0F0F'
     5490   01 015C0    00000000 A            DATA     X'0'
     5491   01 015C1    00000000 A            DATA     X'0'
     5492   01 015C2    FFFFFFF4 A   SF21     DATA     -12               SF
     5493   01 015C3    A4C004A2              SF,12    *MEMORY
     5494   01 015C4    073001FB              K        0,7,3,FLPFSW
     5495   01 015C5    A7300179              K        10,7,3,LOC+2
     5496   01 015C6    010F0F0F A            DATA     X'010F0F0F'
     5497   01 015C7    00F0F0F0 A            DATA     X'00F0F0F0'
     5498   01 015C8    00000101 A            DATA     X'101'
     5499   01 015C9    00000101 A            DATA     X'101'
     5500   01 015CA    0F0F0F0F A            DATA     X'0F0F0F0F'
     5501   01 015CB    F0F0F0F0 A            DATA     X'F0F0F0F0'
     5502   01 015CC    00000000 A            DATA     X'0'
     5503   01 015CD    00000000 A            DATA     X'0'
     5504   01 015CE    FFFFFFF4 A   SF22     DATA     -12               SF
     5505   01 015CF    24CE0101 A            SF,12    X'101',7
     5506   01 015D0    073001FB              K        0,7,3,FLPFSW
     5507   01 015D1    A7300179              K        10,7,3,LOC+2
     5508   01 015D2    010F0F0F A            DATA     X'010F0F0F'
     5509   01 015D3    00F0F0F0 A            DATA     X'00F0F0F0'
     5510   01 015D4    00000000 A            DATA     X'0'
     5511   01 015D5    00000000 A            DATA     X'0'
     5512   01 015D6    0F0F0F0F A            DATA     X'0F0F0F0F'
     5513   01 015D7    F0F0F0F0 A            DATA     X'F0F0F0F0'
     5514   01 015D8    00000000 A            DATA     X'0'
     5515   01 015D9    00000000 A            DATA     X'0'
     5516   01 015DA    FFFFFFF4 A   SF23     DATA     -12               SF
     5517   01 015DB    A4CE04A2              SF,12    *MEMORY,7
     5518   01 015DC    073001FB              K        0,7,3,FLPFSW
     5519   01 015DD    A7300179              K        10,7,3,LOC+2
     5520   01 015DE    010F0F0F A            DATA     X'010F0F0F'
     5521   01 015DF    00F0F0F0 A            DATA     X'00F0F0F0'
     5522   01 015E0    00000100 A            DATA     X'100'
     5523   01 015E1    00000100 A            DATA     X'100'
     5524   01 015E2    0F0F0F0F A            DATA     X'0F0F0F0F'
     5525   01 015E3    F0F0F0F0 A            DATA     X'F0F0F0F0'
     5526   01 015E4    00000000 A            DATA     X'0'
     5527   01 015E5    00000000 A            DATA     X'0'
     5528                            ** CHECK COND CODE SETTINGS AND TRAP LOCATIONS. I9 SET FOR FIRST SIX
     5529   01 015E6    FFFFFFFC A   CAL01    DATA     -4
     5530   01 015E7    043015E7              CAL1,3   %
     5531   01 015E8    07900201              K        0,7,9,SI9CL1      SLAVE MODE
     5532   01 015E9    3710009E              K        3,7,1,C1RET+4
     5533   01 015EA    FFFFFFFC A   CAL02    DATA     -4
     5534   01 015EB    05C015EB              CAL2,12  %
     5535   01 015EC    07300207              K        0,7,3,SI9CL2      MASTER MODE
     5536   01 015ED    C73000BB              K        12,7,3,C2RET+13
     5537   01 015EE    FFFFFFFC A   CAL03    DATA     -4
     5538   01 015EF    06A015EF              CAL3,10  %
     5539   01 015F0    0080020D              K        0,0,8,SI9CL3      SLAVE
     5540   01 015F1    A00000CD              K        10,0,0,C3RET+11
     5541   01 015F2    FFFFFFFC A   CAL04    DATA     -4
     5542   01 015F3    075015F3              CAL4,5   %
     5543   01 015F4    00000213              K        0,0,0,SI9CL4      MASTER
     5544   01 015F5    500000DC              K        5,0,0,C4RET+6
     5545                            ** CHECK THAT IA AND IX HAS NO EFFECT
     5546   01 015F6    FFFFFFF8 A   CAL05    DATA     -8
     5547   01 015F7    870E04A2              CAL4,0   *MEMORY,7
     5548   01 015F8    F0800213              K        15,0,8,SI9CL4     SLAVE
     5549   01 015F9    F00000D7              K        15,0,0,C4RET+1
     5550   01 015FA    00000000 A            DATA     0
     5551   01 015FB    00000000 A            DATA     0
     5552   01 015FC    000004A2              DATA     MEMORY
     5553   01 015FD    000004A2              DATA     MEMORY
     5554   01 015FE    FFFFFFFC A   CAL06    DATA     -4
     5555   01 015FF    07F015FF              CAL4,F   %
     5556   01 01600    00000213              K        0,0,0,SI9CL4      MASTER
     5557   01 01601    F00000E6              K        15,0,0,C4RET+16
     5558                            ** I9 RESET
     5559   01 01602    FFFFFFFC A   CAL07    DATA     -4
     5560   01 01603    07F01603              CAL4,F   %
     5561   01 01604    00000214              K        0,0,0,RI9CL4      MASTER
     5562   01 01605    F00000D7              K        15,0,0,C4RET+1
     5563                            ***
     5564                            ***  CAUTION !!!
     5565                            ***
     5566                            ***  PSW1 OUT IS DEPENDENT UPON THE SENSE SWITCH SETTING WHEN EXECUTING
     5567                            ***  FARWD INSTRUCTIONS. A FALSE ERROR COULD OCCUR IF SWITCHES ARE
     5568                            ***  OPERATED.
     5569                            ***  TO RECOVER USE THE CP INTERRUPT SET THE SENSE SWITCHES, ENTER
     5570                            ***  THE MODULE LOCATION IN R1, DISPLAY THE IA AND RUN.
     5571   01 01606    FFFFFFF2 A   FARWD01  DATA     -14
     5572   01 01607    6DC00037 A            WD,12    X'37'             SET ALL INTERRPUT INHIBITS IN PSW2
     5573   01 01608    00000219              DATA     FARWD
     5574   01 01609    00000179              DATA     LOC+2
     5575   01 0160A    00000000 A            DATA     0,0,0,0,0,0,0,0,0,X'7000000'
            01 0160B    00000000 A
            01 0160C    00000000 A
            01 0160D    00000000 A
            01 0160E    00000000 A
            01 0160F    00000000 A
            01 01610    00000000 A
            01 01611    00000000 A
            01 01612    00000000 A
            01 01613    07000000 A
     5576   01 01614    FFFFFFF2 A   FARWD02  DATA     -14               INTERRUPT INHIBIT TEST
     5577   01 01615    6DC00030 A            WD,12    X'30'             TRY TO SET W/O SPECIFYING ANY BITS
     5578   01 01616    00000219              DATA     FARWD
     5579   01 01617    00000179              DATA     LOC+2
     5580   01 01618    FFFFFFFF A            DATA     -1,-1,-1,-1,-1,-1,-1,-1,0,0   PSW2 IN=0  PSW2 OUT=0
            01 01619    FFFFFFFF A
            01 0161A    FFFFFFFF A
            01 0161B    FFFFFFFF A
            01 0161C    FFFFFFFF A
            01 0161D    FFFFFFFF A
            01 0161E    FFFFFFFF A
            01 0161F    FFFFFFFF A
            01 01620    00000000 A
            01 01621    00000000 A
     5581   01 01622    FFFFFFF2 A   FARWD03  DATA     -14               INTERRUPT INHIBIT TEST
     5582   01 01623    6DC00027 A            WD,12    X'27'             RESET ALL BITS
     5583   01 01624    00000219              DATA     FARWD
     5584   01 01625    00000179              DATA     LOC+2
     5585   01 01626    00000000 A            DATA     0,0,0,0,0,0,0,0
            01 01627    00000000 A
            01 01628    00000000 A
            01 01629    00000000 A
            01 0162A    00000000 A
            01 0162B    00000000 A
            01 0162C    00000000 A
            01 0162D    00000000 A
     5586   01 0162E    07000000 A            GEN,8,24 7,0               PSW2 IN
     5587   01 0162F    00000000 A            DATA     0                 PSW2 OUT
     5588   01 01630    FFFFFFF2 A   FARWD04  DATA     -14               INTERRUPT INHIBIT TEST
     5589   01 01631    6DC00020 A            WD,12    X'20'             TRY TO RESET W/O SPECIFYING BITS
     5590   01 01632    00000219              DATA     FARWD
     5591   01 01633    00000179              DATA     LOC+2
     5592   01 01634    00000000 A            DATA     0,0,0,0,0,0,0,0
            01 01635    00000000 A
            01 01636    00000000 A
            01 01637    00000000 A
            01 01638    00000000 A
            01 01639    00000000 A
            01 0163A    00000000 A
            01 0163B    00000000 A
     5593   01 0163C    07000000 A            GEN,8,24,8,24 7,0,7,0      PSW2 IN AND OUT
                        07000000
     5594   01 0163E    FFFFFFF2 A   FARWD05  DATA     -14               INTERRUPT INHIBIT TEST
     5595   01 0163F    6CC00037 A            RD,12    X'37'             ONLY WD SHOULD SET BITS
     5596   01 01640    00000219              DATA     FARWD,LOC+2
            01 01641    00000179
     5597   01 01642    FFFFFFFF A            DATA     -1,0,0,0,0,0,0,0,0,0
            01 01643    00000000 A
            01 01644    00000000 A
            01 01645    00000000 A
            01 01646    00000000 A
            01 01647    00000000 A
            01 01648    00000000 A
            01 01649    00000000 A
            01 0164A    00000000 A
            01 0164B    00000000 A
     5598                            ** CHECK THAT INDX=C4 C14
     5599                            ** INDEXING ALIGNMENT IS CHECKED BY THE BYTE, HALF AND DOUBLEWORD MODULE
     5600   01 0164C    FFFFFFF8 A   IX01     DATA     -8
     5601   01 0164D    48C3EE56 A            EOR,12   MEMORY-IX01,1
     5602   01 0164E    00000139              DATA     SETPSW,LOC+2
            01 0164F    00000179
     5603   01 01650    0000164C              DATA     IX01,0,IX01,IX01
            01 01651    00000000 A
            01 01652    0000164C
            01 01653    0000164C
     5604                            ** CHECK THAT INDX=C3.C12
     5605   01 01654    FFFFFFF8 A   IX02     DATA     -8
     5606   01 01655    30C80004 A            AW,12    4,4               EFF ADDR IS 8. CONTENTS OF MEM IN 8
     5607   01 01656    00000139              DATA     SETPSW
     5608   01 01657    20000179              K        2,0,0,LOC+2
     5609   01 01658    00000064 A            DATA     100,300,200,200
            01 01659    0000012C A
            01 0165A    000000C8 A
            01 0165B    000000C8 A
     5610                            ** CHECK THAT INDX= C5.C13
     5611   01 0165C    FFFFFFF6 A   IX03     DATA     -10
     5612   01 0165D    24C40002 A            SF,12    2,2               IX2 CONTAINS A 1. CAUSING LS OF 3.
     5613   01 0165E    00000139              K        0,0,0,SETPSW
     5614   01 0165F    A0000179              K        10,0,0,LOC+2
     5615   01 01660    14000100 A            DATA     X'14000100'
     5616   01 01661    11100000 A            DATA     X'11100000'
     5617   01 01662    00000000 A            DATA     0
     5618   01 01663    00000000 A            DATA     0
     5619   01 01664    FFFFFFFF A            DATA     -1
     5620   01 01665    FFFFFFFF A            DATA     -1
     5621                            ** TEST THAT A PRIVLEGED INSTRUCTION TRAPS IN SLAVE MODE
     5622   01 01666    FFFFFFFC A   FAPRIV01 DATA     -4
     5623   01 01667    0F0004A6              XPSD,0   RETURN
     5624   01 01668    F7B001E8              K        15,7,11,SI9NAO    I9=1 CAUSING TRACC2 ADDITION TO ADDR
     5625   01 01669    F7300065              K        F,7,3,MVRET+1
     5626                            ** TEST THAT FAPRIV IS FALSE WHEN O5 IS FALSE
     5627   01 0166A    FFFFFFFC A   FAPRIV02 DATA     -4
     5628   01 0166B    48C004A2              EOR,12   MEMORY
     5629   01 0166C    F7B00139              K        15,7,11,SETPSW
     5630   01 0166D    C7B00178              K        12,7,11,LOC+1
     5631                            ** TEST THAT FAPRIV IS FALSE WHEN O4 IS FALSE
     5632   01 0166E    FFFFFFFC A   FAPRIV03 DATA     -4
     5633   01 0166F    66C004A2              AWM,12   MEMORY
     5634   01 01670    F7B00139              K        15,7,11,SETPSW
     5635   01 01671    07B00178              K        0,7,11,LOC+1
     5636                            ** TEST THAT FAPRIV IS FALSE WHEN O3 IS TRUE. NON-EXSISTENT TRAP SHOULD
     5637                            ** OCCUR. A RETURN FROM NEIRET+2 INDICATES FAPRIV BECAME TRUE.
     5638   01 01672    FFFFFFFC A   FAPRIV04 DATA     -4
     5639   01 01673    7E0004A2              DL,0     MEMORY
     5640   01 01674    F7B001E8              K        15,7,11,SI9NAO
     5641   01 01675    F730006B              K        15,7,3,NEIRET+1
     5642                            ** THE FOLLOWING ROUTINES CHECK THAT ALL TERMS FOR FAILL (FAM ILLEGAL)
     5643                            ** ARE OPERATING PROPERLY. ALL CASES SHOULD TRAP TO 40.
     5644                            ** CHECK  INPUT  IA.FAIM
     5645   01 01676    FFFFFFF8 A   FAILL01  DATA     -8
     5646   01 01677    A2C0049C N            GEN,16,16 X'A2C0',IA       LI,C *IA
     5647   01 01678    000001E8              DATA     SI9NAO
     5648   01 01679    8000006B              K        8,0,0,NEIRET+1
     5649   01 0167A    00000000 A            DATA     0                 R IN
     5650   01 0167B    00000000 A            DATA     0                 R OUT
     5651   01 0167C    00000100 A            DATA     X'100'            M IN
     5652   01 0167D    00000100 A            DATA     X'100'            M OUT
     5653                            ** CHECK INPUT  OU1.NO4.O5.O6-1
     5654   01 0167E    FFFFFFFC A   FAILL02  DATA     -4
     5655   01 0167F    16000000 A            DATA     X'16000000'       ILLEGAL INST
     5656   01 01680    000001E8              DATA     SI9NAO
     5657   01 01681    8000006B              K        8,0,0,NEIRET+1
     5658                            ** CHECK INPUT OU2.O4.NO5.NO6
     5659   01 01682    FFFFFFFC A   FAILL06  DATA     -4
     5660   01 01683    28C004A2              CVS,12   MEMORY
     5661   01 01684    000001E8              DATA     SI9NAO
     5662   01 01685    8000006B              K        8,0,0,NEIRET+1
     5663                            ** CHECK INPUT OU7.MO4.O5.O6
     5664   01 01686    FFFFFFFC A   FAILL07  DATA     -4
     5665   01 01687    76C004A2              PACK,12  MEMORY
     5666   01 01688    000001E8              DATA     SI9NAO
     5667   01 01689    8000006B              K        8,0,0,NEIRET+1
     5668                            ** CHECK INPUT OU7.O4
     5669   01 0168A    FFFFFFFC A   FAILL08  DATA     -4
     5670   01 0168B    7FC004A2              DST,12   MEMORY
     5671   01 0168C    000001E8              DATA     SI9NAO
     5672   01 0168D    8000006B              K        8,0,0,NEIRET+1
     5673                            ** CHECK INPUT O1.NO3.NO4.NO5
     5674   01 0168E    FFFFFFFC A   FAILL09  DATA     -4
     5675   01 0168F    41C01288              TBS,12   MEMORY
     5676   01 01690    000001E8              DATA     SI9NAO
     5677   01 01691    8000006B              K        8,0,0,NEIRET+1
     5678                            ** CHECK INPUT OU5.OL9
     5679   01 01692    FFFFFFFC A   FAILL10  DATA     -4
     5680   01 01693    59000000 A            DATA     X'59000000'
     5681   01 01694    000001E8              DATA     SI9NAO
     5682   01 01695    8000006B              K        8,0,0,NEIRET+1
     5683                            ** CHECK INPUT OL4.O3.NFABYTE
     5684   01 01696    FFFFFFFC A   FAILL11  DATA     -4
     5685   01 01697    34000000 A            DATA     X'34000000'
     5686   01 01698    000001E8              DATA     SI9NAO
     5687   01 01699    8000006B              K        8,0,0,NEIRET+1
     5688                            ** CHECK INPUT O4.O5.O1.O3
     5689   01 0169A    FFFFFFFC A   FAILL12  DATA     -4
     5690   01 0169B    7C0004A2              DSA      MEMORY
     5691   01 0169C    000001E8              DATA     SI9NAO
     5692   01 0169D    8000006B              K        8,0,0,NEIRET+1
     5693                            ** CHECK INPUT O4.O5.NO1.NO3.NO6
     5694   01 0169E    FFFFFFFC A   FAILL13  DATA     -4
     5695   01 0169F    0C000000 A            DATA     X'C000000'
     5696   01 016A0    000001E8              DATA     SI9NAO
     5697   01 016A1    8000006B              K        8,0,0,NEIRET+1
     5698                            ** THIS TEST IS BYPASSED IF FLOATING POINT IS INSTALLED. IF NOT
     5699                            ** INSTALLED, THIS TESTS NFAIMP = FAFL.NFPOPTION
     5700   01 016A2    FFFFFFFC A   NFAIMP01 DATA     -4
     5701   01 016A3    680001D9              B        END               BECOMES FAS,12MEMORY IF NFPOPTION
     5702   01 016A4    000001EE              K        0,0,0,UIISW
     5703   01 016A5    00000077              K        0,0,0,UIIRET+1
     5704   01 016A6    FFFFFFF6 A   MW01     DATA     -10               MW
     5705   01 016A7    37C004A2              MW,12    MEMORY
     5706   01 016A8    073001F4              K        00,7,3,FXPOSW
     5707   01 016A9    57300179              K        5,7,3,LOC+2
     5708   01 016AA    55555555 A            DATA     X'55555555'
     5709   01 016AB    D58E3546 A            DATA     X'D58E3546'
     5710   01 016AC    55555555 A            DATA     X'55555555'
     5711   01 016AD    55555555 A            DATA     X'55555555'
     5712   01 016AE    80AA9FD4 A            DATA     X'80AA9FD4'
     5713   01 016AF    D51C7564 A            DATA     X'D51C7564'
     5714   01 016B0    FFFFFFF6 A   MW02     DATA     -10               MW
     5715   01 016B1    37C004A2              MW,12    MEMORY
     5716   01 016B2    073001F4              K        00,7,3,FXPOSW
     5717   01 016B3    57300179              K        5,7,3,LOC+2
     5718   01 016B4    00000000 A            DATA     X'00000000'
     5719   01 016B5    FE40CB5E A            DATA     X'FE40CB5E'
     5720   01 016B6    FC7CF1CC A            DATA     X'FC7CF1CC'
     5721   01 016B7    FC7CF1CC A            DATA     X'FC7CF1CC'
     5722   01 016B8    7F56BA80 A            DATA     X'7F56BA80'
     5723   01 016B9    74AF1E00 A            DATA     X'74AF1E00'
     5724   01 016BA    FFFFFFF6 A   MW03     DATA     -10               MW
     5725   01 016BB    37C004A2              MW,12    MEMORY
     5726   01 016BC    073001F4              K        00,7,3,FXPOSW
     5727   01 016BD    67300179              K        6,7,3,LOC+2
     5728   01 016BE    00000000 A            DATA     X'00000000'
     5729   01 016BF    15BB908B A            DATA     X'15BB908B'
     5730   01 016C0    59C61C18 A            DATA     X'59C61C18'
     5731   01 016C1    59C61C18 A            DATA     X'59C61C18'
     5732   01 016C2    3DF91CF8 A            DATA     X'3DF91CF8'
     5733   01 016C3    AE55D740 A            DATA     X'AE55D740'
     5734   01 016C4    FFFFFFF6 A   MW04     DATA     -10               MW
     5735   01 016C5    37C004A2              MW,12    MEMORY
     5736   01 016C6    073001F4              K        00,7,3,FXPOSW
     5737   01 016C7    57300179              K        5,7,3,LOC+2
     5738   01 016C8    00000000 A            DATA     X'00000000'
     5739   01 016C9    FAE49435 A            DATA     X'FAE49435'
     5740   01 016CA    F1C3C731 A            DATA     X'F1C3C731'
     5741   01 016CB    F1C3C731 A            DATA     X'F1C3C731'
     5742   01 016CC    5BD80E1D A            DATA     X'5BD80E1D'
     5743   01 016CD    946A3E8D A            DATA     X'946A3E8D'
     5744   01 016CE    FFFFFFF6 A   MW05     DATA     -10               MW
     5745   01 016CF    37C004A2              MW,12    MEMORY
     5746   01 016D0    073001F4              K        00,7,3,FXPOSW
     5747   01 016D1    67300179              K        6,7,3,LOC+2
     5748   01 016D2    00000000 A            DATA     X'00000000'
     5749   01 016D3    1EC17468 A            DATA     X'1EC17468'
     5750   01 016D4    3F01FC03 A            DATA     X'3F01FC03'
     5751   01 016D5    3F01FC03 A            DATA     X'3F01FC03'
     5752   01 016D6    7CF5C8E1 A            DATA     X'7CF5C8E1'
     5753   01 016D7    907FD6A3 A            DATA     X'907FD6A3'
     5754   01 016D8    FFFFFFF6 A   MW06     DATA     -10               MW
     5755   01 016D9    37C004A2              MW,12    MEMORY
     5756   01 016DA    073001F4              K        00,7,3,FXPOSW
     5757   01 016DB    57300179              K        5,7,3,LOC+2
     5758   01 016DC    00000000 A            DATA     X'00000000'
     5759   01 016DD    CD4A4EA5 A            DATA     X'CD4A4EA5'
     5760   01 016DE    70000000 A            DATA     X'70000000'
     5761   01 016DF    70000000 A            DATA     X'70000000'
     5762   01 016E0    8C178F32 A            DATA     X'8C178F32'
     5763   01 016E1    E0000000 A            DATA     X'E0000000'
     5764   01 016E2    FFFFFFF6 A   MW07     DATA     -10               MW
     5765   01 016E3    37C004A2              MW,12    MEMORY
     5766   01 016E4    073001F4              K        00,7,3,FXPOSW
     5767   01 016E5    57300179              K        5,7,3,LOC+2
     5768   01 016E6    00000000 A            DATA     X'00000000'
     5769   01 016E7    EC7E668F A            DATA     X'EC7E668F'
     5770   01 016E8    CDB53C70 A            DATA     X'CDB53C70'
     5771   01 016E9    CDB53C70 A            DATA     X'CDB53C70'
     5772   01 016EA    634AC271 A            DATA     X'634AC271'
     5773   01 016EB    ED2C8D70 A            DATA     X'ED2C8D70'
     5774   01 016EC    FFFFFFF6 A   MW08     DATA     -10               MW
     5775   01 016ED    37C004A2              MW,12    MEMORY
     5776   01 016EE    073001F4              K        00,7,3,FXPOSW
     5777   01 016EF    57300179              K        5,7,3,LOC+2
     5778   01 016F0    00000000 A            DATA     X'00000000'
     5779   01 016F1    FAA8C9D1 A            DATA     X'FAA8C9D1'
     5780   01 016F2    31C3C1F0 A            DATA     X'31C3C1F0'
     5781   01 016F3    31C3C1F0 A            DATA     X'31C3C1F0'
     5782   01 016F4    E486C662 A            DATA     X'E486C662'
     5783   01 016F5    B88FDDE0 A            DATA     X'B88FDDE0'
     5784   01 016F6    FFFFFFF6 A   MW09     DATA     -10               MW
     5785   01 016F7    37C004A2              MW,12    MEMORY
     5786   01 016F8    073001F4              K        00,7,3,FXPOSW
     5787   01 016F9    57300179              K        5,7,3,LOC+2
     5788   01 016FA    00000000 A            DATA     X'00000000'
     5789   01 016FB    F47642A4 A            DATA     X'F47642A4'
     5790   01 016FC    DF4F3C70 A            DATA     X'DF4F3C70'
     5791   01 016FD    DF4F3C70 A            DATA     X'DF4F3C70'
     5792   01 016FE    5A5ACF3B A            DATA     X'5A5ACF3B'
     5793   01 016FF    28817DD0 A            DATA     X'28817DD0'
     5794   01 01700    FFFFFFF6 A   MW10     DATA     -10               MW
     5795   01 01701    37C004A2              MW,12    MEMORY
     5796   01 01702    073001F4              K        00,7,3,FXPOSW
     5797   01 01703    17300179              K        1,7,3,LOC+2
     5798   01 01704    00000000 A            DATA     X'00000000'
     5799   01 01705    FFFFFFFF A            DATA     X'FFFFFFFF'
     5800   01 01706    FFFFFFFF A            DATA     X'FFFFFFFF'
     5801   01 01707    FFFFFFFF A            DATA     X'FFFFFFFF'
     5802   01 01708    55555551 A            DATA     X'55555551'
     5803   01 01709    AAAAAAAF A            DATA     X'AAAAAAAF'
     5804   01 0170A    FFFFFFF6 A   MW11     DATA     -10               MW
     5805   01 0170B    37C004A2              MW,12    MEMORY
     5806   01 0170C    073001F4              K        00,7,3,FXPOSW
     5807   01 0170D    17300179              K        1,7,3,LOC+2
     5808   01 0170E    00000000 A            DATA     X'00000000'
     5809   01 0170F    FFFFFFFF A            DATA     X'FFFFFFFF'
     5810   01 01710    FFFFFFFF A            DATA     X'FFFFFFFF'
     5811   01 01711    FFFFFFFF A            DATA     X'FFFFFFFF'
     5812   01 01712    00000005 A            DATA     X'00000005'
     5813   01 01713    FFFFFFFB A            DATA     X'FFFFFFFB'
     5814   01 01714    FFFFFFF6 A   MW12     DATA     -10               MW
     5815   01 01715    37C004A2              MW,12    MEMORY
     5816   01 01716    073001F4              K        00,7,3,FXPOSW
     5817   01 01717    67300179              K        6,7,3,LOC+2
     5818   01 01718    00000000 A            DATA     X'00000000'
     5819   01 01719    06D3A075 A            DATA     X'06D3A075'
     5820   01 0171A    EEEEEEEE A            DATA     X'EEEEEEEE'
     5821   01 0171B    EEEEEEEE A            DATA     X'EEEEEEEE'
     5822   01 0171C    99999922 A            DATA     X'99999922'
     5823   01 0171D    92C5F99C A            DATA     X'92C5F99C'
     5824   01 0171E    FFFFFFF6 A   MW13     DATA     -10               MW
     5825   01 0171F    37C004A2              MW,12    MEMORY
     5826   01 01720    073001F4              K        00,7,3,FXPOSW
     5827   01 01721    07300179              K        0,7,3,LOC+2
     5828   01 01722    00000000 A            DATA     X'00000000'
     5829   01 01723    00000000 A            DATA     X'00000000'
     5830   01 01724    00000000 A            DATA     X'00000000'
     5831   01 01725    00000000 A            DATA     X'00000000'
     5832   01 01726    B3333334 A            DATA     X'B3333334'
     5833   01 01727    00000000 A            DATA     X'00000000'
     5834   01 01728    FFFFFFF6 A   MW14     DATA     -10               MW
     5835   01 01729    37C004A2              MW,12    MEMORY
     5836   01 0172A    073001F4              K        00,7,3,FXPOSW
     5837   01 0172B    67300179              K        6,7,3,LOC+2
     5838   01 0172C    00000000 A            DATA     X'00000000'
     5839   01 0172D    0EB851EA A            DATA     X'0EB851EA'
     5840   01 0172E    CCCCCCCC A            DATA     X'CCCCCCCC'
     5841   01 0172F    CCCCCCCC A            DATA     X'CCCCCCCC'
     5842   01 01730    B666666E A            DATA     X'B666666E'
     5843   01 01731    3AE147A8 A            DATA     X'3AE147A8'
     5844   01 01732    FFFFFFF6 A   MW15     DATA     -10               MW
     5845   01 01733    37C004A2              MW,12    MEMORY
     5846   01 01734    073001F4              K        00,7,3,FXPOSW
     5847   01 01735    57300179              K        5,7,3,LOC+2
     5848   01 01736    00000000 A            DATA     X'00000000'
     5849   01 01737    F58F28C2 A            DATA     X'F58F28C2'
     5850   01 01738    33333333 A            DATA     X'33333333'
     5851   01 01739    33333333 A            DATA     X'33333333'
     5852   01 0173A    CBCBCBCB A            DATA     X'CBCBCBCB'
     5853   01 0173B    3DA40A71 A            DATA     X'3DA40A71'
     5854   01 0173C    FFFFFFF6 A   MW16     DATA     -10               MW
     5855   01 0173D    37C004A2              MW,12    MEMORY
     5856   01 0173E    073001F4              K        00,7,3,FXPOSW
     5857   01 0173F    67300179              K        6,7,3,LOC+2
     5858   01 01740    00000000 A            DATA     X'00000000'
     5859   01 01741    36A45B36 A            DATA     X'36A45B36'
     5860   01 01742    6DB6DB6D A            DATA     X'6DB6DB6D'
     5861   01 01743    6DB6DB6D A            DATA     X'6DB6DB6D'
     5862   01 01744    7F7F7F7F A            DATA     X'7F7F7F7F'
     5863   01 01745    12A4EE13 A            DATA     X'12A4EE13'
     5864   01 01746    FFFFFFF6 A   MW17     DATA     -10               MW
     5865   01 01747    37C004A2              MW,12    MEMORY
     5866   01 01748    073001F4              K        00,7,3,FXPOSW
     5867   01 01749    57300179              K        5,7,3,LOC+2
     5868   01 0174A    00000000 A            DATA     X'00000000'
     5869   01 0174B    FEFF1010 A            DATA     X'FEFF1010'
     5870   01 0174C    DDDDDDDD A            DATA     X'DDDDDDDD'
     5871   01 0174D    DDDDDDDD A            DATA     X'DDDDDDDD'
     5872   01 0174E    07870787 A            DATA     X'07870787'
     5873   01 0174F    1B9C0A8B A            DATA     X'1B9C0A8B'
     5874   01 01750    FFFFFFF6 A   MW18     DATA     -10               MW
     5875   01 01751    37C004A2              MW,12    MEMORY
     5876   01 01752    073001F4              K        00,7,3,FXPOSW
     5877   01 01753    17300179              K        1,7,3,LOC+2
     5878   01 01754    00000000 A            DATA     X'00000000'
     5879   01 01755    FFFFFFFF A            DATA     X'FFFFFFFF'
     5880   01 01756    FFFFFFFF A            DATA     X'FFFFFFFF'
     5881   01 01757    FFFFFFFF A            DATA     X'FFFFFFFF'
     5882   01 01758    6B6D36D9 A            DATA     X'6B6D36D9'
     5883   01 01759    9492C927 A            DATA     X'9492C927'
     5884   01 0175A    FFFFFFF6 A   MW19     DATA     -10               MW
     5885   01 0175B    37C004A2              MW,12    MEMORY
     5886   01 0175C    073001F4              K        00,7,3,FXPOSW
     5887   01 0175D    57300179              K        5,7,3,LOC+2
     5888   01 0175E    00000000 A            DATA     X'00000000'
     5889   01 0175F    FB0DB4B6 A            DATA     X'FB0DB4B6'
     5890   01 01760    EEEEEEEE A            DATA     X'EEEEEEEE'
     5891   01 01761    EEEEEEEE A            DATA     X'EEEEEEEE'
     5892   01 01762    4A32694C A            DATA     X'4A32694C'
     5893   01 01763    656A8CA8 A            DATA     X'656A8CA8'
     5894   01 01764    FFFFFFF6 A   MW20     DATA     -10               MW
     5895   01 01765    37C004A2              MW,12    MEMORY
     5896   01 01766    073001F4              K        00,7,3,FXPOSW
     5897   01 01767    67300179              K        6,7,3,LOC+2
     5898   01 01768    00000000 A            DATA     X'00000000'
     5899   01 01769    15555552 A            DATA     X'15555552'
     5900   01 0176A    7FFFFFFF A            DATA     X'7FFFFFFF'
     5901   01 0176B    7FFFFFFF A            DATA     X'7FFFFFFF'
     5902   01 0176C    2AAAAAA6 A            DATA     X'2AAAAAA6'
     5903   01 0176D    D555555A A            DATA     X'D555555A'
     5904   01 0176E    FFFFFFF6 A   MW21     DATA     -10               MW
     5905   01 0176F    37C004A2              MW,12    MEMORY
     5906   01 01770    073001F4              K        00,7,3,FXPOSW
     5907   01 01771    67300179              K        6,7,3,LOC+2
     5908   01 01772    00000000 A            DATA     X'00000000'
     5909   01 01773    00000000 A            DATA     X'00000000'
     5910   01 01774    FFFFFFFF A            DATA     X'FFFFFFFF'
     5911   01 01775    FFFFFFFF A            DATA     X'FFFFFFFF'
     5912   01 01776    80000000 A            DATA     X'80000000'
     5913   01 01777    80000000 A            DATA     X'80000000'
     5914   01 01778    FFFFFFF6 A   MW22     DATA     -10               MW
     5915   01 01779    37C004A2              MW,12    MEMORY
     5916   01 0177A    073001F4              K        00,7,3,FXPOSW
     5917   01 0177B    67300179              K        6,7,3,LOC+2
     5918   01 0177C    00000000 A            DATA     X'00000000'
     5919   01 0177D    3FFFFFFF A            DATA     X'3FFFFFFF'
     5920   01 0177E    7FFFFFFF A            DATA     X'7FFFFFFF'
     5921   01 0177F    7FFFFFFF A            DATA     X'7FFFFFFF'
     5922   01 01780    7FFFFFFF A            DATA     X'7FFFFFFF'
     5923   01 01781    00000001 A            DATA     X'00000001'
     5924   01 01782    FFFFFFF6 A   MW23     DATA     -10               MW
     5925   01 01783    37C004A2              MW,12    MEMORY
     5926   01 01784    073001F4              K        00,7,3,FXPOSW
     5927   01 01785    67300179              K        6,7,3,LOC+2
     5928   01 01786    00000000 A            DATA     X'00000000'
     5929   01 01787    40000000 A            DATA     X'40000000'
     5930   01 01788    80000000 A            DATA     X'80000000'
     5931   01 01789    80000000 A            DATA     X'80000000'
     5932   01 0178A    80000000 A            DATA     X'80000000'
     5933   01 0178B    00000000 A            DATA     X'00000000'
     5934   01 0178C    FFFFFFF6 A   MW24     DATA     -10               MW
     5935   01 0178D    37C004A2              MW,12    MEMORY
     5936   01 0178E    073001F4              K        00,7,3,FXPOSW
     5937   01 0178F    17300179              K        1,7,3,LOC+2
     5938   01 01790    00000000 A            DATA     X'00000000'
     5939   01 01791    FFFFFFFF A            DATA     X'FFFFFFFF'
     5940   01 01792    00000001 A            DATA     X'00000001'
     5941   01 01793    00000001 A            DATA     X'00000001'
     5942   01 01794    80000000 A            DATA     X'80000000'
     5943   01 01795    80000000 A            DATA     X'80000000'
     5944   01 01796    FFFFFFF6 A   MW25     DATA     -10               MW
     5945   01 01797    37C004A2              MW,12    MEMORY
     5946   01 01798    073001F4              K        00,7,3,FXPOSW
     5947   01 01799    17300179              K        1,7,3,LOC+2
     5948   01 0179A    00000000 A            DATA     X'00000000'
     5949   01 0179B    FFFFFFFF A            DATA     X'FFFFFFFF'
     5950   01 0179C    80000000 A            DATA     X'80000000'
     5951   01 0179D    80000000 A            DATA     X'80000000'
     5952   01 0179E    00000001 A            DATA     X'00000001'
     5953   01 0179F    80000000 A            DATA     X'80000000'
     5954   01 017A0    FFFFFFF6 A   MW26     DATA     -10               MW
     5955   01 017A1    37C004A2              MW,12    MEMORY
     5956   01 017A2    073001F4              K        00,7,3,FXPOSW
     5957   01 017A3    27300179              K        2,7,3,LOC+2
     5958   01 017A4    00000000 A            DATA     X'00000000'
     5959   01 017A5    00000000 A            DATA     X'00000000'
     5960   01 017A6    FFFFFFFF A            DATA     X'FFFFFFFF'
     5961   01 017A7    FFFFFFFF A            DATA     X'FFFFFFFF'
     5962   01 017A8    FFFFFFFF A            DATA     X'FFFFFFFF'
     5963   01 017A9    00000001 A            DATA     X'00000001'
     5964   01 017AA    FFFFFFF6 A   MW27     DATA     -10               MW
     5965   01 017AB    37C004A2              MW,12    MEMORY
     5966   01 017AC    073001F4              K        00,7,3,FXPOSW
     5967   01 017AD    07300179              K        0,7,3,LOC+2
     5968   01 017AE    7FFFFFFF A            DATA     X'7FFFFFFF'
     5969   01 017AF    00000000 A            DATA     X'00000000'
     5970   01 017B0    7FFFFFFF A            DATA     X'7FFFFFFF'
     5971   01 017B1    7FFFFFFF A            DATA     X'7FFFFFFF'
     5972   01 017B2    00000000 A            DATA     X'00000000'
     5973   01 017B3    00000000 A            DATA     X'00000000'
     5974   01 017B4    FFFFFFF6 A   MW28     DATA     -10               MW
     5975   01 017B5    37C004A2              MW,12    MEMORY
     5976   01 017B6    073001F4              K        00,7,3,FXPOSW
     5977   01 017B7    07300179              K        0,7,3,LOC+2
     5978   01 017B8    00000000 A            DATA     X'00000000'
     5979   01 017B9    00000000 A            DATA     X'00000000'
     5980   01 017BA    00000000 A            DATA     X'00000000'
     5981   01 017BB    00000000 A            DATA     X'00000000'
     5982   01 017BC    00000000 A            DATA     0
     5983   01 017BD    00000000 A            DATA     X'00000000'
     5984   01 017BE    FFFFFFF6 A   MW29     DATA     -10               MW
     5985   01 017BF    37C004A2              MW,12    MEMORY
     5986   01 017C0    073001F4              K        00,7,3,FXPOSW
     5987   01 017C1    67300179              K        6,7,3,LOC+2
     5988   01 017C2    00000000 A            DATA     X'00000000'
     5989   01 017C3    17A36285 A            DATA     X'17A36285'
     5990   01 017C4    79999999 A            DATA     X'79999999'
     5991   01 017C5    79999999 A            DATA     X'79999999'
     5992   01 017C6    31C3C1F0 A            DATA     X'31C3C1F0'
     5993   01 017C7    15575870 A            DATA     X'15575870'
     5994   01 017C8    FFFFFFF6 A   MW30     DATA     -10               MW
     5995   01 017C9    37C004A2              MW,12    MEMORY
     5996   01 017CA    073001F4              K        00,7,3,FXPOSW
     5997   01 017CB    57300179              K        5,7,3,LOC+2
     5998   01 017CC    00000000 A            DATA     X'00000000'
     5999   01 017CD    D3DC7674 A            DATA     X'D3DC7674'
     6000   01 017CE    59C61C18 A            DATA     X'59C61C18'
     6001   01 017CF    59C61C18 A            DATA     X'59C61C18'
     6002   01 017D0    82222222 A            DATA     X'82222222'
     6003   01 017D1    273AEB30 A            DATA     X'273AEB30'
     6004   01 017D2    FFFFFFF6 A   MW31     DATA     -10               MW
     6005   01 017D3    37C004A2              MW,12    MEMORY
     6006   01 017D4    073001F4              K        00,7,3,FXPOSW
     6007   01 017D5    57300179              K        5,7,3,LOC+2
     6008   01 017D6    00000000 A            DATA     X'00000000'
     6009   01 017D7    FF036C81 A            DATA     X'FF036C81'
     6010   01 017D8    87777777 A            DATA     X'87777777'
     6011   01 017D9    87777777 A            DATA     X'87777777'
     6012   01 017DA    021871E7 A            DATA     X'021871E7'
     6013   01 017DB    19B05361 A            DATA     X'19B05361'
     6014   01 017DC    FFFFFFF6 A   MW32     DATA     -10               MW
     6015   01 017DD    37C004A2              MW,12    MEMORY
     6016   01 017DE    073001F4              K        00,7,3,FXPOSW
     6017   01 017DF    67300179              K        6,7,3,LOC+2
     6018   01 017E0    00000000 A            DATA     X'00000000'
     6019   01 017E1    012BAF66 A            DATA     X'012BAF66'
     6020   01 017E2    FC7CF1CC A            DATA     X'FC7CF1CC'
     6021   01 017E3    FC7CF1CC A            DATA     X'FC7CF1CC'
     6022   01 017E4    AAAAAAAA A            DATA     X'AAAAAAAA'
     6023   01 017E5    AD020978 A            DATA     X'AD020978'
     6024   01 017E6    FFFFFFF6 A   MW33     DATA     -10               MW
     6025   01 017E7    37C004A2              MW,12    MEMORY
     6026   01 017E8    073001F4              K        00,7,3,FXPOSW
     6027   01 017E9    57300179              K        5,7,3,LOC+2
     6028   01 017EA    00000000 A            DATA     X'00000000'
     6029   01 017EB    FBC79A5E A            DATA     X'FBC79A5E'
     6030   01 017EC    15555555 A            DATA     X'15555555'
     6031   01 017ED    15555555 A            DATA     X'15555555'
     6032   01 017EE    CD5B3C70 A            DATA     X'CD5B3C70'
     6033   01 017EF    BB8C4130 A            DATA     X'BB8C4130'
     6034   01 017F0    FFFFFFF6 A   MW34     DATA     -10               MW
     6035   01 017F1    37C004A2              MW,12    MEMORY
     6036   01 017F2    073001F4              K        00,7,3,FXPOSW
     6037   01 017F3    67300179              K        6,7,3,LOC+2
     6038   01 017F4    00000000 A            DATA     X'00000000'
     6039   01 017F5    00345678 A            DATA     X'00345678'
     6040   01 017F6    03111111 A            DATA     X'3111111'
     6041   01 017F7    03111111 A            DATA     X'3111111'
     6042   01 017F8    11111111 A            DATA     X'11111111'
     6043   01 017F9    99654321 A            DATA     X'99654321'
     6044   01 017FA    FFFFFFF6 A   MW35     DATA     -10               MW
     6045   01 017FB    37C004A2              MW,12    MEMORY
     6046   01 017FC    073001F4              K        00,7,3,FXPOSW
     6047   01 017FD    57300179              K        5,7,3,LOC+2
     6048   01 017FE    00000000 A            DATA     X'00000000'
     6049   01 017FF    D5D5D5D8 A            DATA     X'D5D5D5D8'
     6050   01 01800    66666666 A            DATA     X'66666666'
     6051   01 01801    66666666 A            DATA     X'66666666'
     6052   01 01802    9696969D A            DATA     X'9696969D'
     6053   01 01803    9090908E A            DATA     X'9090908E'
     6054   01 01804    FFFFFFF6 A   MW36     DATA     -10               MW
     6055   01 01805    37C004A2              MW,12    MEMORY
     6056   01 01806    073001F4              K        00,7,3,FXPOSW
     6057   01 01807    57300179              K        5,7,3,LOC+2
     6058   01 01808    00000000 A            DATA     X'00000000'
     6059   01 01809    E06D3A06 A            DATA     X'E06D3A06'
     6060   01 0180A    44444444 A            DATA     X'44444444'
     6061   01 0180B    44444444 A            DATA     X'44444444'
     6062   01 0180C    89999999 A            DATA     X'89999999'
     6063   01 0180D    CA3D70A4 A            DATA     X'CA3D70A4'
     6064   01 0180E    FFFFFFF6 A   MW37     DATA     -10               MW
     6065   01 0180F    37C004A2              MW,12    MEMORY
     6066   01 01810    073001F4              K        00,7,3,FXPOSW
     6067   01 01811    67300179              K        6,7,3,LOC+2
     6068   01 01812    00000000 A            DATA     X'00000000'
     6069   01 01813    080FCAE0 A            DATA     X'080FCAE0'
     6070   01 01814    E1C4C737 A            DATA     X'E1C4C737'
     6071   01 01815    E1C4C737 A            DATA     X'E1C4C737'
     6072   01 01816    BBBBBBBB A            DATA     X'BBBBBBBB'
     6073   01 01817    5A6FB22D A            DATA     X'5A6FB22D'
     6074   01 01818    FFFFFFF6 A   MW38     DATA     -10               MW
     6075   01 01819    37C004A2              MW,12    MEMORY
     6076   01 0181A    073001F4              K        00,7,3,FXPOSW
     6077   01 0181B    67300179              K        6,7,3,LOC+2
     6078   01 0181C    00000000 A            DATA     X'00000000'
     6079   01 0181D    00000000 A            DATA     X'00000000'
     6080   01 0181E    80000000 A            DATA     X'80000000'
     6081   01 0181F    80000000 A            DATA     X'80000000'
     6082   01 01820    FFFFFFFF A            DATA     X'FFFFFFFF'
     6083   01 01821    80000000 A            DATA     X'80000000'
     6084   01 01822    FFFFFFF6 A   MW39     DATA     -10               MW
     6085   01 01823    37C004A2              MW,12    MEMORY
     6086   01 01824    073001F4              K        00,7,3,FXPOSW
     6087   01 01825    67300179              K        6,7,3,LOC+2
     6088   01 01826    00000000 A            DATA     X'00000000'
     6089   01 01827    004B6827 A            DATA     X'004B6827'
     6090   01 01828    42468ACE A            DATA     X'42468ACE'
     6091   01 01829    42468ACE A            DATA     X'42468ACE'
     6092   01 0182A    01234567 A            DATA     X'01234567'
     6093   01 0182B    75F55EE2 A            DATA     X'75F55EE2'
     6094   01 0182C    FFFFFFF6 A   MW40     DATA     -10               MW
     6095   01 0182D    37C004A2              MW,12    MEMORY
     6096   01 0182E    073001F4              K        00,7,3,FXPOSW
     6097   01 0182F    57300179              K        5,7,3,LOC+2
     6098   01 01830    00000000 A            DATA     X'00000000'
     6099   01 01831    EEA535DC A            DATA     X'EEA535DC'
     6100   01 01832    258BCDEF A            DATA     X'258BCDEF'
     6101   01 01833    258BCDEF A            DATA     X'258BCDEF'
     6102   01 01834    89ABCDEF A            DATA     X'89ABCDEF'
     6103   01 01835    7712A521 A            DATA     X'7712A521'
     6104   01 01836    FFFFFFF6 A   MW41     DATA     -10               MW
     6105   01 01837    37C004A2              MW,12    MEMORY
     6106   01 01838    073001F4              K        00,7,3,FXPOSW
     6107   01 01839    67300179              K        6,7,3,LOC+2
     6108   01 0183A    00000000 A            DATA     X'00000000'
     6109   01 0183B    0CB68AEE A            DATA     X'0CB68AEE'
     6110   01 0183C    56AE37BF A            DATA     X'56AE37BF'
     6111   01 0183D    56AE37BF A            DATA     X'56AE37BF'
     6112   01 0183E    258BE147 A            DATA     X'258BE147'
     6113   01 0183F    090554F9 A            DATA     X'090554F9'
     6114   01 01840    FFFFFFF6 A   MW42     DATA     -10               MW
     6115   01 01841    37C004A2              MW,12    MEMORY
     6116   01 01842    073001F4              K        00,7,3,FXPOSW
     6117   01 01843    67300179              K        6,7,3,LOC+2
     6118   01 01844    00000000 A            DATA     X'00000000'
     6119   01 01845    0AAC4A2C A            DATA     X'0AAC4A2C'
     6120   01 01846    DF1357BD A            DATA     X'DF1357BD'
     6121   01 01847    DF1357BD A            DATA     X'DF1357BD'
     6122   01 01848    AD0369CF A            DATA     X'AD0369CF'
     6123   01 01849    0FD776D3 A            DATA     X'0FD776D3'
     6124   01 0184A    FFFFFFF6 A   MW43     DATA     -10               MW
     6125   01 0184B    37C004A2              MW,12    MEMORY
     6126   01 0184C    073001F4              K        00,7,3,FXPOSW
     6127   01 0184D    67300179              K        6,7,3,LOC+2
     6128   01 0184E    00000000 A            DATA     X'00000000'
     6129   01 0184F    00CAFFF1 A            DATA     X'00CAFFF1'
     6130   01 01850    F2468ACE A            DATA     X'F2468ACE'
     6131   01 01851    F2468ACE A            DATA     X'F2468ACE'
     6132   01 01852    F13579BD A            DATA     X'F13579BD'
     6133   01 01853    E055D816 A            DATA     X'E055D816'
     6134   01 01854    FFFFFFF6 A   MW44     DATA     -10               MW
     6135   01 01855    37C004A2              MW,12    MEMORY
     6136   01 01856    073001F4              K        00,7,3,FXPOSW
     6137   01 01857    67300179              K        6,7,3,LOC+2
     6138   01 01858    00000000 A            DATA     X'00000000'
     6139   01 01859    01B37451 A            DATA     X'01B37451'
     6140   01 0185A    F147AD03 A            DATA     X'F147AD03'
     6141   01 0185B    F147AD03 A            DATA     X'F147AD03'
     6142   01 0185C    E26AE38D A            DATA     X'E26AE38D'
     6143   01 0185D    BC21F3A7 A            DATA     X'BC21F3A7'
     6144   01 0185E    FFFFFFF6 A   MW45     DATA     -10               MW
     6145   01 0185F    37C004A2              MW,12    MEMORY
     6146   01 01860    073001F4              K        00,7,3,FXPOSW
     6147   01 01861    67300179              K        6,7,3,LOC+2
     6148   01 01862    00000000 A            DATA     X'00000000'
     6149   01 01863    0330D831 A            DATA     X'0330D831'
     6150   01 01864    148BF37B A            DATA     X'148BF37B'
     6151   01 01865    148BF37B A            DATA     X'148BF37B'
     6152   01 01866    27C16B05 A            DATA     X'27C16B05'
     6153   01 01867    323B2A67 A            DATA     X'323B2A67'
     6154   01 01868    FFFFFFF6 A   MW46     DATA     -10               MW
     6155   01 01869    37C004A2              MW,12    MEMORY
     6156   01 0186A    073001F4              K        00,7,3,FXPOSW
     6157   01 0186B    67300179              K        6,7,3,LOC+2
     6158   01 0186C    00000000 A            DATA     X'00000000'
     6159   01 0186D    01723EB3 A            DATA     X'01723EB3'
     6160   01 0186E    F37BF49E A            DATA     X'F37BF49E'
     6161   01 0186F    F37BF49E A            DATA     X'F37BF49E'
     6162   01 01870    E26AF49F A            DATA     X'E26AF49F'
     6163   01 01871    248F8622 A            DATA     X'248F8622'
     6164   01 01872    FFFFFFF6 A   MW47     DATA     -10               MW
     6165   01 01873    37C004A2              MW,12    MEMORY
     6166   01 01874    073001F4              K        00,7,3,FXPOSW
     6167   01 01875    57300179              K        5,7,3,LOC+2
     6168   01 01876    00000000 A            DATA     X'00000000'
     6169   01 01877    FBB2877E A            DATA     X'FBB2877E'
     6170   01 01878    457AE39F A            DATA     X'457AE39F'
     6171   01 01879    457AE39F A            DATA     X'457AE39F'
     6172   01 0187A    F0259E49 A            DATA     X'F0259E49'
     6173   01 0187B    9E820A57 A            DATA     X'9E820A57'
     6174   01 0187C    FFFFFFF6 A   MW48     DATA     -10               MW
     6175   01 0187D    37C004A2              MW,12    MEMORY
     6176   01 0187E    073001F4              K        00,7,3,FXPOSW
     6177   01 0187F    57300179              K        5,7,3,LOC+2
     6178   01 01880    00000000 A            DATA     X'00000000'
     6179   01 01881    DDF466A3 A            DATA     X'DDF466A3'
     6180   01 01882    679C05B2 A            DATA     X'679C05B2'
     6181   01 01883    679C05B2 A            DATA     X'679C05B2'
     6182   01 01884    ABE159F0 A            DATA     X'ABE159F0'
     6183   01 01885    47B238E0 A            DATA     X'47B238E0'
     6184   01 01886    FFFFFFF6 A   MW49     DATA     -10               MW
     6185   01 01887    37C004A2              MW,12    MEMORY
     6186   01 01888    073001F4              K        00,7,3,FXPOSW
     6187   01 01889    67300179              K        6,7,3,LOC+2
     6188   01 0188A    00000000 A            DATA     X'00000000'
     6189   01 0188B    0D5BB3FB A            DATA     X'0D5BB3FB'
     6190   01 0188C    59D73C28 A            DATA     X'59D73C28'
     6191   01 0188D    59D73C28 A            DATA     X'59D73C28'
     6192   01 0188E    26106573 A            DATA     X'26106573'
     6193   01 0188F    F8EBCDF8 A            DATA     X'F8EBCDF8'
     6194   01 01890    FFFFFFF6 A   MW50     DATA     -10               MW
     6195   01 01891    37C004A2              MW,12    MEMORY
     6196   01 01892    073001F4              K        00,7,3,FXPOSW
     6197   01 01893    67300179              K        6,7,3,LOC+2
     6198   01 01894    00000000 A            DATA     X'00000000'
     6199   01 01895    02DA0095 A            DATA     X'02DA0095'
     6200   01 01896    CD2A3C71 A            DATA     X'CD2A3C71'
     6201   01 01897    CD2A3C71 A            DATA     X'CD2A3C71'
     6202   01 01898    F1A3C842 A            DATA     X'F1A3C842'
     6203   01 01899    C10EDD22 A            DATA     X'C10EDD22'
     6204   01 0189A    FFFFFFF6 A   MW51     DATA     -10               MW
     6205   01 0189B    37C004A2              MW,12    MEMORY
     6206   01 0189C    073001F4              K        00,7,3,FXPOSW
     6207   01 0189D    57300179              K        5,7,3,LOC+2
     6208   01 0189E    00000000 A            DATA     X'00000000'
     6209   01 0189F    FF1737FC A            DATA     X'FF1737FC'
     6210   01 018A0    FC7CF1CC A            DATA     X'FC7CF1CC'
     6211   01 018A1    FC7CF1CC A            DATA     X'FC7CF1CC'
     6212   01 018A2    42486CEA A            DATA     X'42486CEA'
     6213   01 018A3    19971478 A            DATA     X'19971478'
     6214   01 018A4    FFFFFFF6 A   MW52     DATA     -10               MW
     6215   01 018A5    37C004A2              MW,12    MEMORY
     6216   01 018A6    073001F4              K        00,7,3,FXPOSW
     6217   01 018A7    67300179              K        6,7,3,LOC+2
     6218   01 018A8    00000000 A            DATA     X'00000000'
     6219   01 018A9    0C654900 A            DATA     X'0C654900'
     6220   01 018AA    475E3AF9 A            DATA     X'475E3AF9'
     6221   01 018AB    475E3AF9 A            DATA     X'475E3AF9'
     6222   01 018AC    2C76B150 A            DATA     X'2C76B150'
     6223   01 018AD    6EFE96D0 A            DATA     X'6EFE96D0'
     6224   01 018AE    FFFFFFF6 A   MW53     DATA     -10               MW
     6225   01 018AF    37C004A2              MW,12    MEMORY
     6226   01 018B0    073001F4              K        00,7,3,FXPOSW
     6227   01 018B1    57300179              K        5,7,3,LOC+2
     6228   01 018B2    00000000 A            DATA     X'00000000'
     6229   01 018B3    F5C7652C A            DATA     X'F5C7652C'
     6230   01 018B4    38D27C16 A            DATA     X'38D27C16'
     6231   01 018B5    38D27C16 A            DATA     X'38D27C16'
     6232   01 018B6    D1F375DB A            DATA     X'D1F375DB'
     6233   01 018B7    8DA834D2 A            DATA     X'8DA834D2'
     6234   01 018B8    FFFFFFF6 A   MW54     DATA     -10               MW
     6235   01 018B9    37C004A2              MW,12    MEMORY
     6236   01 018BA    073001F4              K        00,7,3,FXPOSW
     6237   01 018BB    67300179              K        6,7,3,LOC+2
     6238   01 018BC    00000000 A            DATA     X'00000000'
     6239   01 018BD    36F57A5C A            DATA     X'36F57A5C'
     6240   01 018BE    8067CB91 A            DATA     X'8067CB91'
     6241   01 018BF    8067CB91 A            DATA     X'8067CB91'
     6242   01 018C0    91BBA0E5 A            DATA     X'91BBA0E5'
     6243   01 018C1    8FFEB8B5 A            DATA     X'8FFEB8B5'
     6244   01 018C2    FFFFFFF6 A   MW55     DATA     -10               MW
     6245   01 018C3    37C004A2              MW,12    MEMORY
     6246   01 018C4    073001F4              K        00,7,3,FXPOSW
     6247   01 018C5    67300179              K        6,7,3,LOC+2
     6248   01 018C6    00000000 A            DATA     X'00000000'
     6249   01 018C7    1F5F1EB5 A            DATA     X'1F5F1EB5'
     6250   01 018C8    66E91F2E A            DATA     X'66E91F2E'
     6251   01 018C9    66E91F2E A            DATA     X'66E91F2E'
     6252   01 018CA    4E0A2D09 A            DATA     X'4E0A2D09'
     6253   01 018CB    D4792E9E A            DATA     X'D4792E9E'
     6254   01 018CC    FFFFFFF6 A   MW56     DATA     -10               MW
     6255   01 018CD    37C004A2              MW,12    MEMORY
     6256   01 018CE    073001F4              K        00,7,3,FXPOSW
     6257   01 018CF    67300179              K        6,7,3,LOC+2
     6258   01 018D0    00000000 A            DATA     X'00000000'
     6259   01 018D1    2C6421FF A            DATA     X'2C6421FF'
     6260   01 018D2    9D289043 A            DATA     X'9D289043'
     6261   01 018D3    9D289043 A            DATA     X'9D289043'
     6262   01 018D4    8D06D9F2 A            DATA     X'8D06D9F2'
     6263   01 018D5    3B332A56 A            DATA     X'3B332A56'
     6264   01 018D6    FFFFFFF6 A   MW57     DATA     -10               MW
     6265   01 018D7    37C004A2              MW,12    MEMORY
     6266   01 018D8    073001F4              K        00,7,3,FXPOSW
     6267   01 018D9    67300179              K        6,7,3,LOC+2
     6268   01 018DA    00000000 A            DATA     X'00000000'
     6269   01 018DB    1176E78B A            DATA     X'1176E78B'
     6270   01 018DC    266C684E A            DATA     X'266C684E'
     6271   01 018DD    266C684E A            DATA     X'266C684E'
     6272   01 018DE    745BD382 A            DATA     X'745BD382'
     6273   01 018DF    48BF419C A            DATA     X'48BF419C'
     6274   01 018E0    FFFFFFF6 A   MW58     DATA     -10               MW
     6275   01 018E1    37C004A2              MW,12    MEMORY
     6276   01 018E2    073001F4              K        00,7,3,FXPOSW
     6277   01 018E3    67300179              K        6,7,3,LOC+2
     6278   01 018E4    00000000 A            DATA     X'00000000'
     6279   01 018E5    0F673E9E A            DATA     X'0F673E9E'
     6280   01 018E6    CC1FC7CF A            DATA     X'CC1FC7CF'
     6281   01 018E7    CC1FC7CF A            DATA     X'CC1FC7CF'
     6282   01 018E8    B3FCA5A5 A            DATA     X'B3FCA5A5'
     6283   01 018E9    7908336B A            DATA     X'7908336B'
     6284   01 018EA    FFFFFFF6 A   MW59     DATA     -10               MW
     6285   01 018EB    37C004A2              MW,12    MEMORY
     6286   01 018EC    073001F4              K        00,7,3,FXPOSW
     6287   01 018ED    27300179              K        2,7,3,LOC+2
     6288   01 018EE    00000000 A            DATA     X'00000000'
     6289   01 018EF    00000000 A            DATA     X'00000000'
     6290   01 018F0    00000001 A            DATA     X'00000001'
     6291   01 018F1    00000001 A            DATA     X'00000001'
     6292   01 018F2    7FFFFFFF A            DATA     X'7FFFFFFF'
     6293   01 018F3    7FFFFFFF A            DATA     X'7FFFFFFF'
     6294   01 018F4    FFFFFFF6 A   MW60     DATA     -10               MW
     6295   01 018F5    37C004A2              MW,12    MEMORY
     6296   01 018F6    073001F4              K        00,7,3,FXPOSW
     6297   01 018F7    27300179              K        2,7,3,LOC+2
     6298   01 018F8    00000000 A            DATA     X'00000000'
     6299   01 018F9    00000000 A            DATA     X'00000000'
     6300   01 018FA    7FFFFFFF A            DATA     X'7FFFFFFF'
     6301   01 018FB    7FFFFFFF A            DATA     X'7FFFFFFF'
     6302   01 018FC    00000001 A            DATA     X'00000001'
     6303   01 018FD    7FFFFFFF A            DATA     X'7FFFFFFF'
     6304   01 018FE    FFFFFFF6 A   MW61     DATA     -10               MW
     6305   01 018FF    37C004A2              MW,12    MEMORY
     6306   01 01900    073001F4              K        00,7,3,FXPOSW
     6307   01 01901    67300179              K        6,7,3,LOC+2
     6308   01 01902    00000000 A            DATA     X'00000000'
     6309   01 01903    0ADAA050 A            DATA     X'0ADAA050'
     6310   01 01904    B5631AF2 A            DATA     X'B5631AF2'
     6311   01 01905    B5631AF2 A            DATA     X'B5631AF2'
     6312   01 01906    DAC269A5 A            DATA     X'DAC269A5'
     6313   01 01907    0E519FFA A            DATA     X'0E519FFA'
     6314   01 01908    FFFFFFF6 A   MW62     DATA     -10               MW
     6315   01 01909    37C004A2              MW,12    MEMORY
     6316   01 0190A    073001F4              K        00,7,3,FXPOSW
     6317   01 0190B    57300179              K        5,7,3,LOC+2
     6318   01 0190C    00000000 A            DATA     X'00000000'
     6319   01 0190D    E8549FA9 A            DATA     X'E8549FA9'
     6320   01 0190E    C7B51894 A            DATA     X'C7B51894'
     6321   01 0190F    C7B51894 A            DATA     X'C7B51894'
     6322   01 01910    6BA40763 A            DATA     X'6BA40763'
     6323   01 01911    C9848D3C A            DATA     X'C9848D3C'
     6324   01 01912    FFFFFFF6 A   MW63     DATA     -10               MW
     6325   01 01913    37C004A2              MW,12    MEMORY
     6326   01 01914    073001F4              K        00,7,3,FXPOSW
     6327   01 01915    57300179              K        5,7,3,LOC+2
     6328   01 01916    00000000 A            DATA     0
     6329   01 01917    FE179952 A            DATA     X'FE179952'
     6330   01 01918    E9D73A96 A            DATA     X'E9D73A96'
     6331   01 01919    E9D73A96 A            DATA     X'E9D73A96'
     6332   01 0191A    160A5DC9 A            DATA     X'160A5DC9'
     6333   01 0191B    F8217DC6 A            DATA     X'F8217DC6'
     6334   01 0191C    FFFFFFF6 A   MW64     DATA     -10               MW
     6335   01 0191D    37C004A2              MW,12    MEMORY
     6336   01 0191E    073001F4              K        00,7,3,FXPOSW
     6337   01 0191F    67300179              K        6,7,3,LOC+2
     6338   01 01920    00000000 A            DATA     X'00000000'
     6339   01 01921    275BDC20 A            DATA     X'275BDC20'
     6340   01 01922    84F82DDE A            DATA     X'84F82DDE'
     6341   01 01923    84F82DDE A            DATA     X'84F82DDE'
     6342   01 01924    AE1A4FE0 A            DATA     X'AE1A4FE0'
     6343   01 01925    7BDBA440 A            DATA     X'7BDBA440'
     6344   01 01926    FFFFFFF6 A   MW65     DATA     -10               MW
     6345   01 01927    37C004A2              MW,12    MEMORY
     6346   01 01928    073001F4              K        00,7,3,FXPOSW
     6347   01 01929    67300179              K        6,7,3,LOC+2
     6348   01 0192A    00000000 A            DATA     X'00000000'
     6349   01 0192B    02F12C68 A            DATA     X'02F12C68'
     6350   01 0192C    136AF5B2 A            DATA     X'136AF5B2'
     6351   01 0192D    136AF5B2 A            DATA     X'136AF5B2'
     6352   01 0192E    26C9AAD5 A            DATA     X'26C9AAD5'
     6353   01 0192F    83E8A11A A            DATA     X'83E8A11A'
     6354   01 01930    FFFFFFF6 A   MW66     DATA     -10               MW
     6355   01 01931    37C004A2              MW,12    MEMORY
     6356   01 01932    073001F4              K        00,7,3,FXPOSW
     6357   01 01933    67300179              K        6,7,3,LOC+2
     6358   01 01934    00000000 A            DATA     X'00000000'
     6359   01 01935    00651680 A            DATA     X'00651680'
     6360   01 01936    15B897C4 A            DATA     X'15B897C4'
     6361   01 01937    15B897C4 A            DATA     X'15B897C4'
     6362   01 01938    04A766B3 A            DATA     X'04A766B3'
     6363   01 01939    CD66360C A            DATA     X'CD66360C'
     6364   01 0193A    FFFFFFF6 A   MW67     DATA     -10               MW
     6365   01 0193B    37C004A2              MW,12    MEMORY
     6366   01 0193C    073001F4              K        00,7,3,FXPOSW
     6367   01 0193D    67300179              K        6,7,3,LOC+2
     6368   01 0193E    00000000 A            DATA     X'00000000'
     6369   01 0193F    13A5DB6D A            DATA     X'13A5DB6D'
     6370   01 01940    37DA99E6 A            DATA     X'37DA99E6'
     6371   01 01941    37DA99E6 A            DATA     X'37DA99E6'
     6372   01 01942    5A0DC619 A            DATA     X'5A0DC619'
     6373   01 01943    340EEB76 A            DATA     X'340EEB76'
     6374   01 01944    FFFFFFF6 A   MW68     DATA     -10               MW
     6375   01 01945    37C004A2              MW,12    MEMORY
     6376   01 01946    073001F4              K        00,7,3,FXPOSW
     6377   01 01947    67300179              K        6,7,3,LOC+2
     6378   01 01948    00000000 A            DATA     X'00000000'
     6379   01 01949    0BDE7CCB A            DATA     X'0BDE7CCB'
     6380   01 0194A    28FDD84E A            DATA     X'28FDD84E'
     6381   01 0194B    28FDD84E A            DATA     X'28FDD84E'
     6382   01 0194C    4A1FEA60 A            DATA     X'4A1FEA60'
     6383   01 0194D    245A6940 A            DATA     X'245A6940'
     6384   01 0194E    FFFFFFF6 A   MW69     DATA     -10               MW
     6385   01 0194F    37C004A2              MW,12    MEMORY
     6386   01 01950    073001F4              K        00,7,3,FXPOSW
     6387   01 01951    57300179              K        5,7,3,LOC+2
     6388   01 01952    00000000 A            DATA     X'00000000'
     6389   01 01953    DFCF32C1 A            DATA     X'DFCF32C1'
     6390   01 01954    8508753F A            DATA     X'8508753F'
     6391   01 01955    8508753F A            DATA     X'8508753F'
     6392   01 01956    43043218 A            DATA     X'43043218'
     6393   01 01957    71AD4BE8 A            DATA     X'71AD4BE8'
     6394   01 01958    FFFFFFF6 A   MW70     DATA     -10               MW
     6395   01 01959    37C004A2              MW,12    MEMORY
     6396   01 0195A    073001F4              K        00,7,3,FXPOSW
     6397   01 0195B    67300179              K        6,7,3,LOC+2
     6398   01 0195C    00000000 A            DATA     X'00000000'
     6399   01 0195D    0FDED2C2 A            DATA     X'0FDED2C2'
     6400   01 0195E    2B5FA631 A            DATA     X'2B5FA631'
     6401   01 0195F    2B5FA631 A            DATA     X'2B5FA631'
     6402   01 01960    5DAB9C62 A            DATA     X'5DAB9C62'
     6403   01 01961    B39E7AC2 A            DATA     X'B39E7AC2'
     6404   01 01962    FFFFFFF6 A   MW71     DATA     -10               MW
     6405   01 01963    37C004A2              MW,12    MEMORY
     6406   01 01964    073001F4              K        00,7,3,FXPOSW
     6407   01 01965    67300179              K        6,7,3,LOC+2
     6408   01 01966    00000000 A            DATA     X'00000000'
     6409   01 01967    11BEA00E A            DATA     X'11BEA00E'
     6410   01 01968    4C798B51 A            DATA     X'4C798B51'
     6411   01 01969    4C798B51 A            DATA     X'4C798B51'
     6412   01 0196A    3B667A40 A            DATA     X'3B667A40'
     6413   01 0196B    380D6E40 A            DATA     X'380D6E40'
     6414   01 0196C    FFFFFFF6 A   MW72     DATA     -10               MW
     6415   01 0196D    37C004A2              MW,12    MEMORY
     6416   01 0196E    073001F4              K        00,7,3,FXPOSW
     6417   01 0196F    57300179              K        5,7,3,LOC+2
     6418   01 01970    00000000 A            DATA     X'00000000'
     6419   01 01971    D03A60C4 A            DATA     X'D03A60C4'
     6420   01 01972    6E99AD73 A            DATA     X'6E99AD73'
     6421   01 01973    6E99AD73 A            DATA     X'6E99AD73'
     6422   01 01974    916CD0A5 A            DATA     X'916CD0A5'
     6423   01 01975    757E3B1F A            DATA     X'757E3B1F'
     6424   01 01976    FFFFFFF6 A   MW73     DATA     -10               MW
     6425   01 01977    37C004A2              MW,12    MEMORY
     6426   01 01978    073001F4              K        00,7,3,FXPOSW
     6427   01 01979    57300179              K        5,7,3,LOC+2
     6428   01 0197A    00000000 A            DATA     X'00000000'
     6429   01 0197B    FF4891C2 A            DATA     X'FF4891C2'
     6430   01 0197C    E48DDF82 A            DATA     X'E48DDF82'
     6431   01 0197D    E48DDF82 A            DATA     X'E48DDF82'
     6432   01 0197E    06AEF1A4 A            DATA     X'06AEF1A4'
     6433   01 0197F    F0A89148 A            DATA     X'F0A89148'
     6434   01 01980    FFFFFFF6 A   MW74     DATA     -10               MW
     6435   01 01981    37C004A2              MW,12    MEMORY
     6436   01 01982    073001F4              K        00,7,3,FXPOSW
     6437   01 01983    67300179              K        6,7,3,LOC+2
     6438   01 01984    00000000 A            DATA     X'00000000'
     6439   01 01985    0645D91E A            DATA     X'0645D91E'
     6440   01 01986    F3578058 A            DATA     X'F3578058'
     6441   01 01987    F3578058 A            DATA     X'F3578058'
     6442   01 01988    81234034 A            DATA     X'81234034'
     6443   01 01989    31E411E0 A            DATA     X'31E411E0'
     6444   01 0198A    FFFFFFF6 A   MW75     DATA     -10               MW
     6445   01 0198B    37C004A2              MW,12    MEMORY
     6446   01 0198C    073001F4              K        00,7,3,FXPOSW
     6447   01 0198D    67300179              K        6,7,3,LOC+2
     6448   01 0198E    00000000 A            DATA     X'00000000'
     6449   01 0198F    0925E650 A            DATA     X'0925E650'
     6450   01 01990    BF6125A3 A            DATA     X'BF6125A3'
     6451   01 01991    BF6125A3 A            DATA     X'BF6125A3'
     6452   01 01992    DBC25A96 A            DATA     X'DBC25A96'
     6453   01 01993    40AD5B82 A            DATA     X'40AD5B82'
     6454   01 01994    FFFFFFF6 A   MW76     DATA     -10               MW
     6455   01 01995    37C004A2              MW,12    MEMORY
     6456   01 01996    073001F4              K        00,7,3,FXPOSW
     6457   01 01997    67300179              K        6,7,3,LOC+2
     6458   01 01998    00000000 A            DATA     X'00000000'
     6459   01 01999    0F90C493 A            DATA     X'0F90C493'
     6460   01 0199A    C9B14785 A            DATA     X'C9B14785'
     6461   01 0199B    C9B14785 A            DATA     X'C9B14785'
     6462   01 0199C    B6A03674 A            DATA     X'B6A03674'
     6463   01 0199D    0A8A7644 A            DATA     X'0A8A7644'
     6464   01 0199E    FFFFFFF6 A   MW77     DATA     -10               MW
     6465   01 0199F    37C004A2              MW,12    MEMORY
     6466   01 019A0    073001F4              K        00,7,3,FXPOSW
     6467   01 019A1    57300179              K        5,7,3,LOC+2
     6468   01 019A2    00000000 A            DATA     X'00000000'
     6469   01 019A3    FD92A39E A            DATA     X'FD92A39E'
     6470   01 019A4    E9D369A7 A            DATA     X'E9D369A7'
     6471   01 019A5    E9D369A7 A            DATA     X'E9D369A7'
     6472   01 019A6    1C0596DA A            DATA     X'1C0596DA'
     6473   01 019A7    5232D236 A            DATA     X'5232D236'
     6474   01 019A8    FFFFFFF6 A   MW78     DATA     -10               MW
     6475   01 019A9    37C004A2              MW,12    MEMORY
     6476   01 019AA    073001F4              K        00,7,3,FXPOSW
     6477   01 019AB    67300179              K        6,7,3,LOC+2
     6478   01 019AC    00000000 A            DATA     X'00000000'
     6479   01 019AD    21847A5E A            DATA     X'21847A5E'
     6480   01 019AE    4DF2E8D8 A            DATA     X'4DF2E8D8'
     6481   01 019AF    4DF2E8D8 A            DATA     X'4DF2E8D8'
     6482   01 019B0    6E140AFA A            DATA     X'6E140AFA'
     6483   01 019B1    9D2FD2F0 A            DATA     X'9D2FD2F0'
     6484   01 019B2    FFFFFFF6 A   MW79     DATA     -10               MW *
     6485   01 019B3    B7C0049C              MW,12    *IA
     6486   01 019B4    073001F4              K        00,7,3,FXPOSW
     6487   01 019B5    67300179              K        6,7,3,LOC+2
     6488   01 019B6    00000000 A            DATA     X'00000000'
     6489   01 019B7    0416A25D A            DATA     X'0416A25D'
     6490   01 019B8    3708F585 A            DATA     X'3708F585'
     6491   01 019B9    3708F585 A            DATA     X'3708F585'
     6492   01 019BA    13048243 A            DATA     X'13048243'
     6493   01 019BB    A919CBCF A            DATA     X'A919CBCF'
     6494   01 019BC    FFFFFFF6 A   MW80     DATA     -10               MW  X
     6495   01 019BD    37C3E0A9 S            MW,12    MEMORY-X'23F9',1
     6496   01 019BE    073001F4              K        00,7,3,FXPOSW
     6497   01 019BF    67300179              K        6,7,3,LOC+2
     6498   01 019C0    000023F9 A            DATA     X'23F9'
     6499   01 019C1    23CDBD6A A            DATA     X'23CDBD6A'
     6500   01 019C2    A56F321B A            DATA     X'A56F321B'
     6501   01 019C3    A56F321B A            DATA     X'A56F321B'
     6502   01 019C4    9ACB652D A            DATA     X'9ACB652D'
     6503   01 019C5    ECB975BF A            DATA     X'ECB975BF'
     6504   01 019C6    FFFFFFF6 A   MW81     DATA     -10               MWO
     6505   01 019C7    37D004A2              MW,13    MEMORY
     6506   01 019C8    073001F4              K        00,7,3,FXPOSW
     6507   01 019C9    67300179              K        6,7,3,LOC+2
     6508   01 019CA    00000000 A            DATA     X'00000000'
     6509   01 019CB    00000000 A            DATA     0
     6510   01 019CC    DFA08A94 A            DATA     X'DFA08A94'
     6511   01 019CD    DFA08A94 A            DATA     X'DFA08A94'
     6512   01 019CE    C1C7FCFC A            DATA     X'C1C7FCFC'
     6513   01 019CF    777E19B0 A            DATA     X'777E19B0'
     6514   01 019D0    FFFFFFF6 A   MW82     DATA     -10               MW
     6515   01 019D1    37D004A2              MW,13    MEMORY
     6516   01 019D2    073001F4              K        00,7,3,FXPOSW
     6517   01 019D3    57300179              K        5,7,3,LOC+2
     6518   01 019D4    00000000 A            DATA     X'00000000'
     6519   01 019D5    00000000 A            DATA     X'00000000'
     6520   01 019D6    8A5F76B0 A            DATA     X'8A5F76B0'
     6521   01 019D7    8A5F76B0 A            DATA     X'8A5F76B0'
     6522   01 019D8    1CC95618 A            DATA     X'1CC95618'
     6523   01 019D9    7B024080 A            DATA     X'7B024080'
     6524   01 019DA    FFFFFFF6 A   MW83     DATA     -10               MW
     6525   01 019DB    37D004A2              MW,13    MEMORY
     6526   01 019DC    073001F4              K        00,7,3,FXPOSW
     6527   01 019DD    57300179              K        5,7,3,LOC+2
     6528   01 019DE    00000000 A            DATA     X'00000000'
     6529   01 019DF    00000000 A            DATA     X'00000000'
     6530   01 019E0    FCFD3918 A            DATA     X'FCFD3918'
     6531   01 019E1    FCFD3918 A            DATA     X'FCFD3918'
     6532   01 019E2    37C1F3C1 A            DATA     X'37C1F3C1'
     6533   01 019E3    4B31D318 A            DATA     X'4B31D318'
     6534   01 019E4    FFFFFFF6 A   MW84     DATA     -10               MW
     6535   01 019E5    37D004A2              MW,13    MEMORY
     6536   01 019E6    073001F4              K        00,7,3,FXPOSW
     6537   01 019E7    67300179              K        6,7,3,LOC+2
     6538   01 019E8    00000000 A            DATA     X'00000000'
     6539   01 019E9    00000000 A            DATA     X'00000000'
     6540   01 019EA    1EDB580D A            DATA     X'1EDB580D'
     6541   01 019EB    1EDB580D A            DATA     X'1EDB580D'
     6542   01 019EC    0C1031F3 A            DATA     X'0C1031F3'
     6543   01 019ED    62DF1157 A            DATA     X'62DF1157'
     6544   01 019EE    FFFFFFF6 A   MW85     DATA     -10               MW
     6545   01 019EF    37D004A2              MW,13    MEMORY
     6546   01 019F0    073001F4              K        00,7,3,FXPOSW
     6547   01 019F1    57300179              K        5,7,3,LOC+2
     6548   01 019F2    00000000 A            DATA     X'00000000'
     6549   01 019F3    00000000 A            DATA     X'00000000'
     6550   01 019F4    E8FC75C1 A            DATA     X'E8FC75C1'
     6551   01 019F5    E8FC75C1 A            DATA     X'E8FC75C1'
     6552   01 019F6    3F1C8782 A            DATA     X'3F1C8782'
     6553   01 019F7    D2689302 A            DATA     X'D2689302'
     6554   01 019F8    FFFFFFF6 A   MW86     DATA     -10               MW
     6555   01 019F9    37D004A2              MW,13    MEMORY
     6556   01 019FA    073001F4              K        00,7,3,FXPOSW
     6557   01 019FB    67300179              K        6,7,3,LOC+2
     6558   01 019FC    00000000 A            DATA     X'00000000'
     6559   01 019FD    00000000 A            DATA     X'00000000'
     6560   01 019FE    7CBDC530 A            DATA     X'7CBDC530'
     6561   01 019FF    7CBDC530 A            DATA     X'7CBDC530'
     6562   01 01A00    72436AC1 A            DATA     X'72436AC1'
     6563   01 01A01    9A478930 A            DATA     X'9A478930'
     6564   01 01A02    FFFFFFF6 A   MW87     DATA     -10               MW
     6565   01 01A03    37D004A2              MW,13    MEMORY
     6566   01 01A04    073001F4              K        00,7,3,FXPOSW
     6567   01 01A05    57300179              K        5,7,3,LOC+2
     6568   01 01A06    00000000 A            DATA     X'00000000'
     6569   01 01A07    00000000 A            DATA     X'00000000'
     6570   01 01A08    F1C133C0 A            DATA     X'F1C133C0'
     6571   01 01A09    F1C133C0 A            DATA     X'F1C133C0'
     6572   01 01A0A    6684E6C2 A            DATA     X'6684E6C2'
     6573   01 01A0B    F7E7B780 A            DATA     X'F7E7B780'
     6574   01 01A0C    FFFFFFF6 A   MW88     DATA     -10               MW
     6575   01 01A0D    37D004A2              MW,13    MEMORY
     6576   01 01A0E    073001F4              K        00,7,3,FXPOSW
     6577   01 01A0F    67300179              K        6,7,3,LOC+2
     6578   01 01A10    00000000 A            DATA     X'00000000'
     6579   01 01A11    00000000 A            DATA     X'00000000'
     6580   01 01A12    7CF4DF30 A            DATA     X'7CF4DF30'
     6581   01 01A13    7CF4DF30 A            DATA     X'7CF4DF30'
     6582   01 01A14    3F5A5ACB A            DATA     X'3F5A5ACB'
     6583   01 01A15    7383DB10 A            DATA     X'7383DB10'
     6584   01 01A16    FFFFFFF6 A   MW89     DATA     -10               MW
     6585   01 01A17    37D004A2              MW,13    MEMORY
     6586   01 01A18    073001F4              K        00,7,3,FXPOSW
     6587   01 01A19    67300179              K        6,7,3,LOC+2
     6588   01 01A1A    00000000 A            DATA     X'00000000'
     6589   01 01A1B    00000000 A            DATA     X'00000000'
     6590   01 01A1C    366B6D39 A            DATA     X'366B6D39'
     6591   01 01A1D    366B6D39 A            DATA     X'366B6D39'
     6592   01 01A1E    493A426C A            DATA     X'493A426C'
     6593   01 01A1F    A764C60C A            DATA     X'A764C60C'
     6594   01 01A20    FFFFFFF6 A   MW90     DATA     -10               MW
     6595   01 01A21    37D004A2              MW,13    MEMORY
     6596   01 01A22    073001F4              K        00,7,3,FXPOSW
     6597   01 01A23    57300179              K        5,7,3,LOC+2
     6598   01 01A24    00000000 A            DATA     X'00000000'
     6599   01 01A25    00000000 A            DATA     0
     6600   01 01A26    F1C133C0 A            DATA     X'F1C133C0'
     6601   01 01A27    F1C133C0 A            DATA     X'F1C133C0'
     6602   01 01A28    1CC95618 A            DATA     X'1CC95618'
     6603   01 01A29    333F5A00 A            DATA     X'333F5A00'
     6604   01 01A2A    FFFFFFF6 A   MH01     DATA     -10               MH
     6605   01 01A2B    57C004A2              MH,12    MEMORY
     6606   01 01A2C    073001F4              K        00,7,3,FXPOSW
     6607   01 01A2D    17300179              K        1,7,3,LOC+2
     6608   01 01A2E    0000FC7C A            DATA     X'0000FC7C'
     6609   01 01A2F    0000FC7C A            DATA     X'0000FC7C'
     6610   01 01A30    37BF0000 A            DATA     X'37BF0000'
     6611   01 01A31    37BF0000 A            DATA     X'37BF0000'
     6612   01 01A32    00000000 A            DATA     X'00000000'
     6613   01 01A33    FF3C0484 A            DATA     X'FF3C0484'
     6614   01 01A34    FFFFFFF6 A   MH02     DATA     -10               MH
     6615   01 01A35    57C004A2              MH,12    MEMORY
     6616   01 01A36    073001F4              K        00,7,3,FXPOSW
     6617   01 01A37    17300179              K        1,7,3,LOC+2
     6618   01 01A38    00000383 A            DATA     X'00000383'
     6619   01 01A39    00000383 A            DATA     X'00000383'
     6620   01 01A3A    C8400000 A            DATA     X'C8400000'
     6621   01 01A3B    C8400000 A            DATA     X'C8400000'
     6622   01 01A3C    00000000 A            DATA     X'00000000'
     6623   01 01A3D    FF3C38C0 A            DATA     X'FF3C38C0'
     6624   01 01A3E    FFFFFFF6 A   MH03     DATA     -10               MH  X
     6625   01 01A3F    57CE04A2              MH,12    MEMORY,7
     6626   01 01A40    073001F4              K        00,7,3,FXPOSW
     6627   01 01A41    17300179              K        1,7,3,LOC+2
     6628   01 01A42    0000E159 A            DATA     X'0000E159'
     6629   01 01A43    0000E159 A            DATA     X'0000E159'
     6630   01 01A44    000027C1 A            DATA     X'000027C1'
     6631   01 01A45    000027C1 A            DATA     X'000027C1'
     6632   01 01A46    00000000 A            DATA     X'00000000'
     6633   01 01A47    FB3D7319 A            DATA     X'FB3D7319'
     6634   01 01A48    FFFFFFF6 A   MH04     DATA     -10               MH  X
     6635   01 01A49    57CE04A2              MH,12    MEMORY,7
     6636   01 01A4A    073001F4              K        00,7,3,FXPOSW
     6637   01 01A4B    17300179              K        1,7,3,LOC+2
     6638   01 01A4C    00001EA6 A            DATA     X'00001EA6'
     6639   01 01A4D    00001EA6 A            DATA     X'00001EA6'
     6640   01 01A4E    0000D83E A            DATA     X'0000D83E'
     6641   01 01A4F    0000D83E A            DATA     X'0000D83E'
     6642   01 01A50    00000000 A            DATA     X'00000000'
     6643   01 01A51    FB3D7C34 A            DATA     X'FB3D7C34'
     6644   01 01A52    FFFFFFF6 A   MH05     DATA     -10               MHO
     6645   01 01A53    57D004A2              MH,13    MEMORY
     6646   01 01A54    073001F4              K        00,7,3,FXPOSW
     6647   01 01A55    27300179              K        2,7,3,LOC+2
     6648   01 01A56    00000000 A            DATA     X'00000000'
     6649   01 01A57    00000000 A            DATA     X'00000000'
     6650   01 01A58    30C90000 A            DATA     X'30C90000'
     6651   01 01A59    30C90000 A            DATA     X'30C90000'
     6652   01 01A5A    000048C1 A            DATA     X'000048C1'
     6653   01 01A5B    0DDD4F89 A            DATA     X'0DDD4F89'
     6654   01 01A5C    FFFFFFF6 A   MH06     DATA     -10               MH
     6655   01 01A5D    57D004A2              MH,13    MEMORY
     6656   01 01A5E    073001F4              K        00,7,3,FXPOSW
     6657   01 01A5F    27300179              K        2,7,3,LOC+2
     6658   01 01A60    00000000 A            DATA     X'00000000'
     6659   01 01A61    00000000 A            DATA     X'00000000'
     6660   01 01A62    C7360000 A            DATA     X'C7360000'
     6661   01 01A63    C7360000 A            DATA     X'C7360000'
     6662   01 01A64    0000B73E A            DATA     X'0000B73E'
     6663   01 01A65    1023D914 A            DATA     X'1023D914'
     6664   01 01A66    FFFFFFF6 A   MH07     DATA     -10               MH  X
     6665   01 01A67    57DE04A2              MH,13    MEMORY,7
     6666   01 01A68    073001F4              K        00,7,3,FXPOSW
     6667   01 01A69    27300179              K        2,7,3,LOC+2
     6668   01 01A6A    00000000 A            DATA     X'00000000'
     6669   01 01A6B    00000000 A            DATA     X'00000000'
     6670   01 01A6C    00005AF4 A            DATA     X'00005AF4'
     6671   01 01A6D    00005AF4 A            DATA     X'00005AF4'
     6672   01 01A6E    FFFF62EA A            DATA     X'FFFF62EA'
     6673   01 01A6F    23248B08 A            DATA     X'23248B08'
     6674   01 01A70    FFFFFFF6 A   MH08     DATA     -10               MH *X
     6675   01 01A71    D7D2049C              MH,13    *IA,1
     6676   01 01A72    073001F4              K        00,7,3,FXPOSW
     6677   01 01A73    27300179              K        2,7,3,LOC+2
     6678   01 01A74    00000001 A            DATA     1
     6679   01 01A75    00000001 A            DATA     1
     6680   01 01A76    0000A50B A            DATA     X'0000A50B'
     6681   01 01A77    0000A50B A            DATA     X'0000A50B'
     6682   01 01A78    00009D15 A            DATA     X'00009D15'
     6683   01 01A79    232548E7 A            DATA     X'232548E7'
     6684   01 01A7A    FFFFFFF6 A   MI01     DATA     -10               MI
     6685   01 01A7B    23C42EFD A            MI,12    X'42EFD'
     6686   01 01A7C    073001F4              K        00,7,3,FXPOSW
     6687   01 01A7D    57300179              K        5,7,3,LOC+2
     6688   01 01A7E    00000000 A            DATA     X'00000000'
     6689   01 01A7F    FFFFE994 A            DATA     X'FFFFE994'
     6690   01 01A80    00000000 A            DATA     X'00000000'
     6691   01 01A81    00000000 A            DATA     X'00000000'
     6692   01 01A82    FAA401EB A            DATA     X'FAA401EB'
     6693   01 01A83    341A1F3F A            DATA     X'341A1F3F'
     6694   01 01A84    FFFFFFF6 A   MI02     DATA     -10               MI
     6695   01 01A85    23C6590D A            MI,12    X'6590D'
     6696   01 01A86    073001F4              K        00,7,3,FXPOSW
     6697   01 01A87    67300179              K        6,7,3,LOC+2
     6698   01 01A88    00000000 A            DATA     X'00000000'
     6699   01 01A89    00015C36 A            DATA     X'00015C36'
     6700   01 01A8A    00000000 A            DATA     X'00000000'
     6701   01 01A8B    00000000 A            DATA     X'00000000'
     6702   01 01A8C    36DAE799 A            DATA     X'36DAE799'
     6703   01 01A8D    5137F3C5 A            DATA     X'5137F3C5'
     6704   01 01A8E    FFFFFFF6 A   MI03     DATA     -10               MI
     6705   01 01A8F    23DA7646 A            MI,13    X'A7646'
     6706   01 01A90    F73001F4              K        15,7,3,FXPOSW
     6707   01 01A91    E7300179              K        14,7,3,LOC+2
     6708   01 01A92    00000000 A            DATA     X'00000000'
     6709   01 01A93    00000000 A            DATA     0
     6710   01 01A94    00000000 A            DATA     X'00000000'
     6711   01 01A95    00000000 A            DATA     X'00000000'
     6712   01 01A96    C59714B8 A            DATA     X'C59714B8'
     6713   01 01A97    2E8C7A50 A            DATA     X'2E8C7A50'
     6714   01 01A98    FFFFFFF6 A   MI04     DATA     -10               MI
     6715   01 01A99    23D5C9D2 A            MI,13    X'5C9D2'
     6716   01 01A9A    F73001F4              K        15,7,3,FXPOSW
     6717   01 01A9B    E7300179              K        14,7,3,LOC+2
     6718   01 01A9C    00000000 A            DATA     X'00000000'
     6719   01 01A9D    00000000 A            DATA     0
     6720   01 01A9E    00000000 A            DATA     X'00000000'
     6721   01 01A9F    00000000 A            DATA     X'00000000'
     6722   01 01AA0    26AB3F51 A            DATA     X'26AB3F51'
     6723   01 01AA1    69C58972 A            DATA     X'69C58972'
     6724   01 01AA2    FFFFFFF6 A   MI05     DATA     -10               MIO
     6725   01 01AA3    23C44133 A            MI,12    X'44133'
     6726   01 01AA4    F73001F4              K        15,7,3,FXPOSW
     6727   01 01AA5    D7300179              K        13,7,3,LOC+2
     6728   01 01AA6    00000000 A            DATA     X'00000000'
     6729   01 01AA7    FFFE0253 A            DATA     X'FFFE0253'
     6730   01 01AA8    00000000 A            DATA     X'00000000'
     6731   01 01AA9    00000000 A            DATA     X'00000000'
     6732   01 01AAA    88357F05 A            DATA     X'88357F05'
     6733   01 01AAB    B3FC92FF A            DATA     X'B3FC92FF'
     6734   01 01AAC    FFFFFFF6 A   MI06     DATA     -10               MI
     6735   01 01AAD    23CAE01A A            MI,12    X'AE01A'
     6736   01 01AAE    F73001F4              K        15,7,3,FXPOSW
     6737   01 01AAF    E7300179              K        14,7,3,LOC+2
     6738   01 01AB0    00000000 A            DATA     X'00000000'
     6739   01 01AB1    00024888 A            DATA     X'00024888'
     6740   01 01AB2    00000000 A            DATA     X'00000000'
     6741   01 01AB3    00000000 A            DATA     X'00000000'
     6742   01 01AB4    8DEF82D4 A            DATA     X'8DEF82D4'
     6743   01 01AB5    EBD4C988 A            DATA     X'EBD4C988'
     6744   01 01AB6    FFFFFFF6 A   MI07     DATA     -10               MI
     6745   01 01AB7    23D065D1 A            MI,13    X'065D1'
     6746   01 01AB8    F73001F4              K        15,7,3,FXPOSW
     6747   01 01AB9    D7300179              K        13,7,3,LOC+2
     6748   01 01ABA    00000000 A            DATA     X'00000000'
     6749   01 01ABB    00000000 A            DATA     0
     6750   01 01ABC    00000000 A            DATA     X'00000000'
     6751   01 01ABD    00000000 A            DATA     X'00000000'
     6752   01 01ABE    D93AE796 A            DATA     X'D93AE796'
     6753   01 01ABF    96753F76 A            DATA     X'96753F76'
     6754   01 01AC0    FFFFFFF6 A   MI08     DATA     -10               MI
     6755   01 01AC1    23D7B463 A            MI,13    X'7B463'
     6756   01 01AC2    F73001F4              K        15,7,3,FXPOSW
     6757   01 01AC3    D7300179              K        13,7,3,LOC+2
     6758   01 01AC4    00000000 A            DATA     X'00000000'
     6759   01 01AC5    00000000 A            DATA     0
     6760   01 01AC6    00000000 A            DATA     X'00000000'
     6761   01 01AC7    00000000 A            DATA     X'00000000'
     6762   01 01AC8    8C594B71 A            DATA     X'8C594B71'
     6763   01 01AC9    1FAAA0B3 A            DATA     X'1FAAA0B3'
     6764   01 01ACA    FFFFFFFA A   MI09     DATA     -6                MI *
     6765   01 01ACB    A3C0049C              MI,12    *IA
     6766   01 01ACC    173001E8              K        1,7,3,SI9NAO
     6767   01 01ACD    9730006B              K        9,7,3,NEIRET+1
     6768   01 01ACE    12345678 A            DATA     X'12345678'
     6769   01 01ACF    12345678 A            DATA     X'12345678'
     6770   01 01AD0    FFFFFFF6 A   DW01     DATA     -10               ND0.RN = OVERFLOW
     6771   01 01AD1    36C004A2              DW,12    MEMORY
     6772   01 01AD2    072001F4              K        0,7,2,FXPOSW
     6773   01 01AD3    47200179              K        4,7,2,LOC+2
     6774   01 01AD4    CF999999 A            DATA     X'CF999999'
     6775   01 01AD5    CF999999 A            DATA     X'CF999999'
     6776   01 01AD6    60000000 A            DATA     X'60000000'
     6777   01 01AD7    60000000 A            DATA     X'60000000'
     6778   01 01AD8    00000000 A            DATA     X'00000000'
     6779   01 01AD9    00000000 A            DATA     X'00000000'
     6780   01 01ADA    FFFFFFF6 A   DW02     DATA     -10               D0.NRN.NAZ.BWZ = OVERFLOW
     6781   01 01ADB    36C004A2              DW,12    MEMORY
     6782   01 01ADC    F73001F4              K        15,7,3,FXPOSW
     6783   01 01ADD    F7300084              K        15,7,3,FPORET+1
     6784   01 01ADE    60000000 A            DATA     X'60000000'
     6785   01 01ADF    60000000 A            DATA     X'60000000'
     6786   01 01AE0    BFFFFFFE A            DATA     X'BFFFFFFE'
     6787   01 01AE1    BFFFFFFE A            DATA     X'BFFFFFFE'
     6788   01 01AE2    80000000 A            DATA     X'80000000'
     6789   01 01AE3    80000000 A            DATA     X'80000000'
     6790   01 01AE4    FFFFFFF6 A   DW03     DATA     -10               D0.NRN.NAZ.NBWZ = OVERFLOW
     6791   01 01AE5    36C004A2              DW,12    MEMORY
     6792   01 01AE6    F73001F4              K        15,7,3,FXPOSW
     6793   01 01AE7    F7300084              K        15,7,3,FPORET+1
     6794   01 01AE8    3FFFFFFF A            DATA     X'3FFFFFFF'
     6795   01 01AE9    3FFFFFFF A            DATA     X'3FFFFFFF'
     6796   01 01AEA    7FFFFFFD A            DATA     X'7FFFFFFD'
     6797   01 01AEB    7FFFFFFD A            DATA     X'7FFFFFFD'
     6798   01 01AEC    00000001 A            DATA     X'00000001'
     6799   01 01AED    00000001 A            DATA     X'00000001'
     6800   01 01AEE    FFFFFFF6 A   DW04     DATA     -10               D0.AZ.BWZ.MWN,RN = OVERFLOW
     6801   01 01AEF    36C004A2              DW,12    MEMORY
     6802   01 01AF0    F73001F4              K        15,7,3,FXPOSW
     6803   01 01AF1    F7300084              K        15,7,3,FPORET+1
     6804   01 01AF2    C0000000 A            DATA     X'C0000000'
     6805   01 01AF3    C0000000 A            DATA     X'C0000000'
     6806   01 01AF4    80000000 A            DATA     X'80000000'
     6807   01 01AF5    80000000 A            DATA     X'80000000'
     6808   01 01AF6    00000000 A            DATA     X'00000000'
     6809   01 01AF7    00000000 A            DATA     X'00000000'
     6810   01 01AF8    FFFFFFF6 A   DW05     DATA     -10               D0.AZ.BWZ.NMWN,NRN = OVERFLOW
     6811   01 01AF9    36C004A2              DW,12    MEMORY
     6812   01 01AFA    F73001F4              K        15,7,3,FXPOSW
     6813   01 01AFB    F7300084              K        15,7,3,FPORET+1
     6814   01 01AFC    40000000 A            DATA     X'40000000'
     6815   01 01AFD    40000000 A            DATA     X'40000000'
     6816   01 01AFE    7FFFFFFF A            DATA     X'7FFFFFFF'
     6817   01 01AFF    7FFFFFFF A            DATA     X'7FFFFFFF'
     6818   01 01B00    80000000 A            DATA     X'80000000'
     6819   01 01B01    80000000 A            DATA     X'80000000'
     6820   01 01B02    FFFFFFF6 A   DW06     DATA     -10               DW
     6821   01 01B03    36C004A2              DW,12    MEMORY
     6822   01 01B04    F73001F4              K        15,7,3,FXPOSW
     6823   01 01B05    A7300179              K        10,7,3,LOC+2
     6824   01 01B06    3FFFFFFF A            DATA     X'3FFFFFFF'
     6825   01 01B07    00000000 A            DATA     X'00000000'
     6826   01 01B08    7FFFFFFF A            DATA     X'7FFFFFFF'
     6827   01 01B09    7FFFFFFF A            DATA     X'7FFFFFFF'
     6828   01 01B0A    00000001 A            DATA     X'00000001'
     6829   01 01B0B    7FFFFFFF A            DATA     X'7FFFFFFF'
     6830   01 01B0C    FFFFFFF6 A   DW07     DATA     -10               DW
     6831   01 01B0D    36C004A2              DW,12    MEMORY
     6832   01 01B0E    F73001F4              K        15,7,3,FXPOSW
     6833   01 01B0F    97300179              K        9,7,3,LOC+2
     6834   01 01B10    3FFFFFFF A            DATA     X'3FFFFFFF'
     6835   01 01B11    00000000 A            DATA     X'00000000'
     6836   01 01B12    80000001 A            DATA     X'80000001'
     6837   01 01B13    80000001 A            DATA     X'80000001'
     6838   01 01B14    00000001 A            DATA     X'00000001'
     6839   01 01B15    80000001 A            DATA     X'80000001'
     6840   01 01B16    FFFFFFF6 A   DW08     DATA     -10               DW
     6841   01 01B17    36C004A2              DW,12    MEMORY
     6842   01 01B18    F73001F4              K        15,7,3,FXPOSW
     6843   01 01B19    97300179              K        9,7,3,LOC+2
     6844   01 01B1A    E0000000 A            DATA     X'E0000000'
     6845   01 01B1B    C0000001 A            DATA     X'C0000001'
     6846   01 01B1C    7FFFFFFF A            DATA     X'7FFFFFFF'
     6847   01 01B1D    7FFFFFFF A            DATA     X'7FFFFFFF'
     6848   01 01B1E    FFFFFFFF A            DATA     X'FFFFFFFF'
     6849   01 01B1F    C0000002 A            DATA     X'C0000002'
     6850   01 01B20    FFFFFFF6 A   DW09     DATA     -10               DW
     6851   01 01B21    36C004A2              DW,12    MEMORY
     6852   01 01B22    F73001F4              K        15,7,3,FXPOSW
     6853   01 01B23    A7300179              K        10,7,3,LOC+2
     6854   01 01B24    C0000000 A            DATA     X'C0000000'
     6855   01 01B25    00000000 A            DATA     X'00000000'
     6856   01 01B26    80000001 A            DATA     X'80000001'
     6857   01 01B27    80000001 A            DATA     X'80000001'
     6858   01 01B28    FFFFFFFF A            DATA     X'FFFFFFFF'
     6859   01 01B29    7FFFFFFF A            DATA     X'7FFFFFFF'
     6860   01 01B2A    FFFFFFF6 A   DW10     DATA     -10               DW
     6861   01 01B2B    36C004A2              DW,12    MEMORY
     6862   01 01B2C    F73001F4              K        15,7,3,FXPOSW
     6863   01 01B2D    A7300179              K        10,7,3,LOC+2
     6864   01 01B2E    FFFFFFFF A            DATA     X'FFFFFFFF'
     6865   01 01B2F    FFFFFFFD A            DATA     X'FFFFFFFD'
     6866   01 01B30    FFFFFFFC A            DATA     X'FFFFFFFC'
     6867   01 01B31    FFFFFFFC A            DATA     X'FFFFFFFC'
     6868   01 01B32    FFFFFFE1 A            DATA     X'FFFFFFE1'
     6869   01 01B33    00000007 A            DATA     X'00000007'
     6870   01 01B34    FFFFFFF6 A   DW11     DATA     -10               DW
     6871   01 01B35    36C004A2              DW,12    MEMORY
     6872   01 01B36    F73001F4              K        15,7,3,FXPOSW
     6873   01 01B37    A7300179              K        10,7,3,LOC+2
     6874   01 01B38    00000000 A            DATA     X'00000000'
     6875   01 01B39    00000000 A            DATA     X'00000000'
     6876   01 01B3A    00000004 A            DATA     X'00000004'
     6877   01 01B3B    00000004 A            DATA     X'00000004'
     6878   01 01B3C    00000020 A            DATA     X'00000020'
     6879   01 01B3D    00000008 A            DATA     X'00000008'
     6880   01 01B3E    FFFFFFF6 A   DW12     DATA     -10               DW
     6881   01 01B3F    36C004A2              DW,12    MEMORY
     6882   01 01B40    F73001F4              K        15,7,3,FXPOSW
     6883   01 01B41    97300179              K        9,7,3,LOC+2
     6884   01 01B42    FFFFFFFF A            DATA     X'FFFFFFFF'
     6885   01 01B43    00000000 A            DATA     X'00000000'
     6886   01 01B44    00000004 A            DATA     X'00000004'
     6887   01 01B45    00000004 A            DATA     X'00000004'
     6888   01 01B46    FFFFFFE0 A            DATA     X'FFFFFFE0'
     6889   01 01B47    FFFFFFF8 A            DATA     X'FFFFFFF8'
     6890   01 01B48    FFFFFFF6 A   DW13     DATA     -10               DW
     6891   01 01B49    36C004A2              DW,12    MEMORY
     6892   01 01B4A    F73001F4              K        15,7,3,FXPOSW
     6893   01 01B4B    A7300179              K        10,7,3,LOC+2
     6894   01 01B4C    FFFFFFFF A            DATA     X'FFFFFFFF'
     6895   01 01B4D    FFFFFFFF A            DATA     X'FFFFFFFF'
     6896   01 01B4E    FFFFFFFB A            DATA     X'FFFFFFFB'
     6897   01 01B4F    FFFFFFFB A            DATA     X'FFFFFFFB'
     6898   01 01B50    FFFFFFE1 A            DATA     X'FFFFFFE1'
     6899   01 01B51    00000006 A            DATA     X'00000006'
     6900   01 01B52    FFFFFFF6 A   DW14     DATA     -10               DW
     6901   01 01B53    36C004A2              DW,12    MEMORY
     6902   01 01B54    F73001F4              K        15,7,3,FXPOSW
     6903   01 01B55    97300179              K        9,7,3,LOC+2
     6904   01 01B56    00000000 A            DATA     X'00000000'
     6905   01 01B57    00000000 A            DATA     X'00000000'
     6906   01 01B58    FFFFFFFC A            DATA     X'FFFFFFFC'
     6907   01 01B59    FFFFFFFC A            DATA     X'FFFFFFFC'
     6908   01 01B5A    00000020 A            DATA     X'00000020'
     6909   01 01B5B    FFFFFFF8 A            DATA     X'FFFFFFF8'
     6910   01 01B5C    FFFFFFF6 A   DW15     DATA     -10               DW
     6911   01 01B5D    36C004A2              DW,12    MEMORY
     6912   01 01B5E    F73001F4              K        15,7,3,FXPOSW
     6913   01 01B5F    97300179              K        9,7,3,LOC+2
     6914   01 01B60    FFFFFFFF A            DATA     X'FFFFFFFF'
     6915   01 01B61    FFFFFFFD A            DATA     X'FFFFFFFD'
     6916   01 01B62    00000004 A            DATA     X'00000004'
     6917   01 01B63    00000004 A            DATA     X'00000004'
     6918   01 01B64    FFFFFFE1 A            DATA     X'FFFFFFE1'
     6919   01 01B65    FFFFFFF9 A            DATA     X'FFFFFFF9'
     6920   01 01B66    FFFFFFF6 A   DW16     DATA     -10               DW
     6921   01 01B67    36C004A2              DW,12    MEMORY
     6922   01 01B68    F73001F4              K        15,7,3,FXPOSW
     6923   01 01B69    A7300179              K        10,7,3,LOC+2
     6924   01 01B6A    FFFFFFFF A            DATA     X'FFFFFFFF'
     6925   01 01B6B    00000000 A            DATA     X'00000000'
     6926   01 01B6C    FFFFFFFC A            DATA     X'FFFFFFFC'
     6927   01 01B6D    FFFFFFFC A            DATA     X'FFFFFFFC'
     6928   01 01B6E    FFFFFFE0 A            DATA     X'FFFFFFE0'
     6929   01 01B6F    00000008 A            DATA     X'00000008'
     6930   01 01B70    FFFFFFF6 A   DW17     DATA     -10               DW
     6931   01 01B71    36C004A2              DW,12    MEMORY
     6932   01 01B72    F73001F4              K        15,7,3,FXPOSW
     6933   01 01B73    A7300179              K        10,7,3,LOC+2
     6934   01 01B74    00000000 A            DATA     X'00000000'
     6935   01 01B75    00000003 A            DATA     X'00000003'
     6936   01 01B76    00000004 A            DATA     X'00000004'
     6937   01 01B77    00000004 A            DATA     X'00000004'
     6938   01 01B78    0000001F A            DATA     X'0000001F'
     6939   01 01B79    00000007 A            DATA     X'00000007'
     6940   01 01B7A    FFFFFFF6 A   DW18     DATA     -10               DW
     6941   01 01B7B    36C004A2              DW,12    MEMORY
     6942   01 01B7C    F73001F4              K        15,7,3,FXPOSW
     6943   01 01B7D    A7300179              K        10,7,3,LOC+2
     6944   01 01B7E    15555555 A            DATA     X'15555555'
     6945   01 01B7F    00000000 A            DATA     X'00000000'
     6946   01 01B80    7FFFFFFF A            DATA     X'7FFFFFFF'
     6947   01 01B81    7FFFFFFF A            DATA     X'7FFFFFFF'
     6948   01 01B82    55555555 A            DATA     X'55555555'
     6949   01 01B83    2AAAAAAB A            DATA     X'2AAAAAAB'
     6950   01 01B84    FFFFFFF6 A   DW19     DATA     -10               DW
     6951   01 01B85    36C004A2              DW,12    MEMORY
     6952   01 01B86    F73001F4              K        15,7,3,FXPOSW
     6953   01 01B87    A7300179              K        10,7,3,LOC+2
     6954   01 01B88    31C3C1F0 A            DATA     X'31C3C1F0'
     6955   01 01B89    3CBA3128 A            DATA     X'3CBA3128'
     6956   01 01B8A    79999999 A            DATA     X'79999999'
     6957   01 01B8B    79999999 A            DATA     X'79999999'
     6958   01 01B8C    11111111 A            DATA     X'11111111'
     6959   01 01B8D    68C48AD1 A            DATA     X'68C48AD1'
     6960   01 01B8E    FFFFFFF6 A   DW20     DATA     -10               DW
     6961   01 01B8F    36C004A2              DW,12    MEMORY
     6962   01 01B90    F73001F4              K        15,7,3,FXPOSW
     6963   01 01B91    97300179              K        9,7,3,LOC+2
     6964   01 01B92    FC7CF1CC A            DATA     X'FC7CF1CC'
     6965   01 01B93    FAAAAAAA A            DATA     X'FAAAAAAA'
     6966   01 01B94    70000000 A            DATA     X'70000000'
     6967   01 01B95    70000000 A            DATA     X'70000000'
     6968   01 01B96    AAAAAAAA A            DATA     X'AAAAAAAA'
     6969   01 01B97    F7F9041D A            DATA     X'F7F9041D'
     6970   01 01B98    FFFFFFF6 A   DW21     DATA     -10               DW
     6971   01 01B99    36C004A2              DW,12    MEMORY
     6972   01 01B9A    F73001F4              K        15,7,3,FXPOSW
     6973   01 01B9B    97300179              K        9,7,3,LOC+2
     6974   01 01B9C    31111111 A            DATA     X'31111111'
     6975   01 01B9D    584D7750 A            DATA     X'584D7750'
     6976   01 01B9E    84444444 A            DATA     X'84444444'
     6977   01 01B9F    84444444 A            DATA     X'84444444'
     6978   01 01BA0    59C61C18 A            DATA     X'59C61C18'
     6979   01 01BA1    9A7B9612 A            DATA     X'9A7B9612'
     6980   01 01BA2    FFFFFFF6 A   DW22     DATA     -10               DW
     6981   01 01BA3    36C004A2              DW,12    MEMORY
     6982   01 01BA4    F73001F4              K        15,7,3,FXPOSW
     6983   01 01BA5    97300179              K        9,7,3,LOC+2
     6984   01 01BA6    D6666666 A            DATA     X'D6666666'
     6985   01 01BA7    BE7E7E7E A            DATA     X'BE7E7E7E'
     6986   01 01BA8    7EEEEEEE A            DATA     X'7EEEEEEE'
     6987   01 01BA9    7EEEEEEE A            DATA     X'7EEEEEEE'
     6988   01 01BAA    66666666 A            DATA     X'66666666'
     6989   01 01BAB    AC19D0AC A            DATA     X'AC19D0AC'
     6990   01 01BAC    FFFFFFF6 A   DW23     DATA     -10               DW
     6991   01 01BAD    36C004A2              DW,12    MEMORY
     6992   01 01BAE    F73001F4              K        15,7,3,FXPOSW
     6993   01 01BAF    A7300179              K        10,7,3,LOC+2
     6994   01 01BB0    F1C3C731 A            DATA     X'F1C3C731'
     6995   01 01BB1    ED42FD57 A            DATA     X'ED42FD57'
     6996   01 01BB2    84444444 A            DATA     X'84444444'
     6997   01 01BB3    84444444 A            DATA     X'84444444'
     6998   01 01BB4    3F01FC03 A            DATA     X'3F01FC03'
     6999   01 01BB5    1D73C4FB A            DATA     X'1D73C4FB'
     7000   01 01BB6    FFFFFFF6 A   DW24     DATA     -10               DW
     7001   01 01BB7    36C004A2              DW,12    MEMORY
     7002   01 01BB8    F73001F4              K        15,7,3,FXPOSW
     7003   01 01BB9    A7300179              K        10,7,3,LOC+2
     7004   01 01BBA    36666666 A            DATA     X'36666666'
     7005   01 01BBB    75555555 A            DATA     X'75555555'
     7006   01 01BBC    7EEEEEEE A            DATA     X'7EEEEEEE'
     7007   01 01BBD    7EEEEEEE A            DATA     X'7EEEEEEE'
     7008   01 01BBE    99999999 A            DATA     X'99999999'
     7009   01 01BBF    6DB6DB6E A            DATA     X'6DB6DB6E'
     7010   01 01BC0    FFFFFFF6 A   DW25     DATA     -10               DW
     7011   01 01BC1    36C004A2              DW,12    MEMORY
     7012   01 01BC2    F73001F4              K        15,7,3,FXPOSW
     7013   01 01BC3    A7300179              K        10,7,3,LOC+2
     7014   01 01BC4    27777777 A            DATA     X'27777777'
     7015   01 01BC5    6DB53C70 A            DATA     X'6DB53C70'
     7016   01 01BC6    70000000 A            DATA     X'70000000'
     7017   01 01BC7    70000000 A            DATA     X'70000000'
     7018   01 01BC8    CDB53C70 A            DATA     X'CDB53C70'
     7019   01 01BC9    5A35A35A A            DATA     X'5A35A35A'
     7020   01 01BCA    FFFFFFF6 A   DW26     DATA     -10               DW
     7021   01 01BCB    36C004A2              DW,12    MEMORY
     7022   01 01BCC    F73001F4              K        15,7,3,FXPOSW
     7023   01 01BCD    97300179              K        9,7,3,LOC+2
     7024   01 01BCE    31C3C1F0 A            DATA     X'31C3C1F0'
     7025   01 01BCF    44D906D0 A            DATA     X'44D906D0'
     7026   01 01BD0    85555555 A            DATA     X'85555555'
     7027   01 01BD1    85555555 A            DATA     X'85555555'
     7028   01 01BD2    77777777 A            DATA     X'77777777'
     7029   01 01BD3    9824AE0B A            DATA     X'9824AE0B'
     7030   01 01BD4    FFFFFFF6 A   DW27     DATA     -10               DW
     7031   01 01BD5    36C004A2              DW,12    MEMORY
     7032   01 01BD6    F73001F4              K        15,7,3,FXPOSW
     7033   01 01BD7    97300179              K        9,7,3,LOC+2
     7034   01 01BD8    D6666666 A            DATA     X'D6666666'
     7035   01 01BD9    C45CB5B4 A            DATA     X'C45CB5B4'
     7036   01 01BDA    79999999 A            DATA     X'79999999'
     7037   01 01BDB    79999999 A            DATA     X'79999999'
     7038   01 01BDC    DF4F3C70 A            DATA     X'DF4F3C70'
     7039   01 01BDD    A86BCA1C A            DATA     X'A86BCA1C'
     7040   01 01BDE    FFFFFFF6 A   DW28     DATA     -10               DW
     7041   01 01BDF    36C004A2              DW,12    MEMORY
     7042   01 01BE0    F73001F4              K        15,7,3,FXPOSW
     7043   01 01BE1    97300179              K        9,7,3,LOC+2
     7044   01 01BE2    15555555 A            DATA     X'15555555'
     7045   01 01BE3    4FB8CDB4 A            DATA     X'4FB8CDB4'
     7046   01 01BE4    82222222 A            DATA     X'82222222'
     7047   01 01BE5    82222222 A            DATA     X'82222222'
     7048   01 01BE6    59C61C18 A            DATA     X'59C61C18'
     7049   01 01BE7    D49C3412 A            DATA     X'D49C3412'
     7050   01 01BE8    FFFFFFF6 A   DW29     DATA     -10               DW
     7051   01 01BE9    36C004A2              DW,12    MEMORY
     7052   01 01BEA    F73001F4              K        15,7,3,FXPOSW
     7053   01 01BEB    97300179              K        9,7,3,LOC+2
     7054   01 01BEC    021871E7 A            DATA     X'021871E7'
     7055   01 01BED    09CE9631 A            DATA     X'09CE9631'
     7056   01 01BEE    83333333 A            DATA     X'83333333'
     7057   01 01BEF    83333333 A            DATA     X'83333333'
     7058   01 01BF0    77777777 A            DATA     X'77777777'
     7059   01 01BF1    FBB399A2 A            DATA     X'FBB399A2'
     7060   01 01BF2    FFFFFFF6 A   DW30     DATA     -10               DW
     7061   01 01BF3    36C004A2              DW,12    MEMORY
     7062   01 01BF4    F73001F4              K        15,7,3,FXPOSW
     7063   01 01BF5    A7300179              K        10,7,3,LOC+2
     7064   01 01BF6    E1111111 A            DATA     X'E1111111'
     7065   01 01BF7    BA64966C A            DATA     X'BA64966C'
     7066   01 01BF8    87777777 A            DATA     X'87777777'
     7067   01 01BF9    87777777 A            DATA     X'87777777'
     7068   01 01BFA    AAAAAAAA A            DATA     X'AAAAAAAA'
     7069   01 01BFB    41B2F932 A            DATA     X'41B2F932'
     7070   01 01BFC    FFFFFFF6 A   DW31     DATA     -10               DW
     7071   01 01BFD    36C004A2              DW,12    MEMORY
     7072   01 01BFE    F73001F4              K        15,7,3,FXPOSW
     7073   01 01BFF    97300179              K        9,7,3,LOC+2
     7074   01 01C00    FC7CF1CC A            DATA     X'FC7CF1CC'
     7075   01 01C01    88E1079C A            DATA     X'88E1079C'
     7076   01 01C02    7EEEEEEE A            DATA     X'7EEEEEEE'
     7077   01 01C03    7EEEEEEE A            DATA     X'7EEEEEEE'
     7078   01 01C04    CD5B3C70 A            DATA     X'CD5B3C70'
     7079   01 01C05    F8EAC766 A            DATA     X'F8EAC766'
     7080   01 01C06    FFFFFFF6 A   DW32     DATA     -10               DW *
     7081   01 01C07    B6C0049C              DW,12    *IA
     7082   01 01C08    F73001F4              K        15,7,3,FXPOSW
     7083   01 01C09    A7300179              K        10,7,3,LOC+2
     7084   01 01C0A    15555555 A            DATA     X'15555555'
     7085   01 01C0B    11111111 A            DATA     X'11111111'
     7086   01 01C0C    70000000 A            DATA     X'70000000'
     7087   01 01C0D    70000000 A            DATA     X'70000000'
     7088   01 01C0E    11111111 A            DATA     X'11111111'
     7089   01 01C0F    30C30C30 A            DATA     X'30C30C30'
     7090   01 01C10    FFFFFFF6 A   DW33     DATA     -10               DW  X
     7091   01 01C11    36C2F391 S            DW,12    MEMORY-X'11111',1
     7092   01 01C12    F73001F4              K        15,7,3,FXPOSW
     7093   01 01C13    97300179              K        9,7,3,LOC+2
     7094   01 01C14    31111111 A            DATA     X'31111111'
     7095   01 01C15    1E4D06CC A            DATA     X'1E4D06CC'
     7096   01 01C16    87777777 A            DATA     X'87777777'
     7097   01 01C17    87777777 A            DATA     X'87777777'
     7098   01 01C18    22222222 A            DATA     X'22222222'
     7099   01 01C19    97C9A0DA A            DATA     X'97C9A0DA'
     7100   01 01C1A    FFFFFFF6 A   DW34     DATA     -10               DW
     7101   01 01C1B    36C004A2              DW,12    MEMORY
     7102   01 01C1C    F73001F4              K        15,7,3,FXPOSW
     7103   01 01C1D    97300179              K        9,7,3,LOC+2
     7104   01 01C1E    D6666666 A            DATA     X'D6666666'
     7105   01 01C1F    93521CFB A            DATA     X'93521CFB'
     7106   01 01C20    71111111 A            DATA     X'71111111'
     7107   01 01C21    71111111 A            DATA     X'71111111'
     7108   01 01C22    33333333 A            DATA     X'33333333'
     7109   01 01C23    A1CFB2B8 A            DATA     X'A1CFB2B8'
     7110   01 01C24    FFFFFFF6 A   DW35     DATA     -10               DW
     7111   01 01C25    36C004A2              DW,12    MEMORY
     7112   01 01C26    F73001F4              K        15,7,3,FXPOSW
     7113   01 01C27    97300179              K        9,7,3,LOC+2
     7114   01 01C28    36666666 A            DATA     X'36666666'
     7115   01 01C29    274B2F83 A            DATA     X'274B2F83'
     7116   01 01C2A    89999999 A            DATA     X'89999999'
     7117   01 01C2B    89999999 A            DATA     X'89999999'
     7118   01 01C2C    44444444 A            DATA     X'44444444'
     7119   01 01C2D    8A60DD69 A            DATA     X'8A60DD69'
     7120   01 01C2E    FFFFFFF6 A   DW36     DATA     -10               DW
     7121   01 01C2F    36C004A2              DW,12    MEMORY
     7122   01 01C30    F73001F4              K        15,7,3,FXPOSW
     7123   01 01C31    A7300179              K        10,7,3,LOC+2
     7124   01 01C32    021871E7 A            DATA     X'021871E7'
     7125   01 01C33    48888888 A            DATA     X'48888888'
     7126   01 01C34    70000000 A            DATA     X'70000000'
     7127   01 01C35    70000000 A            DATA     X'70000000'
     7128   01 01C36    88888888 A            DATA     X'88888888'
     7129   01 01C37    04CA28EC A            DATA     X'04CA28EC'
     7130   01 01C38    FFFFFFF6 A   DW37     DATA     -10               DW
     7131   01 01C39    36C004A2              DW,12    MEMORY
     7132   01 01C3A    F73001F4              K        15,7,3,FXPOSW
     7133   01 01C3B    A7300179              K        10,7,3,LOC+2
     7134   01 01C3C    E1111111 A            DATA     X'E1111111'
     7135   01 01C3D    CB75A77D A            DATA     X'CB75A77D'
     7136   01 01C3E    87777777 A            DATA     X'87777777'
     7137   01 01C3F    87777777 A            DATA     X'87777777'
     7138   01 01C40    BBBBBBBB A            DATA     X'BBBBBBBB'
     7139   01 01C41    41B2F932 A            DATA     X'41B2F932'
     7140   01 01C42    FFFFFFF6 A   DW38     DATA     -10               DW
     7141   01 01C43    36C004A2              DW,12    MEMORY
     7142   01 01C44    F73001F4              K        15,7,3,FXPOSW
     7143   01 01C45    97300179              K        9,7,3,LOC+2
     7144   01 01C46    F1C3C731 A            DATA     X'F1C3C731'
     7145   01 01C47    E79E5F51 A            DATA     X'E79E5F51'
     7146   01 01C48    79999999 A            DATA     X'79999999'
     7147   01 01C49    79999999 A            DATA     X'79999999'
     7148   01 01C4A    CCCCCCCC A            DATA     X'CCCCCCCC'
     7149   01 01C4B    E207F433 A            DATA     X'E207F433'
     7150   01 01C4C    FFFFFFF6 A   DW39     DATA     -10               DW
     7151   01 01C4D    36C004A2              DW,12    MEMORY
     7152   01 01C4E    F73001F4              K        15,7,3,FXPOSW
     7153   01 01C4F    A7300179              K        10,7,3,LOC+2
     7154   01 01C50    00000000 A            DATA     X'00000000'
     7155   01 01C51    00000000 A            DATA     X'00000000'
     7156   01 01C52    00000001 A            DATA     X'00000001'
     7157   01 01C53    00000001 A            DATA     X'00000001'
     7158   01 01C54    00000002 A            DATA     X'00000002'
     7159   01 01C55    00000002 A            DATA     X'00000002'
     7160   01 01C56    FFFFFFF6 A   DW40     DATA     -10               DW
     7161   01 01C57    36C004A2              DW,12    MEMORY
     7162   01 01C58    F73001F4              K        15,7,3,FXPOSW
     7163   01 01C59    A7300179              K        10,7,3,LOC+2
     7164   01 01C5A    00000000 A            DATA     X'00000000'
     7165   01 01C5B    00000000 A            DATA     X'00000000'
     7166   01 01C5C    7FFFFFFF A            DATA     X'7FFFFFFF'
     7167   01 01C5D    7FFFFFFF A            DATA     X'7FFFFFFF'
     7168   01 01C5E    7FFFFFFF A            DATA     X'7FFFFFFF'
     7169   01 01C5F    00000001 A            DATA     X'00000001'
     7170   01 01C60    FFFFFFF6 A   DW41     DATA     -10               DW
     7171   01 01C61    36C004A2              DW,12    MEMORY
     7172   01 01C62    F73001F4              K        15,7,3,FXPOSW
     7173   01 01C63    A7300179              K        10,7,3,LOC+2
     7174   01 01C64    00000000 A            DATA     X'00000000'
     7175   01 01C65    00000000 A            DATA     X'00000000'
     7176   01 01C66    00000001 A            DATA     X'00000001'
     7177   01 01C67    00000001 A            DATA     X'00000001'
     7178   01 01C68    7FFFFFFF A            DATA     X'7FFFFFFF'
     7179   01 01C69    7FFFFFFF A            DATA     X'7FFFFFFF'
     7180   01 01C6A    FFFFFFF6 A   DW42     DATA     -10               DW
     7181   01 01C6B    36C004A2              DW,12    MEMORY
     7182   01 01C6C    F73001F4              K        15,7,3,FXPOSW
     7183   01 01C6D    A7300179              K        10,7,3,LOC+2
     7184   01 01C6E    FFFFFFFF A            DATA     X'FFFFFFFF'
     7185   01 01C6F    00000000 A            DATA     X'00000000'
     7186   01 01C70    FFFFFFFF A            DATA     X'FFFFFFFF'
     7187   01 01C71    FFFFFFFF A            DATA     X'FFFFFFFF'
     7188   01 01C72    FFFFFFFE A            DATA     X'FFFFFFFE'
     7189   01 01C73    00000002 A            DATA     X'00000002'
     7190   01 01C74    FFFFFFF6 A   DW43     DATA     -10               DW
     7191   01 01C75    36C004A2              DW,12    MEMORY
     7192   01 01C76    F73001F4              K        15,7,3,FXPOSW
     7193   01 01C77    A7300179              K        10,7,3,LOC+2
     7194   01 01C78    FFFFFFFF A            DATA     X'FFFFFFFF'
     7195   01 01C79    00000000 A            DATA     X'00000000'
     7196   01 01C7A    80000001 A            DATA     X'80000001'
     7197   01 01C7B    80000001 A            DATA     X'80000001'
     7198   01 01C7C    80000001 A            DATA     X'80000001'
     7199   01 01C7D    00000001 A            DATA     X'00000001'
     7200   01 01C7E    FFFFFFF6 A   DW44     DATA     -10               DW
     7201   01 01C7F    36C004A2              DW,12    MEMORY
     7202   01 01C80    F73001F4              K        15,7,3,FXPOSW
     7203   01 01C81    A7300179              K        10,7,3,LOC+2
     7204   01 01C82    FFFFFFFF A            DATA     X'FFFFFFFF'
     7205   01 01C83    00000000 A            DATA     X'00000000'
     7206   01 01C84    FFFFFFFF A            DATA     X'FFFFFFFF'
     7207   01 01C85    FFFFFFFF A            DATA     X'FFFFFFFF'
     7208   01 01C86    80000001 A            DATA     X'80000001'
     7209   01 01C87    7FFFFFFF A            DATA     X'7FFFFFFF'
     7210   01 01C88    FFFFFFF6 A   DW45     DATA     -10               DW
     7211   01 01C89    36C004A2              DW,12    MEMORY
     7212   01 01C8A    F73001F4              K        15,7,3,FXPOSW
     7213   01 01C8B    97300179              K        9,7,3,LOC+2
     7214   01 01C8C    00000000 A            DATA     X'00000000'
     7215   01 01C8D    00000000 A            DATA     X'00000000'
     7216   01 01C8E    FFFFFFFF A            DATA     X'FFFFFFFF'
     7217   01 01C8F    FFFFFFFF A            DATA     X'FFFFFFFF'
     7218   01 01C90    00000002 A            DATA     X'00000002'
     7219   01 01C91    FFFFFFFE A            DATA     X'FFFFFFFE'
     7220   01 01C92    FFFFFFF6 A   DW46     DATA     -10               DW
     7221   01 01C93    36C004A2              DW,12    MEMORY
     7222   01 01C94    F73001F4              K        15,7,3,FXPOSW
     7223   01 01C95    97300179              K        9,7,3,LOC+2
     7224   01 01C96    00000000 A            DATA     X'00000000'
     7225   01 01C97    00000000 A            DATA     X'00000000'
     7226   01 01C98    80000001 A            DATA     X'80000001'
     7227   01 01C99    80000001 A            DATA     X'80000001'
     7228   01 01C9A    7FFFFFFF A            DATA     X'7FFFFFFF'
     7229   01 01C9B    FFFFFFFF A            DATA     X'FFFFFFFF'
     7230   01 01C9C    FFFFFFF6 A   DW47     DATA     -10               DW
     7231   01 01C9D    36C004A2              DW,12    MEMORY
     7232   01 01C9E    F73001F4              K        15,7,3,FXPOSW
     7233   01 01C9F    97300179              K        9,7,3,LOC+2
     7234   01 01CA0    00000000 A            DATA     X'00000000'
     7235   01 01CA1    00000000 A            DATA     X'00000000'
     7236   01 01CA2    FFFFFFFF A            DATA     X'FFFFFFFF'
     7237   01 01CA3    FFFFFFFF A            DATA     X'FFFFFFFF'
     7238   01 01CA4    7FFFFFFF A            DATA     X'7FFFFFFF'
     7239   01 01CA5    80000001 A            DATA     X'80000001'
     7240   01 01CA6    FFFFFFF6 A   DW48     DATA     -10               DW
     7241   01 01CA7    36C004A2              DW,12    MEMORY
     7242   01 01CA8    F73001F4              K        15,7,3,FXPOSW
     7243   01 01CA9    97300179              K        9,7,3,LOC+2
     7244   01 01CAA    FFFFFFFF A            DATA     X'FFFFFFFF'
     7245   01 01CAB    00000000 A            DATA     X'00000000'
     7246   01 01CAC    00000001 A            DATA     X'00000001'
     7247   01 01CAD    00000001 A            DATA     X'00000001'
     7248   01 01CAE    FFFFFFFE A            DATA     X'FFFFFFFE'
     7249   01 01CAF    FFFFFFFE A            DATA     X'FFFFFFFE'
     7250   01 01CB0    FFFFFFF6 A   DW49     DATA     -10               DW
     7251   01 01CB1    36C004A2              DW,12    MEMORY
     7252   01 01CB2    F73001F4              K        15,7,3,FXPOSW
     7253   01 01CB3    97300179              K        9,7,3,LOC+2
     7254   01 01CB4    FFFFFFFF A            DATA     X'FFFFFFFF'
     7255   01 01CB5    00000000 A            DATA     X'00000000'
     7256   01 01CB6    7FFFFFFF A            DATA     X'7FFFFFFF'
     7257   01 01CB7    7FFFFFFF A            DATA     X'7FFFFFFF'
     7258   01 01CB8    80000001 A            DATA     X'80000001'
     7259   01 01CB9    FFFFFFFF A            DATA     X'FFFFFFFF'
     7260   01 01CBA    FFFFFFF6 A   DW50     DATA     -10               DW
     7261   01 01CBB    36C004A2              DW,12    MEMORY
     7262   01 01CBC    F73001F4              K        15,7,3,FXPOSW
     7263   01 01CBD    97300179              K        9,7,3,LOC+2
     7264   01 01CBE    FFFFFFFF A            DATA     X'FFFFFFFF'
     7265   01 01CBF    00000000 A            DATA     X'00000000'
     7266   01 01CC0    00000001 A            DATA     X'00000001'
     7267   01 01CC1    00000001 A            DATA     X'00000001'
     7268   01 01CC2    80000001 A            DATA     X'80000001'
     7269   01 01CC3    80000001 A            DATA     X'80000001'
     7270   01 01CC4    FFFFFFF6 A   DW51     DATA     -10               DW
     7271   01 01CC5    36C004A2              DW,12    MEMORY
     7272   01 01CC6    F73001F4              K        15,7,3,FXPOSW
     7273   01 01CC7    A7300179              K        10,7,3,LOC+2
     7274   01 01CC8    01234567 A            DATA     X'01234567'
     7275   01 01CC9    0DD441AF A            DATA     X'0DD441AF'
     7276   01 01CCA    42468ACE A            DATA     X'42468ACE'
     7277   01 01CCB    42468ACE A            DATA     X'42468ACE'
     7278   01 01CCC    89ABCDEF A            DATA     X'89ABCDEF'
     7279   01 01CCD    046514E0 A            DATA     X'046514E0'
     7280   01 01CCE    FFFFFFF6 A   DW52     DATA     -10               DW
     7281   01 01CCF    36C004A2              DW,12    MEMORY
     7282   01 01CD0    F73001F4              K        15,7,3,FXPOSW
     7283   01 01CD1    A7300179              K        10,7,3,LOC+2
     7284   01 01CD2    258BE147 A            DATA     X'258BE147'
     7285   01 01CD3    55A20A6F A            DATA     X'55A20A6F'
     7286   01 01CD4    56AE37BF A            DATA     X'56AE37BF'
     7287   01 01CD5    56AE37BF A            DATA     X'56AE37BF'
     7288   01 01CD6    AD0369CF A            DATA     X'AD0369CF'
     7289   01 01CD7    6EE378A0 A            DATA     X'6EE378A0'
     7290   01 01CD8    FFFFFFF6 A   DW53     DATA     -10               DW
     7291   01 01CD9    36C004A2              DW,12    MEMORY
     7292   01 01CDA    F73001F4              K        15,7,3,FXPOSW
     7293   01 01CDB    F7300084              K        15,7,3,FPORET+1
     7294   01 01CDC    DF1357BD A            DATA     X'DF1357BD'
     7295   01 01CDD    DF1357BD A            DATA     X'DF1357BD'
     7296   01 01CDE    E13579BD A            DATA     X'E13579BD'
     7297   01 01CDF    E13579BD A            DATA     X'E13579BD'
     7298   01 01CE0    F2468ACE A            DATA     X'F2468ACE'
     7299   01 01CE1    F2468ACE A            DATA     X'F2468ACE'
     7300   01 01CE2    FFFFFFF6 A   DW54     DATA     -10               DW
     7301   01 01CE3    36C004A2              DW,12    MEMORY
     7302   01 01CE4    F73001F4              K        15,7,3,FXPOSW
     7303   01 01CE5    A7300179              K        10,7,3,LOC+2
     7304   01 01CE6    E26AE38D A            DATA     X'E26AE38D'
     7305   01 01CE7    92D13AE2 A            DATA     X'92D13AE2'
     7306   01 01CE8    8147AD03 A            DATA     X'8147AD03'
     7307   01 01CE9    8147AD03 A            DATA     X'8147AD03'
     7308   01 01CEA    27C16B05 A            DATA     X'27C16B05'
     7309   01 01CEB    3BC33661 A            DATA     X'3BC33661'
     7310   01 01CEC    FFFFFFF6 A   DW55     DATA     -10               DW
     7311   01 01CED    36C004A2              DW,12    MEMORY
     7312   01 01CEE    F73001F4              K        15,7,3,FXPOSW
     7313   01 01CEF    F7300084              K        15,7,3,FPORET+1
     7314   01 01CF0    148BF37B A            DATA     X'148BF37B'
     7315   01 01CF1    148BF37B A            DATA     X'148BF37B'
     7316   01 01CF2    E26AF49F A            DATA     X'E26AF49F'
     7317   01 01CF3    E26AF49F A            DATA     X'E26AF49F'
     7318   01 01CF4    F37BF49E A            DATA     X'F37BF49E'
     7319   01 01CF5    F37BF49E A            DATA     X'F37BF49E'
     7320   01 01CF6    FFFFFFF6 A   DW56     DATA     -10               DW
     7321   01 01CF7    36C004A2              DW,12    MEMORY
     7322   01 01CF8    F73001F4              K        15,7,3,FXPOSW
     7323   01 01CF9    97300179              K        9,7,3,LOC+2
     7324   01 01CFA    F0259E49 A            DATA     X'F0259E49'
     7325   01 01CFB    DBE59C60 A            DATA     X'DBE59C60'
     7326   01 01CFC    457AE39F A            DATA     X'457AE39F'
     7327   01 01CFD    457AE39F A            DATA     X'457AE39F'
     7328   01 01CFE    ABE159F0 A            DATA     X'ABE159F0'
     7329   01 01CFF    C596D870 A            DATA     X'C596D870'
     7330   01 01D00    FFFFFFF6 A   DW57     DATA     -10               DW
     7331   01 01D01    36C004A2              DW,12    MEMORY
     7332   01 01D02    F73001F4              K        15,7,3,FXPOSW
     7333   01 01D03    97300179              K        9,7,3,LOC+2
     7334   01 01D04    00000000 A            DATA     X'00000000'
     7335   01 01D05    7FFFFFFF A            DATA     X'7FFFFFFF'
     7336   01 01D06    80000000 A            DATA     X'80000000'
     7337   01 01D07    80000000 A            DATA     X'80000000'
     7338   01 01D08    FFFFFFFF A            DATA     X'FFFFFFFF'
     7339   01 01D09    FFFFFFFF A            DATA     X'FFFFFFFF'
     7340   01 01D0A    FFFFFFF6 A   DW58     DATA     -10               DW
     7341   01 01D0B    36C004A2              DW,12    MEMORY
     7342   01 01D0C    F73001F4              K        15,7,3,FXPOSW
     7343   01 01D0D    A7300179              K        10,7,3,LOC+2
     7344   01 01D0E    C0000000 A            DATA     X'C0000000'
     7345   01 01D0F    80000001 A            DATA     X'80000001'
     7346   01 01D10    80000000 A            DATA     X'80000000'
     7347   01 01D11    80000000 A            DATA     X'80000000'
     7348   01 01D12    00000001 A            DATA     X'00000001'
     7349   01 01D13    7FFFFFFF A            DATA     X'7FFFFFFF'
     7350   01 01D14    FFFFFFF6 A   DW59     DATA     -10               DW
     7351   01 01D15    36C004A2              DW,12    MEMORY
     7352   01 01D16    F73001F4              K        15,7,3,FXPOSW
     7353   01 01D17    A7300179              K        10,7,3,LOC+2
     7354   01 01D18    F0000000 A            DATA     X'F0000000'
     7355   01 01D19    00000000 A            DATA     X'00000000'
     7356   01 01D1A    80000000 A            DATA     X'80000000'
     7357   01 01D1B    80000000 A            DATA     X'80000000'
     7358   01 01D1C    00000000 A            DATA     X'00000000'
     7359   01 01D1D    20000000 A            DATA     X'20000000'
     7360   01 01D1E    FFFFFFF6 A   DW60     DATA     -10               DW
     7361   01 01D1F    36C004A2              DW,12    MEMORY
     7362   01 01D20    B73001F4              K        11,7,3,FXPOSW
     7363   01 01D21    F7300084              K        15,7,3,FPORET+1
     7364   01 01D22    30000000 A            DATA     X'30000000'
     7365   01 01D23    30000000 A            DATA     X'30000000'
     7366   01 01D24    A0000000 A            DATA     X'A0000000'
     7367   01 01D25    A0000000 A            DATA     X'A0000000'
     7368   01 01D26    00000001 A            DATA     X'00000001'
     7369   01 01D27    00000001 A            DATA     X'00000001'
     7370   01 01D28    FFFFFFF6 A   DW61     DATA     -10               DW
     7371   01 01D29    36C004A2              DW,12    MEMORY
     7372   01 01D2A    F73001F4              K        15,7,3,FXPOSW
     7373   01 01D2B    97300179              K        9,7,3,LOC+2
     7374   01 01D2C    28CE5BDF A            DATA     X'28CE5BDF'
     7375   01 01D2D    006C9928 A            DATA     X'006C9928'
     7376   01 01D2E    8ACE9FBD A            DATA     X'8ACE9FBD'
     7377   01 01D2F    8ACE9FBD A            DATA     X'8ACE9FBD'
     7378   01 01D30    5A3E6E7F A            DATA     X'5A3E6E7F'
     7379   01 01D31    A6DCA0A3 A            DATA     X'A6DCA0A3'
     7380   01 01D32    FFFFFFF6 A   DW62     DATA     -10               DW
     7381   01 01D33    36C004A2              DW,12    MEMORY
     7382   01 01D34    F73001F4              K        15,7,3,FXPOSW
     7383   01 01D35    97300179              K        9,7,3,LOC+2
     7384   01 01D36    28E45B17 A            DATA     X'28E45B17'
     7385   01 01D37    4F57573B A            DATA     X'4F57573B'
     7386   01 01D38    A13BF37D A            DATA     X'A13BF37D'
     7387   01 01D39    A13BF37D A            DATA     X'A13BF37D'
     7388   01 01D3A    A09CD39F A            DATA     X'A09CD39F'
     7389   01 01D3B    9188D334 A            DATA     X'9188D334'
     7390   01 01D3C    FFFFFFF6 A   DW63     DATA     -10               DW
     7391   01 01D3D    36C004A2              DW,12    MEMORY
     7392   01 01D3E    F73001F4              K        15,7,3,FXPOSW
     7393   01 01D3F    A7300179              K        10,7,3,LOC+2
     7394   01 01D40    FE8C26AE A            DATA     X'FE8C26AE'
     7395   01 01D41    F86A5FFC A            DATA     X'F86A5FFC'
     7396   01 01D42    F67B159D A            DATA     X'F67B159D'
     7397   01 01D43    F67B159D A            DATA     X'F67B159D'
     7398   01 01D44    F4A017D3 A            DATA     X'F4A017D3'
     7399   01 01D45    27102303 A            DATA     X'27102303'
     7400   01 01D46    FFFFFFF6 A   DW64     DATA     -10               DW
     7401   01 01D47    36C004A2              DW,12    MEMORY
     7402   01 01D48    F73001F4              K        15,7,3,FXPOSW
     7403   01 01D49    97300179              K        9,7,3,LOC+2
     7404   01 01D4A    E6E82A3D A            DATA     X'E6E82A3D'
     7405   01 01D4B    C0DD5EE4 A            DATA     X'C0DD5EE4'
     7406   01 01D4C    78F74B3B A            DATA     X'78F74B3B'
     7407   01 01D4D    78F74B3B A            DATA     X'78F74B3B'
     7408   01 01D4E    2C6071B5 A            DATA     X'2C6071B5'
     7409   01 01D4F    CAE54163 A            DATA     X'CAE54163'
     7410   01 01D50    FFFFFFF6 A   DW65     DATA     -10               DW
     7411   01 01D51    36C004A2              DW,12    MEMORY
     7412   01 01D52    F73001F4              K        15,7,3,FXPOSW
     7413   01 01D53    A7300179              K        10,7,3,LOC+2
     7414   01 01D54    F7F93B4E A            DATA     X'F7F93B4E'
     7415   01 01D55    F2D2BD30 A            DATA     X'F2D2BD30'
     7416   01 01D56    E6F22A4F A            DATA     X'E6F22A4F'
     7417   01 01D57    E6F22A4F A            DATA     X'E6F22A4F'
     7418   01 01D58    47E95A3F A            DATA     X'47E95A3F'
     7419   01 01D59    52037141 A            DATA     X'52037141'
     7420   01 01D5A    FFFFFFF6 A   DW66     DATA     -10               DW
     7421   01 01D5B    36C004A2              DW,12    MEMORY
     7422   01 01D5C    F73001F4              K        15,7,3,FXPOSW
     7423   01 01D5D    97300179              K        9,7,3,LOC+2
     7424   01 01D5E    F29405E9 A            DATA     X'F29405E9'
     7425   01 01D5F    EDA31B94 A            DATA     X'EDA31B94'
     7426   01 01D60    690B7C52 A            DATA     X'690B7C52'
     7427   01 01D61    690B7C52 A            DATA     X'690B7C52'
     7428   01 01D62    AE58B190 A            DATA     X'AE58B190'
     7429   01 01D63    DF4A56CE A            DATA     X'DF4A56CE'
     7430   01 01D64    FFFFFFF6 A   DW67     DATA     -10               DW
     7431   01 01D65    36C004A2              DW,12    MEMORY
     7432   01 01D66    F73001F4              K        15,7,3,FXPOSW
     7433   01 01D67    A7300179              K        10,7,3,LOC+2
     7434   01 01D68    2D3297C8 A            DATA     X'2D3297C8'
     7435   01 01D69    1F22516F A            DATA     X'1F22516F'
     7436   01 01D6A    77532167 A            DATA     X'77532167'
     7437   01 01D6B    77532167 A            DATA     X'77532167'
     7438   01 01D6C    C237DAC1 A            DATA     X'C237DAC1'
     7439   01 01D6D    60F79EDE A            DATA     X'60F79EDE'
     7440   01 01D6E    FFFFFFF6 A   DW68     DATA     -10               DW
     7441   01 01D6F    36C004A2              DW,12    MEMORY
     7442   01 01D70    F73001F4              K        15,7,3,FXPOSW
     7443   01 01D71    A7300179              K        10,7,3,LOC+2
     7444   01 01D72    FAC41382 A            DATA     X'FAC41382'
     7445   01 01D73    EAC346BA A            DATA     X'EAC346BA'
     7446   01 01D74    E0FC7F1C A            DATA     X'E0FC7F1C'
     7447   01 01D75    E0FC7F1C A            DATA     X'E0FC7F1C'
     7448   01 01D76    446E28CA A            DATA     X'446E28CA'
     7449   01 01D77    2B344B5C A            DATA     X'2B344B5C'
     7450   01 01D78    FFFFFFF6 A   DW69     DATA     -10               DW
     7451   01 01D79    36C004A2              DW,12    MEMORY
     7452   01 01D7A    F73001F4              K        15,7,3,FXPOSW
     7453   01 01D7B    A7300179              K        10,7,3,LOC+2
     7454   01 01D7C    253F7EA9 A            DATA     X'253F7EA9'
     7455   01 01D7D    57824166 A            DATA     X'57824166'
     7456   01 01D7E    67B5C610 A            DATA     X'67B5C610'
     7457   01 01D7F    67B5C610 A            DATA     X'67B5C610'
     7458   01 01D80    3D7182C6 A            DATA     X'3D7182C6'
     7459   01 01D81    5BF19BD6 A            DATA     X'5BF19BD6'
     7460   01 01D82    FFFFFFF6 A   DW70     DATA     -10               DW
     7461   01 01D83    36C004A2              DW,12    MEMORY
     7462   01 01D84    F73001F4              K        15,7,3,FXPOSW
     7463   01 01D85    A7300179              K        10,7,3,LOC+2
     7464   01 01D86    135BDF7D A            DATA     X'135BDF7D'
     7465   01 01D87    19C47069 A            DATA     X'19C47069'
     7466   01 01D88    67B980C1 A            DATA     X'67B980C1'
     7467   01 01D89    67B980C1 A            DATA     X'67B980C1'
     7468   01 01D8A    9BAE1B05 A            DATA     X'9BAE1B05'
     7469   01 01D8B    2FC7759C A            DATA     X'2FC7759C'
     7470   01 01D8C    FFFFFFF6 A   DW71     DATA     -10               DWO
     7471   01 01D8D    36D004A2              DW,13    MEMORY
     7472   01 01D8E    F73001F4              K        15,7,3,FXPOSW
     7473   01 01D8F    A7300179              K        10,7,3,LOC+2
     7474   01 01D90    FFFFFFFF A            DATA     X'FFFFFFFF'
     7475   01 01D91    FFFFFFFF A            DATA     -1
     7476   01 01D92    26106573 A            DATA     X'26106573'
     7477   01 01D93    26106573 A            DATA     X'26106573'
     7478   01 01D94    59D73C28 A            DATA     X'59D73C28'
     7479   01 01D95    00000002 A            DATA     X'00000002'
     7480   01 01D96    FFFFFFF6 A   DW72     DATA     -10               DW
     7481   01 01D97    36D004A2              DW,13    MEMORY
     7482   01 01D98    F73001F4              K        15,7,3,FXPOSW
     7483   01 01D99    A7300179              K        10,7,3,LOC+2
     7484   01 01D9A    00000000 A            DATA     X'00000000'
     7485   01 01D9B    00000000 A            DATA     X'00000000'
     7486   01 01D9C    F1A3C842 A            DATA     X'F1A3C842'
     7487   01 01D9D    F1A3C842 A            DATA     X'F1A3C842'
     7488   01 01D9E    CD2A3C71 A            DATA     X'CD2A3C71'
     7489   01 01D9F    00000003 A            DATA     X'00000003'
     7490   01 01DA0    FFFFFFF6 A   DW73     DATA     -10               DW
     7491   01 01DA1    36D004A2              DW,13    MEMORY
     7492   01 01DA2    F73001F4              K        15,7,3,FXPOSW
     7493   01 01DA3    A7300179              K        10,7,3,LOC+2
     7494   01 01DA4    FFFFFFFF A            DATA     X'FFFFFFFF'
     7495   01 01DA5    FFFFFFFF A            DATA     X'FFFFFFFF'
     7496   01 01DA6    00000002 A            DATA     X'00000002'
     7497   01 01DA7    00000002 A            DATA     X'00000002'
     7498   01 01DA8    7FFFFFFF A            DATA     X'7FFFFFFF'
     7499   01 01DA9    3FFFFFFF A            DATA     X'3FFFFFFF'
     7500   01 01DAA    FFFFFFF6 A   DW74     DATA     -10               DW
     7501   01 01DAB    36D004A2              DW,13    MEMORY
     7502   01 01DAC    F73001F4              K        15,7,3,FXPOSW
     7503   01 01DAD    87300179              K        8,7,3,LOC+2
     7504   01 01DAE    00000000 A            DATA     X'00000000'
     7505   01 01DAF    00000000 A            DATA     X'00000000'
     7506   01 01DB0    42486CEA A            DATA     X'42486CEA'
     7507   01 01DB1    42486CEA A            DATA     X'42486CEA'
     7508   01 01DB2    FC7CF1CC A            DATA     X'FC7CF1CC'
     7509   01 01DB3    00000000 A            DATA     X'00000000'
     7510   01 01DB4    FFFFFFF6 A   DW75     DATA     -10               DW
     7511   01 01DB5    36D004A2              DW,13    MEMORY
     7512   01 01DB6    F73001F4              K        15,7,3,FXPOSW
     7513   01 01DB7    A7300179              K        10,7,3,LOC+2
     7514   01 01DB8    FFFFFFFF A            DATA     X'FFFFFFFF'
     7515   01 01DB9    FFFFFFFF A            DATA     X'FFFFFFFF'
     7516   01 01DBA    2C76B150 A            DATA     X'2C76B150'
     7517   01 01DBB    2C76B150 A            DATA     X'2C76B150'
     7518   01 01DBC    475E3AF9 A            DATA     X'475E3AF9'
     7519   01 01DBD    00000001 A            DATA     X'00000001'
     7520   01 01DBE    FFFFFFF6 A   DW76     DATA     -10               DW
     7521   01 01DBF    36D004A2              DW,13    MEMORY
     7522   01 01DC0    F73001F4              K        15,7,3,FXPOSW
     7523   01 01DC1    97300179              K        9,7,3,LOC+2
     7524   01 01DC2    00000000 A            DATA     X'00000000'
     7525   01 01DC3    00000000 A            DATA     X'00000000'
     7526   01 01DC4    00004444 A            DATA     X'00004444'
     7527   01 01DC5    00004444 A            DATA     X'00004444'
     7528   01 01DC6    D1F375DB A            DATA     X'D1F375DB'
     7529   01 01DC7    FFFF5351 A            DATA     X'FFFF5351'
     7530   01 01DC8    FFFFFFF6 A   DW77     DATA     -10               DW
     7531   01 01DC9    36D004A2              DW,13    MEMORY
     7532   01 01DCA    F73001F4              K        15,7,3,FXPOSW
     7533   01 01DCB    A7300179              K        10,7,3,LOC+2
     7534   01 01DCC    FFFFFFFF A            DATA     X'FFFFFFFF'
     7535   01 01DCD    FFFFFFFF A            DATA     X'FFFFFFFF'
     7536   01 01DCE    7FFFFFFF A            DATA     X'7FFFFFFF'
     7537   01 01DCF    7FFFFFFF A            DATA     X'7FFFFFFF'
     7538   01 01DD0    7FFFFFFF A            DATA     X'7FFFFFFF'
     7539   01 01DD1    00000001 A            DATA     X'00000001'
     7540   01 01DD2    FFFFFFF6 A   DW78     DATA     -10               DW
     7541   01 01DD3    36D004A2              DW,13    MEMORY
     7542   01 01DD4    F73001F4              K        15,7,3,FXPOSW
     7543   01 01DD5    97300179              K        9,7,3,LOC+2
     7544   01 01DD6    00000000 A            DATA     X'00000000'
     7545   01 01DD7    00000000 A            DATA     X'00000000'
     7546   01 01DD8    00000004 A            DATA     X'00000004'
     7547   01 01DD9    00000004 A            DATA     X'00000004'
     7548   01 01DDA    FFFFFFE1 A            DATA     X'FFFFFFE1'
     7549   01 01DDB    FFFFFFF9 A            DATA     X'FFFFFFF9'
     7550   01 01DDC    FFFFFFF6 A   DW79     DATA     -10               DW
     7551   01 01DDD    36D004A2              DW,13    MEMORY
     7552   01 01DDE    F73001F4              K        15,7,3,FXPOSW
     7553   01 01DDF    87300179              K        8,7,3,LOC+2
     7554   01 01DE0    FFFFFFFF A            DATA     X'FFFFFFFF'
     7555   01 01DE1    FFFFFFFF A            DATA     X'FFFFFFFF'
     7556   01 01DE2    55555555 A            DATA     X'55555555'
     7557   01 01DE3    55555555 A            DATA     X'55555555'
     7558   01 01DE4    0D0396FC A            DATA     X'0D0396FC'
     7559   01 01DE5    00000000 A            DATA     X'00000000'
     7560   01 01DE6    FFFFFFF6 A   DW80     DATA     -10               DW
     7561   01 01DE7    36D004A2              DW,13    MEMORY
     7562   01 01DE8    F73001F4              K        15,7,3,FXPOSW
     7563   01 01DE9    A7300179              K        10,7,3,LOC+2
     7564   01 01DEA    00000000 A            DATA     X'00000000'
     7565   01 01DEB    00000000 A            DATA     X'00000000'
     7566   01 01DEC    FFFFFFFA A            DATA     X'FFFFFFFA'
     7567   01 01DED    FFFFFFFA A            DATA     X'FFFFFFFA'
     7568   01 01DEE    80000001 A            DATA     X'80000001'
     7569   01 01DEF    15555555 A            DATA     X'15555555'
     7570   01 01DF0    FFFFFFF6 A   DH01     DATA     -10               DH
     7571   01 01DF1    56C004A2              DH,12    MEMORY
     7572   01 01DF2    F73001F4              K        15,7,3,FXPOSW
     7573   01 01DF3    A7300179              K        10,7,3,LOC+2
     7574   01 01DF4    3FFFFFFF A            DATA     X'3FFFFFFF'
     7575   01 01DF5    3FFFFFFF A            DATA     X'3FFFFFFF'
     7576   01 01DF6    00010000 A            DATA     X'00010000'
     7577   01 01DF7    00010000 A            DATA     X'00010000'
     7578   01 01DF8    00000000 A            DATA     X'00000000'
     7579   01 01DF9    00000000 A            DATA     X'00000000'
     7580   01 01DFA    FFFFFFF6 A   DH02     DATA     -10               DH
     7581   01 01DFB    56C004A2              DH,12    MEMORY
     7582   01 01DFC    F73001F4              K        15,7,3,FXPOSW
     7583   01 01DFD    A7300179              K        10,7,3,LOC+2
     7584   01 01DFE    C0000000 A            DATA     X'C0000000'
     7585   01 01DFF    20000000 A            DATA     X'20000000'
     7586   01 01E00    FFFE0000 A            DATA     X'FFFE0000'
     7587   01 01E01    FFFE0000 A            DATA     X'FFFE0000'
     7588   01 01E02    00000000 A            DATA     X'00000000'
     7589   01 01E03    00000000 A            DATA     X'00000000'
     7590   01 01E04    FFFFFFF6 A   DH03     DATA     -10               DH  X
     7591   01 01E05    56CE04A2              DH,12    MEMORY,7
     7592   01 01E06    F73001F4              K        15,7,3,FXPOSW
     7593   01 01E07    97300179              K        9,7,3,LOC+2
     7594   01 01E08    AAAAAAAA A            DATA     X'AAAAAAAA'
     7595   01 01E09    AAAAAAAA A            DATA     X'AAAAAAAA'
     7596   01 01E0A    00000001 A            DATA     X'00000001'
     7597   01 01E0B    00000001 A            DATA     X'00000001'
     7598   01 01E0C    00000000 A            DATA     X'00000000'
     7599   01 01E0D    00000000 A            DATA     X'00000000'
     7600   01 01E0E    FFFFFFF6 A   DH04     DATA     -10               DH  X
     7601   01 01E0F    56CE04A2              DH,12    MEMORY,7
     7602   01 01E10    F73001F4              K        15,7,3,FXPOSW
     7603   01 01E11    97300179              K        9,7,3,LOC+2
     7604   01 01E12    25555555 A            DATA     X'25555555'
     7605   01 01E13    ED555556 A            DATA     X'ED555556'
     7606   01 01E14    0000FFFE A            DATA     X'0000FFFE'
     7607   01 01E15    0000FFFE A            DATA     X'0000FFFE'
     7608   01 01E16    00000000 A            DATA     X'00000000'
     7609   01 01E17    00000000 A            DATA     X'00000000'
     7610   01 01E18    FFFFFFF6 A   DH05     DATA     -10               DHO
     7611   01 01E19    56D004A2              DH,13    MEMORY
     7612   01 01E1A    F73001F4              K        15,7,3,FXPOSW
     7613   01 01E1B    A7300179              K        10,7,3,LOC+2
     7614   01 01E1C    00000000 A            DATA     X'00000000'
     7615   01 01E1D    00000000 A            DATA     X'00000000'
     7616   01 01E1E    40000000 A            DATA     X'40000000'
     7617   01 01E1F    40000000 A            DATA     X'40000000'
     7618   01 01E20    3FFFFFFF A            DATA     X'3FFFFFFF'
     7619   01 01E21    0000FFFF A            DATA     X'0000FFFF'
     7620   01 01E22    FFFFFFF6 A   DH06     DATA     -10               DH
     7621   01 01E23    56D004A2              DH,13    MEMORY
     7622   01 01E24    F73001F4              K        15,7,3,FXPOSW
     7623   01 01E25    A7300179              K        10,7,3,LOC+2
     7624   01 01E26    00000000 A            DATA     X'00000000'
     7625   01 01E27    00000000 A            DATA     X'00000000'
     7626   01 01E28    B7770000 A            DATA     X'B7770000'
     7627   01 01E29    B7770000 A            DATA     X'B7770000'
     7628   01 01E2A    C0000000 A            DATA     X'C0000000'
     7629   01 01E2B    0000E1E0 A            DATA     X'0000E1E0'
     7630   01 01E2C    FFFFFFF6 A   DH07     DATA     -10               DH  X
     7631   01 01E2D    56DE04A2              DH,13    MEMORY,7
     7632   01 01E2E    F73001F4              K        15,7,3,FXPOSW
     7633   01 01E2F    97300179              K        9,7,3,LOC+2
     7634   01 01E30    00000000 A            DATA     X'00000000'
     7635   01 01E31    00000000 A            DATA     X'00000000'
     7636   01 01E32    00004000 A            DATA     X'00004000'
     7637   01 01E33    00004000 A            DATA     X'00004000'
     7638   01 01E34    AAAAAAAA A            DATA     X'AAAAAAAA'
     7639   01 01E35    FFFEAAAB A            DATA     X'FFFEAAAB'
     7640   01 01E36    FFFFFFF6 A   DH08     DATA     -10               DH *X
     7641   01 01E37    D6D2049C              DH,13    *IA,1
     7642   01 01E38    F73001F4              K        15,7,3,FXPOSW
     7643   01 01E39    97300179              K        9,7,3,LOC+2
     7644   01 01E3A    00000001 A            DATA     1
     7645   01 01E3B    00000001 A            DATA     1
     7646   01 01E3C    0000B777 A            DATA     X'0000B777'
     7647   01 01E3D    0000B777 A            DATA     X'0000B777'
     7648   01 01E3E    25555555 A            DATA     X'25555555'
     7649   01 01E3F    FFFF7C3E A            DATA     X'FFFF7C3E'
     7650                            *
     7651                            *       PLM INSTRUCTION MODULE
     7652                            *
     7653   01 01E40    FFFFFFFA A   PLM1     DATA     -6
     7654   01 01E41    0A100436              K        0,X'A',1,SPD1          PLM,1   SPD1
     7655   01 01E42    F0001EB0              K        X'F',0,0,PLMROUT       CC=F            (PSW1 IN)
     7656   01 01E43    00000179              DATA     LOC+2                                  (PSW1 OUT)
     7657   01 01E44    00000000 A            DATA     0,0
            01 01E45    00000000 A
     7658                            *
     7659                            *    CHECK THAT LAS DOES NOT TRAP
     7660                            *   EXPECTED RESULT WITH OLD MEMORY IS LW
     7661                            *
     7662   01 01E46    FFFFFFF8 A   LAS1     DATA     -8
     7663   01 01E47    26C004A2              K        2,6,X'C',MEMORY
     7664   01 01E48    00001EA4              DATA     LAMSTOP
     7665   01 01E49    10000179              K        1,0,0,LOC+2
     7666   01 01E4A    00000000 A            DATA     0
     7667   01 01E4B    80000000 A            DATA     X'80000000'
     7668   01 01E4C    80000000 A            DATA     X'80000000'
     7669   01 01E4D    80000000 A            DATA     X'80000000'
     7670                            *
     7671                            *    CHECK THAT LMS DOES NOT TRAP
     7672                            *  EXPECTED RESULT OLD MEMORY ISLOAD OF INSTRUCTION INTO R
     7673                            *
     7674   01 01E4E    FFFFFFFA A   LMS1     DATA     -6
     7675   01 01E4F    2DC004A2              K        2,X'D',X'C',MEMORY
     7676   01 01E50    00001EA4              DATA     LAMSTOP
     7677   01 01E51    00000179              DATA     LOC+2
     7678   01 01E52    00000000 A            DATA     0
     7679   01 01E53    2DC004A2              K        2,X'D',X'C',MEMORY
     7680   01 01E54    00000000 A            DATA     0
     7681                            *
     7682                            *
     7683                            *
     7684                            *
     7685                            *
     7686                            *  TRAP ROUTINE FOR LAS AND LMS INSTRUCTION.
     7687                            *   IF LAS AND LMS ARE NOT IMPLEMENTED, WHENEVER EITHER ARE
     7688                            *   EXECUTED THEY WILL TRAP TO THE NON-EXISTENT INSTRUCTION TRAP
     7689                            *
     7690                                     BOUND    8
     7691   01 01E56    00000000 A   LAMTRAP  DATA     0,0,%+2,X'07000000'      INHIBIT ALL INT. GROUPS
            01 01E57    00000000 A
            01 01E58    00001E5A
            01 01E59    07000000 A
     7692   01 01E5A    02200000 A            LCI      0
     7693   01 01E5B    2B001E82              STM,0    REGTEMP     SAVE REGISTERS
     7694   01 01E5C    22500001 A            LI,5     1                 SET PRNTFG. FOR PRINT ROUTINE
     7695   01 01E5D    35501E81              STW,5    PRNTFG             RECOGNITION
     7696   01 01E5E    32500396              LW,5     CPINT
     7697   01 01E5F    6D501100 A            WD,5     X'1100'     DISARM COUNT PULSE INTERRUPTS
     7698   01 01E60    32400487              LW,4     TABLE+1     COMPARE CURRENT INSTRUCTION.
     7699   01 01E61    31401EC0              CW,4     LAS:INT     IS IT A LAS INSTRUCTION
     7700   01 01E62    68301E6D              BE       LAMBB       BRANCH IF EQUAL
     7701   01 01E63    32500400              LW,5     ZERO        FETCH A ZERO
     7702   01 01E64    32401EC2              LW,4     LASFLAG     IS LASFLAG ERROR SET
     7703   01 01E65    68301E68              BEZ      LAMAA       BRANCH IF NOT SET
     7704   01 01E66    35501E46              STW,5    LAS1        SEPARATE LAS AND LMS TEST MODULES
     7705   01 01E67    68001E6A              B        LAMAAA          GO TO PRINT ERROR
     7706   01 01E68    33101EC3     LAMAA    MTW,1    LMSFLAG     LAS MODULE WORKED,LMS DID NOT WORK
     7707   01 01E69    35501E4E              STW,5    LMS1        SEPARATE LMS MODULE
     7708   01 01E6A    22000F6E     LAMAAA   LI,0     DA(L:M:S)
     7709   01 01E6B    6AF002AC              BAL,15   BUSY
     7710   01 01E6C    68001E76              B        EXIT        EXIT
     7711   01 01E6D    33101EC2     LAMBB    MTW,1    LASFLAG     LAS MODULE DID NOT WORKED
     7712   01 01E6E    32401E4E              LW,4     LMS1        PROCEED TO SHIFT LMS TEST MODULE
     7713   01 01E6F    3A400004 A            LCW,4    4            INTO LAS TEST MODULE AREA
     7714   01 01E70    20400001 A            AI,4     1
     7715   01 01E71    32581E4D              LW,5     LMS1-1,4
     7716   01 01E72    35581E45              STW,5    LAS1-1,4
     7717   01 01E73    64401E71              BDR,4    %-2              ALL DONE,CONTINUE
     7718   01 01E74    22000F6F              LI,0     DA(L:A:S)      PRINT LAS ERROR
     7719   01 01E75    6AF002AC              BAL,15   BUSY
     7720   01 01E76    22000F70     EXIT     LI,0     DA(L:MA:1)     EXIT
     7721   01 01E77    6AF002AC              BAL,15   BUSY
     7722   01 01E78    32501EC1              LW,5     LAMRES      RESTORE PREVIOUS XPSD INSTRUCTION
     7723   01 01E79    35500040              STW,5    NAOTR        BACK TO X'40'
     7724   01 01E7A    32500400              LW,5     ZERO
     7725   01 01E7B    35501E81              STW,5    PRNTFG
     7726   01 01E7C    32501EAF              LW,5     LAMRETURN       RESTORE  RETURN CONTENTTS.
     7727   01 01E7D    355004A8              STW,5    RETURN+2
     7728   01 01E7E    02200000 A            LCI      0
     7729   01 01E7F    2A001E82              LM,0     REGTEMP
     7730   01 01E80    0E001EE4              LPSD,0   LASAM2     BRANCH TO NEXT MODULE(IF ANY) WITH LPSD
     7731   01 01E81    00000000 A   PRNTFG   DATA     0         PRINT FLAG FOR LAS,LMS ENTRY TO PRINT
     7732   01 01E82                 REGTEMP  RES      16
     7733                            *
     7734                            *  SINGLE PURPOSE TEST TO CHECK STORE DOUBLE WORD  IN A
     7735                            *  REGISTER TO REGISTER OPERATION.
     7736   01 01E92    02200000 A   SPT      LCI      0                 SINGEL PURPOSE TEST TO
     7737   01 01E93    2B001E82              STM,0    REGTEMP           CHECK STD REG. TO REG.
     7738   01 01E94    32001EA1              LW,0     TESTDATA          OPERATION
     7739   01 01E95    32101EA2              LW,1     TESTDATA+1
     7740   01 01E96    15000002 A            STD,0    2
     7741   01 01E97    31201EA1              CW,2     TESTDATA          CHECK RESULTS
     7742   01 01E98    69301E9E              BNE      SPTERR
     7743   01 01E99    31301EA2              CW,3     TESTDATA+1
     7744   01 01E9A    69301E9E              BNE      SPTERR
     7745   01 01E9B    02200000 A   SPT01    LCI      0                 RESTORE REGISTER BLOCK
     7746   01 01E9C    2A001E82              LM,0     REGTEMP
     7747   01 01E9D    E800000F A            B        *15
     7748   01 01E9E    32001EA3     SPTERR   LW,0     SPTERR01          PRINT OUT ERROR MESSAGE
     7749   01 01E9F    0F0002A8              XPSD,0   PRINT
     7750   01 01EA0    68001E9B              B        SPT01
     7751   01 01EA1    01234567 A   TESTDATA DATA     X'01234567'       PATTERN FOR STD
     7752   01 01EA2    89ABCDEF A            DATA     X'89ABCDEF'
     7753   01 01EA3    00000F6C     SPTERR01 DATA     DA(SPTERR02)
     7754                            *
     7755                            *   THIS ROUTINE SETS UP TRAP LOCATION X'40' IN THE EVENT LMS AND
     7756                            *   LAS ARE NOT INSTALLED AND ALSO INSURES THAT IF LMS AND LAS ARE
     7757                            *   INSTALLED,IT WILL CONTINUE TO TEST THEM OUT.
     7758                            *
     7759   01 01EA4    32500040     LAMSTOP   LW,5    NAOTR       SAVE XPSD FROM X'40'
     7760   01 01EA5    35501EC1              STW,5    LAMRES
     7761   01 01EA6    32501EBF              LW,5     LTPXPSD     INSERT 'XPSD,8 LAMTRAP'
     7762   01 01EA7    35500040              STW,5    NAOTR       STORE IT TO TRAP LOCATION X'40'
     7763   01 01EA8    32500400              LW,5     ZERO        CLEAR REGISTER 5
     7764   01 01EA9    68000139              B        SETPSW      BRANCH BACK
     7765                            *
     7766                            *        ROUTINE TO RESTORE LOC. RETURN+2,X'40'
     7767                            *        IF LMS AND LAS INSTRUCTIONS WORKED.
     7768                            *
     7769   01 01EAA    32501EAF     LMS:ACT   LW,5    LAMRETURN       RESTORE RETURN+2 CONTENTS
     7770   01 01EAB    355004A8              STW,5    RETURN+2
     7771   01 01EAC    32501EC1              LW,5     LAMRES          RESTORE X'40'  TRAP LOCATION
     7772   01 01EAD    35500040              STW,5    NAOTR
     7773   01 01EAE    0E8004A8              LPSD,8   RETURN+2
     7774   01 01EAF    00000000 A   LAMRETURN  DATA  0
     7775                            *
     7776                            *
     7777                            *    ROUTINE TO SET UP XPSD LOCATIONS FOR THE PLM INSTRUCTION
     7778                            *    MODULE
     7779         01 01EB0           PLMROUT  EQU      %
     7780   01 01EB0    22400800 A            LI,4     X'800'
     7781   01 01EB1    35401EC4              STW,4    SPDA        REINITIALIZE THE
     7782   01 01EB2    35400436              STW,4    SPD1          STACK POINTER DOUBLEWORD
     7783   01 01EB3    22400030 A            LI,4     X'30'          FOR THE PLM INSTRUCTION.
     7784   01 01EB4    35400437              STW,4    SPD1+1      * * * * * * * * * * * * * * *
     7785   01 01EB5    32401EC5              LW,4     PLMXPSD
     7786   01 01EB6    322004A8              LW,2     RETURN+2        EXCHANGE CONTENTS OF
     7787   01 01EB7    35201EC6              STW,2    PLMXPSD+1        RETURN+2 WITH PLM MODULE
     7788   01 01EB8    354004A8              STW,4    RETURN+2          RETURN ADDRESS.
     7789   01 01EB9    68000139              B        SETPSW         BRANCH TO SETPSW (OUT)
     7790                            *
     7791                            *    ROUTINE TO RESTORE REGISTERS AND XPSD
     7792                            *
     7793         01 01EBA           PLMNEXT  EQU      %
     7794   01 01EBA    02200000 A            LCI      0                   SAVE ALL THE REGISTERS
     7795   01 01EBB    2B001EC7              STM,0    PLMREG
     7796   01 01EBC    32601EC6              LW,6     PLMXPSD+1
     7797   01 01EBD    356004A8              STW,6    RETURN+2            RESTORE RETURN+2
     7798   01 01EBE    6800017A              B        ERREXIT             BRANCH TO TEST.
     7799                            *                                                                  *
     7800   01 01EBF    0F801E56     LTPXPSD  XPSD,8   LAMTRAP
     7801   01 01EC0    26C004A2     LAS:INT  K        2,6,X'C',MEMORY       LAS INSTRUCTION
     7802   01 01EC1    00000000 A   LAMRES   DATA     0           SAVE LOCATION FOR X'40' XPSD
     7803   01 01EC2    00000000 A   LASFLAG  DATA     0                     LAS FLAG ERROR
     7804   01 01EC3    00000000 A   LMSFLAG  DATA     0                     LMS FLAG ERROR
     7805   01 01EC4    00000000 A   SPDA     DATA     0
     7806   01 01EC5    00001EBA     PLMXPSD  DATA     PLMNEXT,0
            01 01EC6    00000000 A
     7807   01 01EC7                 PLMREG   RES      16
     7808                                     BOUND    8
     7809   01 01ED8    05007C70 N   SPTERR02 GEN,8,24,8,24 5,BA(SPTMSG),8,4*(SPTMSGA-SPTMSG)
                        08000078
     7810   01 01EDA    05007CE8 N   HEADCDW  GEN,8,24,8,24 5,BA(HEADMSSG),2,4*(HEADMSSGA-HEADMSSG)
                        02000020
     7811   01 01EDC    05007BA0 N   L:M:S    GEN,8,24,8,24  5,BA(LMSMSG),8,4*(LMSMSG1-LMSMSG)
                        08000020
     7812   01 01EDE    05007BC0 N   L:A:S    GEN,8,24,8,24  5,BA(LASMSG),8,4*(LASMSG1-LASMSG)
                        08000014
     7813   01 01EE0    05007BD4 N   L:MA:1   GEN,8,24,8,24  5,BA(L:MA:MSG),8,4*(L:MA:S-L:MA:MSG)
                        08000054
     7814   01 01EE2    05007C28 N   SENMSG   GEN,8,24,8,24  5,BA(SENSWAIT),8,4*(SENSEND-SENSWAIT)
                        08000048
     7815   01 01EE4    000001D7     LASAM2   DATA     LASAM,0
            01 01EE5    00000000 A
     7816   01 01EE6    00000000 A   PLMNUM   DATA     0
     7817   01 01EE7    32601EC8     PLMRESV  LW,6     PLMREG+1
     7818   01 01EE8    1540D3D6 A   LMSMSG   TEXT     '
 LOAD MEMORY STATUS WORD (LMS) '
            01 01EE9    C1C440D4 A
            01 01EEA    C5D4D6D9 A
            01 01EEB    E840E2E3 A
            01 01EEC    C1E3E4E2 A
            01 01EED    40E6D6D9 A
            01 01EEE    C4404DD3 A
            01 01EEF    D4E25D40 A
     7819         01 01EF0           LMSMSG1  EQU      %
     7820   01 01EF0    1540D3D6 A   LASMSG   TEXT     '
 LOAD AND SET (LAS)'
            01 01EF1    C1C440C1 A
            01 01EF2    D5C440E2 A
            01 01EF3    C5E3404D A
            01 01EF4    D3C1E25D A
     7821         01 01EF5           LASMSG1  EQU      %
     7822   01 01EF5    1540C9E2 A   L:MA:MSG TEXT     '
 IS EITHER NOT IMPLEMENTED OR MALFUNCTIONING
 '
            01 01EF6    40C5C9E3 A
            01 01EF7    C8C5D940 A
            01 01EF8    D5D6E340 A
            01 01EF9    C9D4D7D3 A
            01 01EFA    C5D4C5D5 A
            01 01EFB    E3C5C440 A
            01 01EFC    D6D940D4 A
            01 01EFD    C1D3C6E4 A
            01 01EFE    D5C3E3C9 A
            01 01EFF    D6D5C9D5 A
            01 01F00    C7154040 A
     7823   01 01F01    C9E340E6 A            TEXT     'IT WILL NOT BE CHECKED ANY FURTHER.
'
            01 01F02    C9D3D340 A
            01 01F03    D5D6E340 A
            01 01F04    C2C540C3 A
            01 01F05    C8C5C3D2 A
            01 01F06    C5C440C1 A
            01 01F07    D5E840C6 A
            01 01F08    E4D9E3C8 A
            01 01F09    C5D94B15 A
     7824         01 01F0A           L:MA:S   EQU      %
     7825   01 01F0A    1540D9C5 A   SENSWAIT TEXT     '
 RESET SS1 AND CLEAR WAIT 
'
            01 01F0B    E2C5E340 A
            01 01F0C    E2E2F140 A
            01 01F0D    C1D5C440 A
            01 01F0E    C3D3C5C1 A
            01 01F0F    D940E6C1 A
            01 01F10    C9E34015 A
     7826   01 01F11    40C3D6E4 A            TEXT     ' COUNTER INTERRUPTS WILL NOT BE IMPLEMENTED'
            01 01F12    D5E3C5D9 A
            01 01F13    40C9D5E3 A
            01 01F14    C5D9D9E4 A
            01 01F15    D7E3E240 A
            01 01F16    E6C9D3D3 A
            01 01F17    40D5D6E3 A
            01 01F18    40C2C540 A
            01 01F19    C9D4D7D3 A
            01 01F1A    C5D4C5D5 A
            01 01F1B    E3C5C440 A
     7827         01 01F1C           SENSEND  EQU      %
     7828   01 01F1C    40401515 A   SPTMSG   DATA     X'40401515'
     7829                                     TEXT     'STD INSTRUCTION FAILED IN REG. TO REG. ',;
     7830   01 01F1D    E2E3C440 A                     'OPERATION. POSSIBLE TERMINATOR CARD ERROR'
            01 01F1E    C9D5E2E3 A
            01 01F1F    D9E4C3E3 A
            01 01F20    C9D6D540 A
            01 01F21    C6C1C9D3 A
            01 01F22    C5C440C9 A
            01 01F23    D540D9C5 A
            01 01F24    C74B40E3 A
            01 01F25    D640D9C5 A
            01 01F26    C74B40D6 A
            01 01F27    D7C5D9C1 A
            01 01F28    E3C9D6D5 A
            01 01F29    4B40D7D6 A
            01 01F2A    E2E2C9C2 A
            01 01F2B    D3C540E3 A
            01 01F2C    C5D9D4C9 A
            01 01F2D    D5C1E3D6 A
            01 01F2E    D940C3C1 A
            01 01F2F    D9C440C5 A
            01 01F30    D9D9D6D9 A
     7831   01 01F31    40404015 A            DATA     X'40404015'
     7832   01 01F32    C9D540D3 A            TEXT     'IN LOCATIONS  08K AND/OR 06T.'
            01 01F33    D6C3C1E3 A
            01 01F34    C9D6D5E2 A
            01 01F35    4040F0F8 A
            01 01F36    D240C1D5 A
            01 01F37    C461D6D9 A
            01 01F38    40F0F6E3 A
            01 01F39    4B404040 A
     7833         01 01F3A           SPTMSGA  EQU      %
     7834   01 01F3A    15E2C9C7 A   HEADMSSG TEXT     '
SIGMA 5 CPU AUTO 960-0051-1A
'
            01 01F3B    D4C140F5 A
            01 01F3C    40C3D7E4 A
            01 01F3D    40C1E4E3 A
            01 01F3E    D640F9F6 A
            01 01F3F    F060F0F0 A
            01 01F40    F5F160F1 A
            01 01F41    C1154040 A
     7835         01 01F42           HEADMSSGA EQU     %
     7836         01 002C1                    END      SETRPLY

  CONTROL SECTION SUMMARY: 01 01F42   PT 0
  * NO UNDEFINED SYMBOLS
  *    ERROR SEVERITY LEVEL: 0
  * NO ERROR LINES
1 C00   23:20 JUN 20,'83    SIGMA 5 CPU DIAGNOSTIC-AUTO 960-0051-1A 08-04-81                      PAGE    4
A  AD01            4314-DATA
   AD02            4326-DATA
   AD03            4338-DATA
   AD04            4350-DATA
   AD05            4363-DATA
   AD06            4371-DATA
   AH01            4268-DATA
   AH02            4276-DATA
   AH03            4284-DATA
   AH04            4292-DATA
   AI                45/OPEN      55-CNAME
   AIO              945/EXU      946/EXU      947/EXU      950/DATA     951-AIO
   AI01            4298-DATA
   AI02            4304-DATA
   AI03            4310-DATA
   ANDF             766/STW      787-AND
   ANDM             768/STW      776-AND
   AND01           1733-DATA
   AND02           1737-DATA
   AND03           1745-DATA
   AND04           1753-DATA
   AND05           1761-DATA
   AND06           1769-DATA
   ANFRO            753/LW      1012-AND
   ANFR2            759/LW      1013-AND
   ANLZ01          3487-DATA
   ANLZ02          3498-DATA
   ANLZ03          3506-DATA
   ANLZ04          3514-DATA
   ANLZ05          3522-DATA
   ANLZ06          3531-DATA
   ANLZ07          3539-DATA
   ANLZ08           397/STW      398/STW      400/STW      989/STW      990/STW      992/STW     3549-DATA
   ANLZ09           991/LW      3559-DATA
   ANLZ10          3569-DATA
   ANLZ11          3579-DATA
   ANLZ12          3595-DATA
   ANLZ13          3609-DATA
   ANLZ14          3625-DATA
   ANLZ15          3640-DATA
   ANLZ16          3655-DATA
   ANLZ17          3671-DATA
   ANLZ18          3686-DATA
   ANLZ19          3701-DATA
   ANLZ20          3716-DATA
   ANLZ21          3731-DATA
   ANLZ22          3746-DATA
   ANLZ23          3760-DATA
   ANLZ24          3771-DATA
   ANMK             760/LW      1014-AND
   AUTO             391-LW       885/BCR      892/B
   AWM01           4379-DATA
   AWM02           4387-DATA
   AWM03           4395-DATA
   AWM04           4404-DATA
   AW01            1958-DATA
   AW02            1962-DATA
   AW03            1970-DATA
   AW04            1980-DATA
   AW05            1994-DATA
   AW06            2012-DATA
   AW07            2020-DATA
   AW08            2028-DATA
   AW09            2036-DATA
   AW10            2044-DATA
   AW11            2052-DATA
   AW12            2060-DATA
   AW13            2068-DATA
   AW14            2076-DATA
   AW15            2084-DATA
   AW16            2092-DATA
   AW17            2100-DATA
   AW18            2108-DATA
   AW19            2116-DATA
   AW20            2124-DATA
   AW21            2132-DATA
   AW22            2140-DATA
   AW23            2148-DATA
   AW24            2156-DATA
   AW25            2164-DATA
   AW26            2177-DATA
   AW27            2186-DATA
   AW28            2194-DATA
   AW29            2206-DATA
   AW30            2215-DATA
   AW31            2224-DATA
   AW32            2232-DATA
   AW33            2243-DATA
   AW34            2253-DATA
   AW35            2262-DATA
   AW36            2270-DATA
   AW37            2280-DATA
   AW38            2289-DATA
   AW39            2298-DATA
   AW40            2308-DATA
   AW41            2316-DATA
   AW42            2324-DATA
   AW43            2333-DATA
   AW44            2344-DATA
   AW45            2352-DATA
   AW46            2358-DATA
   AW47            2364-DATA
   BAL01            984/LW      2441-DATA
   BAL02           2447-DATA
   BAL03           2457-DATA
   BAL04           2465-DATA
   BAL05            401/STW      986/STW     2474-DATA
   BCR01           1892-DATA
   BCR02           1901-DATA
   BCR03           1908-DATA
   BCR04           1913-DATA
   BCR05           1918-DATA
   BCR06           1923-DATA
   BCS01           1929-DATA
   BCS02           1935-DATA
   BCS03           1940-DATA
   BDR01           2428-DATA
   BDR02           2435-DATA
   BEND             399/LW      1005-B
   BIND              66-CNAME
   BIR01           2412-DATA
   BIR02           2421-DATA
   BIT              774/LW       779/LW      1035/LW      1082-DATA
   BITS             772-STW      782/BIR
   BLANK           1220-DATA
   BRANCH           190-XPSD     668/EOR     1266/EQU     1310/EXU     1325/DATA    1326/DATA    1333/PZE
      1334/PZE     1909/BCR     1914/BCR     1919/BCR     1924/BCR     1930/BCS     1936/BCS     2422/BIR
      2429/BDR     2431/K       2436/BDR     2442/BAL     2444/K       2468/K       2469/DATA    2641/LD
      2644/DATA    2656/DATA    2855/LCF     2864/DATA    2865/DATA    2866/DATA    2867/DATA    3151/LCH
      3154/DATA    3630/DATA    3631/MW      3632/MW      3660/DATA    3661/BAL     3662/BAL     3676/DATA
      3677/BIR     3678/BIR     3691/DATA    3692/BIR     3693/BIR     3751/DATA    3752/LM      3753/LM
   BUMP             778/LPSD    1248-PZE
   BUMPER           781-BIR     1248/PZE
   BUSY             857-SIO      859/BCR      864/BEZ     7709/BAL     7719/BAL     7721/BAL
   BYTE             786/LW       900/LW       901/FAS     1036/LW      1117-DATA    1263/EQU
   BYTES            766-STW      791/BIR
   C                424/LW       433/LW      1267-EQU
   CAL01           5529-DATA
   CAL02           5533-DATA
   CAL03           5537-DATA
   CAL04           5541-DATA
   CAL05           5546-DATA
   CAL06           5554-DATA
   CAL07           5559-DATA
   CAL1             191/XPSD     274-PZE      676/STW     1018/PZE     1030/XPSD
   CAL1AD           675/EOR     1018-PZE
   CAL1TR           191-XPSD     674/STW
   CAL1XD           673/EOR     1030-XPSD
   CAL2             192/XPSD     296-PZE      683/STW     1019/PZE     1031/XPSD
   CAL2AD           682/EOR     1019-PZE
   CAL2TR           192-XPSD     681/STW
   CAL2XD           680/EOR     1031-XPSD
   CAL3             193/XPSD     318-PZE      690/STW     1020/PZE     1032/XPSD
   CAL3AD           689/EOR     1020-PZE
   CAL3TR           193-XPSD     688/STW
   CAL3XD           687/EOR     1032-XPSD
   CAL4             194/XPSD     340-PZE      697/STW     1021/PZE     1033/XPSD
   CAL4AD           696/EOR     1021-PZE
   CAL4TR           194-XPSD     695/STW
   CAL4XD           694/EOR     1033-XPSD
   CB01            3840-DATA
   CB02            3848-DATA
   CB03            3856-DATA
   CB04            3864-DATA
   CB05            3872-DATA
   CB06            3880-DATA
   CB07            3888-DATA
   CB08            3896-DATA
   CD01            3918-DATA
   CD02            3930-DATA
   CD03            3942-DATA
   CD04            3954-DATA
   CEE              597/EOR     1052-DATA
   CH01            3814-DATA
   CH02            3823-DATA
   CH03            3832-DATA
   CI                45/OPEN      56-CNAME
   CI01            3905-DATA
   CI02            3912-DATA
   CLEAR            420-STW      423/BIR     2540/DATA    2541/DATA    2542/DATA    2543/DATA    2873/LCF
      2876/DATA    2877/DATA
   CLM01           4051-DATA
   CLM02           4065-DATA
   CLM03           4079-DATA
   CLM04           4094-DATA
   CLM05           4108-DATA
   CLM06           4122-DATA
   CLR01           4000-DATA
   CLR02           4011-DATA
   CLR03           4018-DATA
   CLR04           4029-DATA
   CLR05           4040-DATA
   CNT1CP           197/MTW     1254-PZE
   CNT2CP           198/MTW     1255-PZE
   CNT3CP           199/MTW     1256-PZE
   CNT3Z           1273-EQU
   CNT4CP           200/MTW     1257-PZE
   CNT4Z           1274-EQU
   COMP             964/GEN      966-TEXTC
   COMPAT           997/BNE     1007-OR
   COMWAIT          121/DATA     735-WAIT
   COND             448/AND      453/AND     1047-DATA
   COUNT            749/STW      800/LW      1258-PZE
   CPINT            367/LW       377/LW       385/STW      403/STW      479/LW       525/LW       930/STW
      1071-DATA    1283/LW      1297/STW     7696/LW
   CPINTM           387/STW      891/STW      925/LW      1072-DATA    1299/STW
   CS01            3967-DATA
   CS02            3978-DATA
   CS03            3989-DATA
   CW01            3789-DATA
   CW02            3800-DATA
   CW03            3809-DATA
   CYCLE            410-LW       628/BCS      917/BE       922/BNE      924/BNE      926/BEZ      931/B
       948/B        950/DATA     993/B        999/BNE     1002/B       1250/PZE     2528/DATA    2529/DATA
      2530/DATA    2531/DATA    3495/DATA
   C1RET            278-XPSD    1341/PZE     1342/PZE     5532/K
   C2RET            300-XPSD    5536/K
   C3RET            322-XPSD    5540/K
   C4RET            344-XPSD    5544/K       5549/K       5557/K       5562/K
   DF               188/XPSD     259-PZE      263/LCF     1022/PZE
   DFAD            1022-PZE
   DFRET            264-XPSD
   DFTR             188-XPSD
   DH01            7570-DATA
   DH02            7580-DATA
   DH03            7590-DATA
   DH04            7600-DATA
   DH05            7610-DATA
   DH06            7620-DATA
   DH07            7630-DATA
   DH08            7640-DATA
   DONE             428/B        896-CI
   DONEMSG          858/BCR      866-TIO      868/BCR      873/BEZ
   DW01            6770-DATA
   DW02            6780-DATA
   DW03            6790-DATA
   DW04            6800-DATA
   DW05            6810-DATA
   DW06            6820-DATA
   DW07            6830-DATA
   DW08            6840-DATA
   DW09            6850-DATA
   DW10            6860-DATA
   DW11            6870-DATA
   DW12            6880-DATA
   DW13            6890-DATA
   DW14            6900-DATA
   DW15            6910-DATA
   DW16            6920-DATA
   DW17            6930-DATA
   DW18            6940-DATA
   DW19            6950-DATA
   DW20            6960-DATA
   DW21            6970-DATA
   DW22            6980-DATA
   DW23            6990-DATA
   DW24            7000-DATA
   DW25            7010-DATA
   DW26            7020-DATA
   DW27            7030-DATA
   DW28            7040-DATA
   DW29            7050-DATA
   DW30            7060-DATA
   DW31            7070-DATA
   DW32            7080-DATA
   DW33            7090-DATA
   DW34            7100-DATA
   DW35            7110-DATA
   DW36            7120-DATA
   DW37            7130-DATA
   DW38            7140-DATA
   DW39            7150-DATA
   DW40            7160-DATA
   DW41            7170-DATA
   DW42            7180-DATA
   DW43            7190-DATA
   DW44            7200-DATA
   DW45            7210-DATA
   DW46            7220-DATA
   DW47            7230-DATA
   DW48            7240-DATA
   DW49            7250-DATA
   DW50            7260-DATA
   DW51            7270-DATA
   DW52            7280-DATA
   DW53            7290-DATA
   DW54            7300-DATA
   DW55            7310-DATA
   DW56            7320-DATA
   DW57            7330-DATA
   DW58            7340-DATA
   DW59            7350-DATA
   DW60            7360-DATA
   DW61            7370-DATA
   DW62            7380-DATA
   DW63            7390-DATA
   DW64            7400-DATA
   DW65            7410-DATA
   DW66            7420-DATA
   DW67            7430-DATA
   DW68            7440-DATA
   DW69            7450-DATA
   DW70            7460-DATA
   DW71            7470-DATA
   DW72            7480-DATA
   DW73            7490-DATA
   DW74            7500-DATA
   DW75            7510-DATA
   DW76            7520-DATA
   DW77            7530-DATA
   DW78            7540-DATA
   DW79            7550-DATA
   DW80            7560-DATA
   EDIT             726/BCR      740-LW
   END              623-WD      1005/B       1043/PZE     3471/DATA    3494/DATA    3495/DATA    5701/B
   EOR01           1780-DATA
   EOR02           1788-DATA
   EOR03           1796-DATA
   EOR04           1804-DATA
   ERREXIT          509/BNE      515/B        522-LW      7798/B
   ERREXITA         542/BE       559-LW
   ERREXITB         569/BNE      595-EQU
   ERREXITC         584/STW      586-LW       590/MTW      593/BNEZ
   ERREXITD         594/B        616-LW
   ERRIND           617/LW       622/STW      631-DATA     722/STW
   ERROR            539/XPSD     546/XPSD     550/XPSD     554/XPSD     558/XPSD     562/XPSD     566/XPSD
       589/XPSD     603/XPSD     607/XPSD     611/XPSD     615/XPSD     707-PZE      714/LPSD     738/LPSD
   ERRORS           380/LW       416/STW      527/LW       624/LW       716/STW     1259-PZE     1286/LW
   EVEN             756-LW
   EXIT            7710/B       7720-LI
   EXITIO           861/B        865/B        867/BCR      870/B        874-LW
   EXU01           1303-DATA
   EXU02           1309-DATA
   EXU03           1313-DATA
   EXU04           1321-DATA
   EXU05           1327-DATA
   EXU06           1335-DATA
   EXU07           1345-DATA
   EXU08           1353-DATA
   F                  5-EQU     1722/K       1723/K       4081/K       5555/CAL4    5560/CAL4    5625/K
   FAILL01         5645-DATA
   FAILL02         5654-DATA
   FAILL06         5659-DATA
   FAILL07         5664-DATA
   FAILL08         5669-DATA
   FAILL09         5674-DATA
   FAILL10         5679-DATA
   FAILL11         5684-DATA
   FAILL12         5689-DATA
   FAILL13         5694-DATA
   FAPRIV01        5622-DATA
   FAPRIV02        5627-DATA
   FAPRIV03        5632-DATA
   FAPRIV04        5638-DATA
   FAPSD01         1813-DATA
   FAPSD02         1832-DATA
   FAPSD03         1847-DATA
   FARWD            702-RD      5573/DATA    5578/DATA    5583/DATA    5590/DATA    5596/DATA
   FARWD01         5571-DATA
   FARWD02         5576-DATA
   FARWD03         5581-DATA
   FARWD04         5588-DATA
   FARWD05         5594-DATA
   FASTCHK          505-LW       521/BDR
   FASTCHKA         507/BE       511-LD
   FILL              37-CNAME
   FILTER           787/AND     1012/AND     1013/AND     1105-DATA
   FIRST            408/STW      806/LW       824/STW     1055-DATA
   FLM              972/GEN      974-TEXTC
   FLNIN            895/DATA     904-LW
   FLOAT            901-FAS      904/LW
   FLOATP           969/P        972-GEN
   FLPF             187/XPSD     251-PZE      255/LCF      664/STW     1023/PZE
   FLPFAD           663/EOR     1023-PZE
   FLPFSW           663-EOR     5254/K       5266/K       5278/K       5290/K       5302/K       5314/K
      5326/K       5338/K       5350/K       5362/K       5374/K       5386/K       5398/K       5410/K
      5422/K       5434/K       5446/K       5458/K       5470/K       5482/K       5494/K       5506/K
      5518/K
   FLPFTR           187-XPSD
   FLPRINT          903/B        907-XPSD
   FLTRAP           895-DATA     968/XPSD
   FPFRET           256-XPSD
   FPORET           248-XPSD    2319/K       2384/K       2944/K       3047/K       3105/K       3217/K
      4159/K       4199/K       4295/K       4307/K       4329/K       4382/K       4420/K       4448/K
      4472/K       6783/K       6793/K       6803/K       6813/K       7293/K       7313/K       7363/K
   FRAME            765/LW      1040/LW      1041/LW      1092-DATA
   FROM             431/STW      433-LW       438/STW      629/LW
   FXPO             186/XPSD     243-PZE      247/LCF      656/STW      661/DATA    1024/PZE
   FXPOA            658/EOR      661-DATA
   FXPOAD           655/EOR     1024-PZE
   FXPOPSDW         668-EOR     2326/K
   FXPOSW           655-EOR     1996/K       2014/K       2022/K       2030/K       2038/K       2046/K
      2054/K       2062/K       2070/K       2078/K       2086/K       2094/K       2102/K       2110/K
      2118/K       2126/K       2134/K       2142/K       2150/K       2158/K       2166/K       2179/K
      2188/K       2196/K       2208/K       2217/K       2226/K       2234/K       2245/K       2255/K
      2264/K       2272/K       2282/K       2291/K       2300/K       2310/K       2318/K       2379/K
      2383/K       2391/K       2405/K       2943/K       3046/K       3104/K       3216/K       4137/K
      4158/K       4189/K       4198/K       4270/K       4278/K       4286/K       4294/K       4300/K
      4306/K       4316/K       4328/K       4340/K       4352/K       4381/K       4389/K       4397/K
      4411/K       4419/K       4447/K       4459/K       4471/K       4604/K       4610/K       4616/K
      4622/K       4870/K       4900/K       4906/K       4918/K       4938/K       4968/K       5706/K
      5716/K       5726/K       5736/K       5746/K       5756/K       5766/K       5776/K       5786/K
      5796/K       5806/K       5816/K       5826/K       5836/K       5846/K       5856/K       5866/K
      5876/K       5886/K       5896/K       5906/K       5916/K       5926/K       5936/K       5946/K
      5956/K       5966/K       5976/K       5986/K       5996/K       6006/K       6016/K       6026/K
      6036/K       6046/K       6056/K       6066/K       6076/K       6086/K       6096/K       6106/K
      6116/K       6126/K       6136/K       6146/K       6156/K       6166/K       6176/K       6186/K
      6196/K       6206/K       6216/K       6226/K       6236/K       6246/K       6256/K       6266/K
      6276/K       6286/K       6296/K       6306/K       6316/K       6326/K       6336/K       6346/K
      6356/K       6366/K       6376/K       6386/K       6396/K       6406/K       6416/K       6426/K
      6436/K       6446/K       6456/K       6466/K       6476/K       6486/K       6496/K       6506/K
      6516/K       6526/K       6536/K       6546/K       6556/K       6566/K       6576/K       6586/K
      6596/K       6606/K       6616/K       6626/K       6636/K       6646/K       6656/K       6666/K
      6676/K       6686/K       6696/K       6706/K       6716/K       6726/K       6736/K       6746/K
      6756/K       6772/K       6782/K       6792/K       6802/K       6812/K       6822/K       6832/K
      6842/K       6852/K       6862/K       6872/K       6882/K       6892/K       6902/K       6912/K
      6922/K       6932/K       6942/K       6952/K       6962/K       6972/K       6982/K       6992/K
      7002/K       7012/K       7022/K       7032/K       7042/K       7052/K       7062/K       7072/K
      7082/K       7092/K       7102/K       7112/K       7122/K       7132/K       7142/K       7152/K
      7162/K       7172/K       7182/K       7192/K       7202/K       7212/K       7222/K       7232/K
      7242/K       7252/K       7262/K       7272/K       7282/K       7292/K       7302/K       7312/K
      7322/K       7332/K       7342/K       7352/K       7362/K       7372/K       7382/K       7392/K
      7402/K       7412/K       7422/K       7432/K       7442/K       7452/K       7462/K       7472/K
      7482/K       7492/K       7502/K       7512/K       7522/K       7532/K       7542/K       7552/K
      7562/K       7572/K       7582/K       7592/K       7602/K       7612/K       7622/K       7632/K
      7642/K
   FXPOTR           186-XPSD     659/STW      669/STW
   GETOUT           826/LPSD     828-PZE
   GOTOP            840/BIR      846-LW
   G1                50-EQU       52/GEN
   G2                59-EQU       61/GEN
   HDG             1149/J       1171/J       1198-DATA
   HEAD            1136/P       1149-J
   HEADCDW          882/LI      7810-GEN
   HEADMSSG        7810/GEN     7810/GEN     7834-TEXT
   HEADMSSGA       7810/GEN     7835-EQU
   HLTEST           729/B        733-RD       828/PZE
   I                 10-COM      421/STW      434/STW     1268-EQU
   IA               463/STW      548/LW      1271-EQU     1376/LCF*    1402/LW*     1963/AW*     2254/AW*
      2378/SW*     2458/BAL*    2497/LH*     2573/LB*     2581/LB*     2629/LD*     2653/LD*     2689/LD*
      2773/LW*     2934/LAW*    2989/LAH*    3033/LAD*    3111/LCW*    3143/LCH*    3191/LCD*    3253/STH*
      3315/STB*    3347/STD*    3408/STCF*   3504/STW*    3505/STW*    3507/ANLZ*   3512/CB*     3513/CB*
      3528/LI*     3529/LI*     3873/CB*     3943/CD*     4157/MTW*    4188/MTH*    4229/MTB*    4285/AH*
      4311/AI*     4339/AD*     4396/AWM*    4405/AWM*    4426/SH*     4446/SD*     5646/GEN     6485/MW*
      6675/MH*     6765/MI*     7081/DW*     7641/DH*
   IAID             547/LW      1064-I
   IMAGE            792/STW     1045/STW     1151/J       1153/J       1159/J       1163/J       1218-DATA
   IMP              908/LW       967-XPSD
   INDA             461/LW       549/LW      1015-PZE
   INITIATE         897/BNE      996-CW
   INST             460/STW      519/EXU      575/LW      1270-EQU
   INSTID           536/LW      1062-I
   INT01           3457-DATA
   INT02           3467-DATA
   INT03           3477-DATA
   IO               820/BCS      822-XPSD     833/B        845/B
   IOCOMP           961/P        964-GEN
   IOCOUNT          994-DATA    1008/CW
   IOINT           1081-DATA
   IOINTR           203/XPSD     950-DATA     959/LPSD
   IOM              718/LW       736/LW       943/STW      960-DATA
   ITERATE          404/STW      476/LW       522/LW      1001/STW     1004-DATA
   IXID             551/LW      1065-I
   IX01            5600-DATA    5601/EOR     5603/DATA    5603/DATA    5603/DATA
   IX02            5605-DATA
   IX03            5611-DATA
   I9               637/LW       672/LW       679/LW       686/LW       693/LW      1051-DATA
   J                 31-CNAME
   K                 12-COM
   L:A:S           7718/LI      7812-GEN
   L:M:S           7708/LI      7811-GEN
   L:MA:MSG        7813/GEN     7813/GEN     7822-TEXT
   L:MA:S          7813/GEN     7824-EQU
   L:MA:1          7720/LI      7813-GEN
   LAD01           2996-DATA
   LAD02           3008-DATA
   LAD03           3020-DATA
   LAD04           3032-DATA
   LAD05           3044-DATA
   LAD06           3056-DATA
   LAD07           3068-DATA
   LAH01           2962-DATA
   LAH011          2970-DATA
   LAH012          2975-DATA
   LAH02           2980-DATA
   LAH03           2988-DATA
   LAMAA           7703/BEZ     7706-MTW
   LAMAAA          7705/B       7708-LI
   LAMBB           7700/BE      7711-MTW
   LAMRES          7722/LW      7760/STW     7771/LW      7802-DATA
   LAMRETURN        500/STW     7726/LW      7769/LW      7774-DATA
   LAMSTOP         7664/DATA    7676/DATA    7759-LW
   LAMTRAP         7691-DATA    7800/XPSD
   LAS:INT          494/CW      7699/CW      7801-K
   LASAM            621-LW      7815/DATA
   LASAM2          7730/LPSD    7815-DATA
   LASFLAG          393/STW     7702/LW      7711/MTW     7803-DATA
   LASMSG          7812/GEN     7812/GEN     7820-TEXT
   LASMSG1         7812/GEN     7821-EQU
   LAS1            7662-DATA    7704/STW     7716/STW
   LAW01           2917-DATA
   LAW02           2925-DATA
   LAW03           2933-DATA
   LAW04           2941-DATA
   LAW05           2953-DATA
   LB01            2548-DATA
   LB02            2556-DATA
   LB03            2564-DATA
   LB04            2572-DATA
   LB05            2580-DATA
   LB06            2588-DATA
   LB07            2598-DATA
   LB08            2604-DATA
   LB09            2612-DATA
   LCD01           3166-DATA
   LCD02           3178-DATA
   LCD03           3190-DATA
   LCD04           3202-DATA
   LCD05           3214-DATA
   LCD06           3226-DATA
   LCF               45/OPEN      48-CNAME
   LCFI              45/OPEN      54-CNAME
   LCFI01          2885-DATA
   LCFI02          2889-DATA
   LCFI03          2893-DATA
   LCFI04          2897-DATA
   LCFI05          2901-DATA
   LCFI06          2909-DATA
   LCFI07          2913-DATA
   LCF01           1359-DATA
   LCF02           1363-DATA
   LCF03           1367-DATA
   LCF04           1371-DATA
   LCF05           1375-DATA
   LCF06           2854-DATA
   LCF07           2860-DATA
   LCF08           2872-DATA
   LCF09           2880-DATA
   LCH01           3126-DATA
   LCH02           3134-DATA
   LCH03           3142-DATA
   LCH04           3150-DATA
   LCH05           3158-DATA
   LCW01           3080-DATA
   LCW02           3088-DATA
   LCW03           3096-DATA
   LCW04           3102-DATA
   LCW05           3110-DATA
   LCW06           3118-DATA
   LDREG            746/STW      747-LW       801/LW       803/BIR
   LD01            2618-DATA
   LD02            2628-DATA
   LD03            2640-DATA
   LD04            2652-DATA
   LD05            2664-DATA
   LD06            2676-DATA
   LD07            2688-DATA
   LD08            2700-DATA
   LD09            2712-DATA
   LD10            2724-DATA
   LD11            2736-DATA
   LD12            2748-DATA
   LD13            2760-DATA
   LH01            2480-DATA
   LH02            2488-DATA
   LH03            2496-DATA
   LH04            2504-DATA
   LH05            2510-DATA
   LH06            2516-DATA
   LH07            2524-DATA
   LH08            2536-DATA
   LI                45/OPEN      57-CNAME
   LINE             406/STW      805/LW       823/STW     1061-DATA
   LINKAD           445/AND     1046-DATA
   LINOUT           810/BIR      818-LW
   LIST             424/LW       433/LW      1042/LW      1302-RES
   LI01            2777-DATA
   LI02            2783-DATA
   LI03            2789-DATA
   LI04            2795-DATA
   LI05            2801-DATA
   LMS:ACT          501/LI      7769-LW
   LMSFLAG          394/STW     7706/MTW     7804-DATA
   LMSMSG          7811/GEN     7811/GEN     7818-TEXT
   LMSMSG1         7811/GEN     7819-EQU
   LMS1             497/CW       506/CW       601/CW      7674-DATA    7707/STW     7712/LW      7715/LW
   LOAD             409/LW      1042-LW
   LOADR            745/LW      1037-LW
   LOC              442/STW      519-EXU      544/LW      1016/PZE     1017/PZE     1063/I       1246/PZE
      1304/EXU     1306/K       1312/DATA    1316/K       1324/K       1330/K       1338/K       1362/K
      1366/K       1370/K       1374/K       1378/K       1387/K       1394/K       1404/K       1417/K
      1425/K       1433/K       1441/K       1449/K       1457/K       1465/K       1473/K       1481/K
      1489/K       1497/K       1505/K       1513/K       1521/K       1529/K       1537/K       1545/K
      1553/K       1561/K       1569/K       1577/K       1585/K       1593/K       1601/K       1609/K
      1617/K       1625/K       1633/K       1639/K       1645/K       1651/K       1658/K       1671/K
      1675/K       1683/K       1691/K       1699/K       1707/K       1715/K       1723/K       1736/K
      1740/K       1748/K       1756/K       1764/K       1772/K       1783/K       1791/K       1799/K
      1807/K       1816/K       1829/K       1835/K       1838/K       1839/K       1850/K       1853/K
      1854/K       1865/K       1880/K       1911/K       1916/K       1921/K       1926/K       1932/K
      1938/K       1961/K       1965/K       1973/K       1983/K       1997/K       2015/K       2023/K
      2031/K       2039/K       2047/K       2055/K       2063/K       2071/K       2079/K       2087/K
      2095/K       2103/K       2111/K       2119/K       2127/K       2135/K       2143/K       2151/K
      2159/K       2167/K       2180/K       2189/K       2197/K       2209/K       2218/K       2227/K
      2235/K       2246/K       2256/K       2265/K       2273/K       2283/K       2292/K       2301/K
      2311/K       2327/K       2336/K       2347/K       2355/K       2361/K       2367/K       2372/K
      2380/K       2392/K       2398/K       2406/K       2424/K       2438/K       2446/DATA    2456/DATA
      2462/DATA    2470/DATA    2479/DATA    2483/K       2491/K       2499/K       2507/K       2513/K
      2519/K       2527/K       2539/K       2551/K       2559/K       2567/K       2575/K       2583/K
      2591/K       2601/K       2607/K       2615/K       2621/K       2631/K       2643/K       2655/K
      2667/K       2679/K       2691/K       2703/K       2715/K       2727/K       2739/K       2751/K
      2763/K       2769/K       2775/K       2780/K       2786/K       2792/K       2798/K       2810/K
      2820/K       2830/K       2840/K       2851/K       2857/K       2863/K       2875/K       2883/K
      2888/DATA    2892/K       2896/K       2900/K       2904/K       2916/K       2920/K       2928/K
      2936/K       2956/K       2965/K       2973/K       2978/K       2983/K       2991/K       2999/K
      3011/K       3023/K       3035/K       3059/K       3071/K       3083/K       3091/K       3099/K
      3113/K       3121/K       3129/K       3137/K       3145/K       3153/K       3161/K       3169/K
      3181/K       3193/K       3205/K       3229/K       3239/K       3247/K       3255/K       3263/K
      3271/K       3279/K       3287/K       3295/K       3303/K       3309/K       3317/K       3325/K
      3337/K       3349/K       3361/K       3373/K       3384/K       3394/K       3402/K       3410/K
      3418/K       3426/K       3434/K       3442/K       3450/K       3460/K       3470/K       3480/K
      3493/K       3501/K       3509/K       3517/K       3525/K       3534/K       3542/K       3552/K
      3562/K       3572/K       3582/K       3598/K       3612/K       3628/K       3643/K       3658/K
      3674/K       3689/K       3704/K       3719/K       3720/DATA    3734/K       3749/K       3763/K
      3774/K       3792/K       3803/K       3812/K       3817/K       3826/K       3835/K       3843/K
      3851/K       3859/K       3867/K       3875/K       3883/K       3891/K       3899/K       3908/K
      3915/K       3921/K       3933/K       3945/K       3957/K       3970/K       3981/K       3992/K
      4003/K       4014/K       4021/K       4032/K       4043/K       4054/K       4068/K       4082/K
      4097/K       4111/K       4125/K       4138/K       4144/K       4150/K       4167/K       4175/K
      4181/K       4190/K       4207/K       4215/K       4223/K       4231/K       4239/K       4247/K
      4253/K       4259/K       4265/K       4271/K       4279/K       4287/K       4301/K       4317/K
      4341/K       4353/K       4366/K       4374/K       4390/K       4398/K       4407/K       4412/K
      4428/K       4436/K       4460/K       4486/K       4492/K       4498/K       4504/K       4510/K
      4516/K       4522/K       4529/K       4535/K       4541/K       4546/DATA    4551/DATA    4555/DATA
      4560/DATA    4564/DATA    4569/K       4575/K       4580/DATA    4585/DATA    4590/DATA    4594/DATA
      4599/DATA    4605/K       4611/K       4617/K       4623/K       4629/K       4635/K       4641/K
      4649/K       4655/K       4661/K       4667/K       4673/K       4681/K       4687/K       4693/K
      4699/K       4705/K       4711/K       4717/K       4723/K       4729/K       4735/K       4741/K
      4747/K       4753/K       4759/K       4765/K       4771/K       4777/K       4783/K       4789/K
      4795/K       4801/K       4811/K       4821/K       4831/K       4841/K       4851/K       4861/K
      4871/K       4877/DATA    4883/DATA    4889/DATA    4895/DATA    4901/K       4907/K       4913/DATA
      4919/K       4929/DATA    4939/K       4949/DATA    4959/DATA    4969/K       4980/K       4986/K
      4992/K       4998/K       5004/K       5010/K       5016/K       5022/K       5028/K       5034/K
      5040/K       5046/K       5052/K       5058/K       5064/K       5069/DATA    5074/K       5083/K
      5089/K       5094/K       5100/K       5105/K       5110/K       5115/K       5120/K       5125/K
      5130/K       5135/K       5140/K       5145/K       5150/K       5155/K       5160/K       5167/K
      5172/K       5177/K       5182/K       5187/K       5192/K       5197/K       5202/K       5207/K
      5212/K       5217/K       5222/K       5227/K       5232/K       5237/K       5242/K       5249/K
      5255/K       5267/K       5279/K       5291/K       5303/K       5315/K       5327/K       5339/K
      5351/K       5363/K       5375/K       5387/K       5399/K       5411/K       5423/K       5435/K
      5447/K       5459/K       5471/K       5483/K       5495/K       5507/K       5519/K       5574/DATA
      5579/DATA    5584/DATA    5591/DATA    5596/DATA    5602/DATA    5608/K       5614/K       5630/K
      5635/K       5707/K       5717/K       5727/K       5737/K       5747/K       5757/K       5767/K
      5777/K       5787/K       5797/K       5807/K       5817/K       5827/K       5837/K       5847/K
      5857/K       5867/K       5877/K       5887/K       5897/K       5907/K       5917/K       5927/K
      5937/K       5947/K       5957/K       5967/K       5977/K       5987/K       5997/K       6007/K
      6017/K       6027/K       6037/K       6047/K       6057/K       6067/K       6077/K       6087/K
      6097/K       6107/K       6117/K       6127/K       6137/K       6147/K       6157/K       6167/K
      6177/K       6187/K       6197/K       6207/K       6217/K       6227/K       6237/K       6247/K
      6257/K       6267/K       6277/K       6287/K       6297/K       6307/K       6317/K       6327/K
      6337/K       6347/K       6357/K       6367/K       6377/K       6387/K       6397/K       6407/K
      6417/K       6427/K       6437/K       6447/K       6457/K       6467/K       6477/K       6487/K
      6497/K       6507/K       6517/K       6527/K       6537/K       6547/K       6557/K       6567/K
      6577/K       6587/K       6597/K       6607/K       6617/K       6627/K       6637/K       6647/K
      6657/K       6667/K       6677/K       6687/K       6697/K       6707/K       6717/K       6727/K
      6737/K       6747/K       6757/K       6773/K       6823/K       6833/K       6843/K       6853/K
      6863/K       6873/K       6883/K       6893/K       6903/K       6913/K       6923/K       6933/K
      6943/K       6953/K       6963/K       6973/K       6983/K       6993/K       7003/K       7013/K
      7023/K       7033/K       7043/K       7053/K       7063/K       7073/K       7083/K       7093/K
      7103/K       7113/K       7123/K       7133/K       7143/K       7153/K       7163/K       7173/K
      7183/K       7193/K       7203/K       7213/K       7223/K       7233/K       7243/K       7253/K
      7263/K       7273/K       7283/K       7303/K       7323/K       7333/K       7343/K       7353/K
      7373/K       7383/K       7393/K       7403/K       7413/K       7423/K       7433/K       7443/K
      7453/K       7463/K       7473/K       7483/K       7493/K       7503/K       7513/K       7523/K
      7533/K       7543/K       7553/K       7563/K       7573/K       7583/K       7593/K       7603/K
      7613/K       7623/K       7633/K       7643/K       7656/DATA    7665/K       7677/DATA
   LOCADD           454/EOR     1017-PZE
   LOC2AD           491/LW      1016-PZE
   LONGL           1138/P       1153-J
   LPERR            841/LW      1141-P
   LPFORMAT         848/LW      1140-P
   LPGOTOP          846/LW      1139-P
   LPMSG            841-LW       850/B
   LPO              808/BLZ      830-TDV      836/BNEZ
   LPREPORT         844/LW      1142-P
   LPTOP            839/BNEZ     848-LW
   LRP01           1862-DATA
   LRP02           1877-DATA
   LS01            2807-DATA
   LS02            2817-DATA
   LS03            2827-DATA
   LS04            2837-DATA
   LS05            2848-DATA
   LTPXPSD         7761/LW      7800-XPSD
   LWB              772/STW      774-LW
   LWBIT            769/LW      1035-LW
   LWBT             773/STW      777/BCS      779-LW
   LWBY             785/STW      786-LW
   LWBYTE           784/EOR     1036-LW
   LWFRM            752/LW      1040-LW
   LWFRM2           758/LW      1041-LW
   LWIX            2766-DATA
   LWIXIA          2772-DATA
   LWN              751/LW      1038-LW
   LWN2             757/LW      1039-LW
   LW01            1384-DATA
   LW02            1391-DATA
   LW03             396/LW       987/LW      1401-DATA
   LW04            1414-DATA
   LW05            1422-DATA
   LW06            1430-DATA
   LW07            1438-DATA
   LW08            1446-DATA
   LW09            1454-DATA
   LW10            1462-DATA
   LW11            1470-DATA
   LW12            1478-DATA
   LW13            1486-DATA
   LW14            1494-DATA
   LW15            1502-DATA
   LW16            1510-DATA
   LW17            1518-DATA
   LW18            1526-DATA
   LW19            1534-DATA
   LW20            1542-DATA
   LW21            1550-DATA
   LW22            1558-DATA
   LW23            1566-DATA
   LW24            1574-DATA
   LW25            1582-DATA
   LW26            1590-DATA
   LW27            1598-DATA
   LW28            1606-DATA
   LW29            1614-DATA
   LW30            1622-DATA
   LW31            1630-DATA
   LW32            1636-DATA
   LW33            1642-DATA
   LW34            1648-DATA
   LW35            1655-DATA
   MASK             384/AND      657/EOR      776/AND      783/AND      929/LW      1014/AND     1097-DATA
      1296/AND
   MAXCNT           921/CW      1077-DATA
   MEMAD           1025-PZE
   MEMID            608/LW       612/LW      1068-I
   MEMORY           484/STW      485/STW      512/CD       516/STD      609/LW       613/LW      1015/PZE
      1025/PZE     1068/I       1272-EQU     1314/EXU     1318/LW      1319/LW      1320/LW      1322/EXU
      1325/DATA    1326/DATA    1328/EXU*    1336/EXU*    1346/EXU     1357/K       1358/K       1360/LCF
      1364/LCF     1368/LCF     1372/LCF     1385/LW      1392/LW      1415/LW      1423/LW      1431/LW
      1439/LW      1447/LW      1455/LW      1463/LW      1471/LW      1479/LW      1487/LW      1495/LW
      1503/LW      1511/LW      1519/LW      1527/LW      1535/LW      1543/LW      1551/LW      1559/LW
      1567/LW      1575/LW      1583/LW      1591/LW      1599/LW      1607/LW      1615/LW      1623/LW
      1631/LW      1637/LW      1643/LW      1649/LW      1656/LW      1669/OR      1673/OR      1681/OR
      1689/OR      1697/OR      1705/OR      1713/STW     1721/STW     1734/AND     1738/AND     1746/AND
      1754/AND     1762/AND     1781/EOR     1789/EOR     1797/EOR     1805/EOR     1833/LPSD    1848/LPSD
      1863/LRP     1893/BCR     1895/K       1941/BCS     1943/K       1959/AW      1971/AW      1981/AW
      1995/AW      2013/AW      2021/AW      2029/AW      2037/AW      2045/AW      2053/AW      2061/AW
      2069/AW      2077/AW      2085/AW      2093/AW      2101/AW      2109/AW      2117/AW      2125/AW
      2133/AW      2141/AW      2149/AW      2157/AW      2165/AW      2178/AW      2187/AW      2195/AW
      2207/AW      2216/AW      2225/AW      2233/AW      2244/AW      2263/AW      2271/AW      2281/AW
      2290/AW      2299/AW      2309/AW      2317/AW      2325/AW      2334/AW      2345/AW      2353/AW
      2359/AW      2365/AW      2370/SW      2382/SW      2396/SW      2404/SW      2413/BIR     2415/K
      2448/BAL     2450/K       2460/DATA    2466/BAL*    2481/LH      2489/LH      2517/LH      2525/LH*
      2528/DATA    2529/DATA    2537/LH*     2542/DATA    2543/DATA    2549/LB      2557/LB      2565/LB
      2592/DATA    2593/DATA    2605/LB      2613/LB*     2616/DATA    2616/DATA    2619/LD      2644/DATA
      2656/DATA    2665/LD      2677/LD      2701/LD      2761/LD*     2764/DATA    2764/DATA    2764/DATA
      2770/DATA    2770/DATA    2802/LI*     2808/LS      2818/LS      2828/LS      2838/LS      2861/LCF*
      2866/DATA    2867/DATA    2876/DATA    2877/DATA    2881/LCF     2910/LCFI*   2918/LAW     2926/LAW
      2942/LAW*    2951/DATA    2952/DATA    2954/LAW     2963/LAH     2971/LAH     2976/LAH     2981/LAH
      2997/LAD     3009/LAD     3024/DATA    3045/LAD     3057/LAD     3069/LAD     3081/LCW     3089/LCW
      3106/DATA    3119/LCW     3127/LCH     3138/DATA    3154/DATA    3162/DATA    3167/LCD     3182/DATA
      3203/LCD     3215/LCD     3237/STH     3245/STH     3261/STH     3269/STH     3277/STH     3285/STB
      3293/STB     3307/STB     3323/STD     3335/STD     3359/STD     3371/STS     3392/STCF    3403/DATA
      3404/DATA    3416/STCF    3424/XW      3432/XW      3435/DATA    3438/DATA    3440/XW      3458/INT
      3468/INT     3471/DATA    3478/INT     3488/ANLZ    3502/DATA    3503/DATA    3511/DATA    3515/ANLZ
      3519/DATA    3520/LAD     3521/LAD     3523/ANLZ    3532/ANLZ    3540/ANLZ    3550/ANLZ    3560/ANLZ
      3570/ANLZ    3580/ANLZ    3596/ANLZ    3600/DATA    3601/EXU     3602/EXU     3610/ANLZ    3626/ANLZ
      3641/ANLZ    3645/DATA    3646/XW      3647/XW      3656/ANLZ    3672/ANLZ    3687/ANLZ    3702/ANLZ
      3717/ANLZ    3732/ANLZ    3747/ANLZ    3761/ANLZ    3772/ANLZ    3790/CW      3801/CW      3810/CW
      3815/CH      3824/CH      3833/CH      3841/CB      3849/CB      3857/CB      3865/CB      3881/CB
      3889/CB      3897/CB      3919/CD      3931/CD      3955/CD      3968/CS      3979/CS      3990/CS
      4001/CLR     4012/CLR     4019/CLR     4030/CLR     4041/CLR     4052/CLM     4066/CLM     4080/CLM
      4095/CLM     4109/CLM     4123/CLM     4148/MTW     4165/MTW     4179/MTH     4197/MTH     4205/MTH
      4213/MTB     4221/MTB     4237/MTB     4269/AH      4277/AH      4315/AD      4327/AD      4351/AD
      4364/AD      4372/AD      4380/AWM     4388/AWM     4408/DATA    4408/DATA    4410/SH      4418/SH
      4434/SD      4458/SD      4470/SD      4589/S*      4639/S*      4671/S*      4819/S*      4927/S*
      4957/S*      4967/S*      5081/SF*     5092/SF*     5247/SF*     5493/SF*     5517/SF*     5547/CAL4*
      5552/DATA    5553/DATA    5601/EOR     5628/EOR     5633/AWM     5639/DL      5660/CVS     5665/PACK
      5670/DST     5675/TBS     5690/DSA     5705/MW      5715/MW      5725/MW      5735/MW      5745/MW
      5755/MW      5765/MW      5775/MW      5785/MW      5795/MW      5805/MW      5815/MW      5825/MW
      5835/MW      5845/MW      5855/MW      5865/MW      5875/MW      5885/MW      5895/MW      5905/MW
      5915/MW      5925/MW      5935/MW      5945/MW      5955/MW      5965/MW      5975/MW      5985/MW
      5995/MW      6005/MW      6015/MW      6025/MW      6035/MW      6045/MW      6055/MW      6065/MW
      6075/MW      6085/MW      6095/MW      6105/MW      6115/MW      6125/MW      6135/MW      6145/MW
      6155/MW      6165/MW      6175/MW      6185/MW      6195/MW      6205/MW      6215/MW      6225/MW
      6235/MW      6245/MW      6255/MW      6265/MW      6275/MW      6285/MW      6295/MW      6305/MW
      6315/MW      6325/MW      6335/MW      6345/MW      6355/MW      6365/MW      6375/MW      6385/MW
      6395/MW      6405/MW      6415/MW      6425/MW      6435/MW      6445/MW      6455/MW      6465/MW
      6475/MW      6495/MW      6505/MW      6515/MW      6525/MW      6535/MW      6545/MW      6555/MW
      6565/MW      6575/MW      6585/MW      6595/MW      6605/MH      6615/MH      6625/MH      6635/MH
      6645/MH      6655/MH      6665/MH      6771/DW      6781/DW      6791/DW      6801/DW      6811/DW
      6821/DW      6831/DW      6841/DW      6851/DW      6861/DW      6871/DW      6881/DW      6891/DW
      6901/DW      6911/DW      6921/DW      6931/DW      6941/DW      6951/DW      6961/DW      6971/DW
      6981/DW      6991/DW      7001/DW      7011/DW      7021/DW      7031/DW      7041/DW      7051/DW
      7061/DW      7071/DW      7091/DW      7101/DW      7111/DW      7121/DW      7131/DW      7141/DW
      7151/DW      7161/DW      7171/DW      7181/DW      7191/DW      7201/DW      7211/DW      7221/DW
      7231/DW      7241/DW      7251/DW      7261/DW      7271/DW      7281/DW      7291/DW      7301/DW
      7311/DW      7321/DW      7331/DW      7341/DW      7351/DW      7361/DW      7371/DW      7381/DW
      7391/DW      7401/DW      7411/DW      7421/DW      7431/DW      7441/DW      7451/DW      7461/DW
      7471/DW      7481/DW      7491/DW      7501/DW      7511/DW      7521/DW      7531/DW      7541/DW
      7551/DW      7561/DW      7571/DH      7581/DH      7591/DH      7601/DH      7611/DH      7621/DH
      7631/DH      7663/K       7675/K       7679/K       7801/K
   MEMOUT           466/STW      467/STW      511/LD       633-DATA
   MH01            6604-DATA
   MH02            6614-DATA
   MH03            6624-DATA
   MH04            6634-DATA
   MH05            6644-DATA
   MH06            6654-DATA
   MH07            6664-DATA
   MH08            6674-DATA
   MI                45/OPEN      58-CNAME
   MINCR            915/AW      1006-DATA
   MISSLMS          602/BE       612-LW
   MI01            6684-DATA
   MI02            6694-DATA
   MI03            6704-DATA
   MI04            6714-DATA
   MI05            6724-DATA
   MI06            6734-DATA
   MI07            6744-DATA
   MI08            6754-DATA
   MI09            6764-DATA
   MODULE           630/LPSD    1275-EQU
   MOTION           835/AND     1074-DATA
   MOVE             431-STW      437/BIR
   MPVRET           212-XPSD
   MSG             1178/GEN     1180-TEXTC
   MTB01           4212-DATA
   MTB02           4220-DATA
   MTB03           4228-DATA
   MTB04           4236-DATA
   MTB05           4244-DATA
   MTB06           4250-DATA
   MTB07           4256-DATA
   MTB08           4262-DATA
   MTH01           4172-DATA
   MTH02           4178-DATA
   MTH03           4187-DATA
   MTH04           4196-DATA
   MTH05           4204-DATA
   MTW01           4135-DATA
   MTW02           4141-DATA
   MTW03           4147-DATA
   MTW04           4156-DATA
   MTW05           4164-DATA
   MVRET            213-XPSD    1348/K       5625/K
   MW01            5704-DATA
   MW02            5714-DATA
   MW03            5724-DATA
   MW04            5734-DATA
   MW05            5744-DATA
   MW06            5754-DATA
   MW07            5764-DATA
   MW08            5774-DATA
   MW09            5784-DATA
   MW10            5794-DATA
   MW11            5804-DATA
   MW12            5814-DATA
   MW13            5824-DATA
   MW14            5834-DATA
   MW15            5844-DATA
   MW16            5854-DATA
   MW17            5864-DATA
   MW18            5874-DATA
   MW19            5884-DATA
   MW20            5894-DATA
   MW21            5904-DATA
   MW22            5914-DATA
   MW23            5924-DATA
   MW24            5934-DATA
   MW25            5944-DATA
   MW26            5954-DATA
   MW27            5964-DATA
   MW28            5974-DATA
   MW29            5984-DATA
   MW30            5994-DATA
   MW31            6004-DATA
   MW32            6014-DATA
   MW33            6024-DATA
   MW34            6034-DATA
   MW35            6044-DATA
   MW36            6054-DATA
   MW37            6064-DATA
   MW38            6074-DATA
   MW39            6084-DATA
   MW40            6094-DATA
   MW41            6104-DATA
   MW42            6114-DATA
   MW43            6124-DATA
   MW44            6134-DATA
   MW45            6144-DATA
   MW46            6154-DATA
   MW47            6164-DATA
   MW48            6174-DATA
   MW49            6184-DATA
   MW50            6194-DATA
   MW51            6204-DATA
   MW52            6214-DATA
   MW53            6224-DATA
   MW54            6234-DATA
   MW55            6244-DATA
   MW56            6254-DATA
   MW57            6264-DATA
   MW58            6274-DATA
   MW59            6284-DATA
   MW60            6294-DATA
   MW61            6304-DATA
   MW62            6314-DATA
   MW63            6324-DATA
   MW64            6334-DATA
   MW65            6344-DATA
   MW66            6354-DATA
   MW67            6364-DATA
   MW68            6374-DATA
   MW69            6384-DATA
   MW70            6394-DATA
   MW71            6404-DATA
   MW72            6414-DATA
   MW73            6424-DATA
   MW74            6434-DATA
   MW75            6444-DATA
   MW76            6454-DATA
   MW77            6464-DATA
   MW78            6474-DATA
   MW79            6484-DATA
   MW80            6494-DATA
   MW81            6504-DATA
   MW82            6514-DATA
   MW83            6524-DATA
   MW84            6534-DATA
   MW85            6544-DATA
   MW86            6554-DATA
   MW87            6564-DATA
   MW88            6574-DATA
   MW89            6584-DATA
   MW90            6594-DATA
   M1Q15            426/AND     1048-DATA
   NAO              183/XPSD     207-PZE      641/STW     1026/PZE     1034/XPSD
   NAOAD            640/EOR     1026-PZE
   NAORET           211-XPSD    4313/K
   NAOTR            183-XPSD     443/STW      639/STW     7723/STW     7759/LW      7762/STW     7772/STW
   NAOXD            638/EOR     1034-XPSD
   NEARET           215-XPSD    2477/K
   NEG12           1058-DATA
   NEG2             407/LW       750/LW      1265-EQU
   NEG20            419/LW      1059-DATA
   NEG3             756/LW      1056-DATA
   NEG4             744/LW       770/LW      1264-EQU
   NEG51            405/LW       817/LW      1060-DATA
   NEG8             741/LW      1057-DATA
   NEIRET           219-XPSD    1356/K       2804/K       2912/K       3400/STCF    3403/DATA    3404/DATA
      5641/K       5648/K       5657/K       5662/K       5667/K       5672/K       5677/K       5682/K
      5687/K       5692/K       5697/K       6767/K
   NFAIMP01         402/STW      905/STW     5700-DATA
   NFLM             976/GEN      978-TEXTC
   NFLOATP          970/P        976-GEN
   NIMP             898/LW       968-XPSD
   NOHALT           734/BCS      736-LW
   NOTEND           425/BCS      429-LW
   NUMBER           764/LW      1038/LW      1039/LW      1087-DATA    1264/EQU     1265/EQU
   ODD              755/BCS      760-LW
   ODDBALL          530/LW       982/LW      1086-DATA
   ONE              462/LW       557/LW       754/AND     1054-DATA
   OR01            1668-DATA
   OR02            1672-DATA
   OR03            1680-DATA
   OR04            1688-DATA
   OR05            1696-DATA
   OR06            1704-DATA
   P                 25-CNAME
   PAGE              16/OPEN      17-CNAME
   PARITY           201/XPSD     362-PZE
   PASS            1276-EQU     2589/LB      2592/DATA    2593/DATA
   PASSES           379/LW       417/STW      574/LW      1260-PZE     1285/LW
   PCPINT           414/LW      1080-DATA
   PERR            1141/P       1157-J
   PFLOATP          902/LW       969-P
   PFORMAT         1140/P       1165-J
   PGO             1078-DATA    1155/J
   PGOTOP          1139/P       1155-J
   PHEAD            815/LW      1136-P
   PIOCOMP          953/LW       961-P
   PLMID            585/LW      1069-I
   PLMNEXT         7793-EQU     7806/DATA
   PLMNUM           578/STW      592/MTW     7816-DATA
   PLMREG           586/LW      7795/STM     7807-RES     7817/LW
   PLMRESV          583/LW      7817-LW
   PLMROUT         7655/K       7779-EQU
   PLMXPSD         7785/LW      7787/STW     7796/LW      7806-DATA
   PLM1             489/CW       541/CW       568/CW       576/LW      7653-DATA
   PLONGL           818/LW      1138-P
   PNFLOATP         906/LW       970-P
   PRE:LT1          495/BNE      497-CW
   PRE:LT2          496/B        499-LW
   PRELOC           490/BE       498/BNE      503-LPSD
   PREPORT         1142/P       1161-J
   PRINT            812/XPSD     814/XPSD     816/XPSD     822/XPSD     847/XPSD     849/XPSD     853-PZE
       876/LPSD     883/XPSD     887/XPSD     907/XPSD     928/XPSD    7749/XPSD
   PRNTFG           874/LW      7695/STW     7725/STW     7731-DATA
   PRTCMSG          927/LW      1143-P
   PSDWID           559/LW      1066-I
   PSHRTL           821/LW      1137-P
   PSIXCR           811/LW      1134-P
   PSW1             446/STW      449/LPSD     455/STW      503/LPSD     518/LPSD    1252-PZE
   PSW2             413/STW      457/STW     1253-PZE
   PTITLE           813/LW      1135-P
   REGID            596/LW      1067-I
   REGTEMP         7693/STM     7729/LM      7732-RES     7737/STM     7746/LM
   REPEAT           370/LPSD     388/LPSD    1250-PZE     1275/EQU     1276/EQU     1300/LPSD    2945/DATA
      2946/DATA    2951/DATA    2952/DATA    2981/LAH     2984/DATA    3021/LAD     3024/DATA    3135/LCH
      3138/DATA    3159/LCH     3162/DATA    3179/LCD     3182/DATA    3435/DATA    3438/DATA    3496/LH*
      3497/LH*     3499/ANLZ    3502/DATA
   REPLAY           880/LW       892-B
   REPORT           743/BCS      744-LW
   RESET            204/XPSD     373-PZE
   RETADDR          911/LW       980-DATA
   RETEND          1043-PZE
   RETURN           190/XPSD     211/XPSD     212/XPSD     213/XPSD     214/XPSD     215/XPSD     216/XPSD
       217/XPSD     218/XPSD     219/XPSD     220/XPSD     221/XPSD     222/XPSD     223/XPSD     224/XPSD
       225/XPSD     226/XPSD     233/XPSD     240/XPSD     248/XPSD     256/XPSD     264/XPSD     271/XPSD
       278/XPSD     279/XPSD     280/XPSD     281/XPSD     282/XPSD     283/XPSD     284/XPSD     285/XPSD
       286/XPSD     287/XPSD     288/XPSD     289/XPSD     290/XPSD     291/XPSD     292/XPSD     293/XPSD
       300/XPSD     301/XPSD     302/XPSD     303/XPSD     304/XPSD     305/XPSD     306/XPSD     307/XPSD
       308/XPSD     309/XPSD     310/XPSD     311/XPSD     312/XPSD     313/XPSD     314/XPSD     315/XPSD
       322/XPSD     323/XPSD     324/XPSD     325/XPSD     326/XPSD     327/XPSD     328/XPSD     329/XPSD
       330/XPSD     331/XPSD     332/XPSD     333/XPSD     334/XPSD     335/XPSD     336/XPSD     337/XPSD
       344/XPSD     345/XPSD     346/XPSD     347/XPSD     348/XPSD     349/XPSD     350/XPSD     351/XPSD
       352/XPSD     353/XPSD     354/XPSD     355/XPSD     356/XPSD     357/XPSD     358/XPSD     359/XPSD
       492/STW      499/LW       502/STW      520/XPSD     531/STW      912/STW      983/STW     1244-PZE
      1291/DATA    1351/XPSD    1352/XPSD    1898/XPSD    1899/XPSD    1905/XPSD    1906/XPSD    1946/XPSD
      1947/XPSD    2418/XPSD    2419/XPSD    2453/XPSD    2454/XPSD    2463/XPSD    2464/XPSD    3103/LCW
      3106/DATA    3544/GEN     3545/XPSD    3546/XPSD    3584/DATA    3585/LS      3586/LS      3589/XPSD
      3590/XPSD    3604/XPSD    3605/XPSD    3619/XPSD    3620/XPSD    3635/XPSD    3636/XPSD    3650/XPSD
      3651/XPSD    3665/XPSD    3666/XPSD    3681/XPSD    3682/XPSD    3696/XPSD    3697/XPSD    3711/XPSD
      3712/XPSD    3726/XPSD    3727/XPSD    3741/XPSD    3742/XPSD    3755/XPSD    3756/XPSD    3768/XPSD
      3769/XPSD    5623/XPSD    7727/STW     7770/STW     7773/LPSD    7786/LW      7788/STW     7797/STW
   RINPUT           474/STW      475/STW      517/LD       635-DATA
   RI9CL1           673-EOR
   RI9CL2           680-EOR
   RI9CL3           687-EOR
   RI9CL4           694-EOR     5561/K
   RI9NAO           638-EOR     4312/K
   ROUTPUT          470/STW      471/STW      508/CD       514/LD       634-DATA
   RTC              921-CW      1010/B
   RTCMSG          1143/P       1178-GEN
   S                 45/OPEN      47-CNAME
   SAVE             381/LW       412/STW      424-LW       533/LW      1287/LW
   SAVE0            952/STW      958/LW       962-DATA
   SD01            4433-DATA
   SD02            4445-DATA
   SD03            4457-DATA
   SD04            4469-DATA
   SENMSG           886/LI      7814-GEN
   SENSEND         7814/GEN     7827-EQU
   SENSWAIT        7814/GEN     7814/GEN     7825-TEXT
   SETFRM           762/STW      765-LW       794/LW
   SETINTR          940/B        942-LI      1009/BE
   SETN             761/STW      764-LW       793/LW
   SETPSW           452-LW       642/BCR      646/BCR      650/BCR      660/BCR      670/B        677/BCR
       684/BCR      691/BCR      698/BCR      704/B       1305/K       1311/DATA    1315/K       1323/K
      1329/K       1337/K       1361/K       1365/K       1369/K       1373/K       1377/K       1386/K
      1393/K       1403/K       1416/K       1424/K       1432/K       1440/K       1448/K       1456/K
      1464/K       1472/K       1480/K       1488/K       1496/K       1504/K       1512/K       1520/K
      1528/K       1536/K       1544/K       1552/K       1560/K       1568/K       1576/K       1584/K
      1592/K       1600/K       1608/K       1616/K       1624/K       1632/K       1638/K       1644/K
      1650/K       1657/K       1670/K       1674/K       1682/K       1690/K       1698/K       1706/K
      1714/K       1722/K       1735/K       1739/K       1747/K       1755/K       1763/K       1771/K
      1782/K       1790/K       1798/K       1806/K       1815/K       1834/K       1849/K       1864/K
      1879/K       1894/K       1903/K       1910/K       1915/K       1920/K       1925/K       1931/K
      1937/K       1942/K       1960/K       1964/K       1972/K       1982/K       2335/K       2346/K
      2354/K       2360/K       2366/K       2371/K       2397/K       2414/K       2423/K       2430/K
      2437/K       2443/K       2449/K       2459/DATA    2467/K       2482/K       2490/K       2498/K
      2506/K       2512/K       2518/K       2526/K       2538/K       2550/K       2558/K       2566/K
      2574/K       2582/K       2590/K       2600/K       2606/K       2614/K       2620/K       2630/K
      2642/K       2654/K       2666/K       2678/K       2690/K       2702/K       2714/K       2726/K
      2738/K       2750/K       2762/K       2768/K       2774/K       2779/K       2785/K       2791/K
      2797/K       2809/K       2819/K       2829/K       2839/K       2850/K       2856/K       2862/K
      2874/K       2882/K       2887/DATA    2891/K       2895/K       2899/K       2903/DATA    2915/K
      2919/K       2927/K       2935/K       2955/K       2964/K       2972/K       2977/K       2982/K
      2990/K       2998/K       3010/K       3022/K       3034/K       3058/K       3070/K       3082/K
      3090/K       3098/K       3112/K       3120/K       3128/K       3136/K       3144/K       3152/K
      3160/K       3168/K       3180/K       3192/K       3204/K       3228/K       3238/K       3246/K
      3254/K       3262/K       3270/K       3278/K       3286/K       3294/K       3302/K       3308/K
      3316/K       3324/K       3336/K       3348/K       3360/K       3372/K       3383/K       3393/K
      3401/K       3409/K       3417/K       3425/K       3433/K       3441/K       3449/K       3459/K
      3469/K       3479/K       3492/K       3500/K       3508/K       3516/K       3524/K       3533/K
      3541/K       3551/K       3561/K       3571/K       3581/K       3597/K       3611/K       3627/K
      3642/K       3657/K       3673/K       3688/K       3703/K       3718/K       3733/K       3748/K
      3762/K       3773/K       3791/K       3802/K       3811/K       3816/K       3825/K       3834/K
      3842/K       3850/K       3858/K       3866/K       3874/K       3882/K       3890/K       3898/K
      3907/K       3914/K       3920/K       3932/K       3944/K       3956/K       3969/K       3980/K
      3991/K       4002/K       4013/K       4020/K       4031/K       4042/K       4053/K       4067/K
      4081/K       4096/K       4110/K       4124/K       4143/K       4149/K       4166/K       4174/K
      4180/K       4206/K       4214/K       4222/K       4230/K       4238/K       4246/K       4252/K
      4258/K       4264/K       4365/K       4373/K       4406/K       4427/K       4435/K       4485/K
      4491/K       4497/K       4503/K       4509/K       4515/K       4521/K       4528/K       4534/K
      4540/K       4546/DATA    4551/DATA    4555/DATA    4560/DATA    4564/DATA    4568/DATA    4574/DATA
      4580/DATA    4585/DATA    4590/DATA    4594/DATA    4599/DATA    4628/K       4634/K       4640/K
      4648/K       4654/K       4660/K       4666/K       4672/K       4680/K       4686/K       4692/K
      4698/K       4704/K       4710/K       4716/K       4722/K       4728/K       4734/K       4740/K
      4746/K       4752/K       4758/K       4764/K       4770/K       4776/K       4782/K       4788/K
      4794/K       4800/K       4810/K       4820/K       4830/K       4840/K       4850/K       4860/K
      4876/DATA    4882/DATA    4888/DATA    4894/DATA    4912/DATA    4928/DATA    4948/DATA    4958/DATA
      4979/K       4985/K       4991/K       4997/K       5003/K       5009/K       5015/K       5021/K
      5027/K       5033/K       5039/K       5045/K       5051/K       5057/K       5063/K       5069/DATA
      5073/DATA    5082/DATA    5088/DATA    5093/DATA    5099/DATA    5104/DATA    5109/DATA    5114/DATA
      5119/DATA    5124/DATA    5129/DATA    5134/DATA    5139/DATA    5144/DATA    5149/DATA    5154/DATA
      5159/DATA    5166/DATA    5171/DATA    5176/DATA    5181/DATA    5186/DATA    5191/DATA    5196/DATA
      5201/DATA    5206/DATA    5211/DATA    5216/DATA    5221/DATA    5226/DATA    5231/DATA    5236/DATA
      5241/DATA    5248/K       5602/DATA    5607/DATA    5613/K       5629/K       5634/K       7764/B
      7789/B
   SETRPLY          880-LW      7836/END
   SF                45/OPEN      46-CNAME
   SF001           4977-DATA
   SF002           4983-DATA
   SF003           4989-DATA
   SF004           4995-DATA
   SF005           5001-DATA
   SF006           5007-DATA
   SF007           5013-DATA
   SF008           5019-DATA
   SF009           5025-DATA
   SF01            5252-DATA
   SF010           5031-DATA
   SF011           5037-DATA
   SF012           5043-DATA
   SF013           5049-DATA
   SF014           5055-DATA
   SF015           5061-DATA
   SF016           5067-DATA
   SF017           5071-DATA
   SF018           5080-DATA
   SF019           5086-DATA
   SF02            5264-DATA
   SF020           5091-DATA
   SF021           5097-DATA
   SF022           5102-DATA
   SF023           5107-DATA
   SF024           5112-DATA
   SF025           5117-DATA
   SF026           5122-DATA
   SF027           5127-DATA
   SF028           5132-DATA
   SF029           5137-DATA
   SF03            5276-DATA
   SF030           5142-DATA
   SF031           5147-DATA
   SF032           5152-DATA
   SF033           5157-DATA
   SF034           5164-DATA
   SF035           5169-DATA
   SF036           5174-DATA
   SF037           5179-DATA
   SF038           5184-DATA
   SF039           5189-DATA
   SF04            5288-DATA
   SF040           5194-DATA
   SF041           5199-DATA
   SF042           5204-DATA
   SF043           5209-DATA
   SF044           5214-DATA
   SF045           5219-DATA
   SF046           5224-DATA
   SF047           5229-DATA
   SF048           5234-DATA
   SF049           5239-DATA
   SF05            5300-DATA
   SF050           5246-DATA
   SF06            5312-DATA
   SF07            5324-DATA
   SF08            5336-DATA
   SF09            5348-DATA
   SF10            5360-DATA
   SF11            5372-DATA
   SF12            5384-DATA
   SF13            5396-DATA
   SF14            5408-DATA
   SF15            5420-DATA
   SF16            5432-DATA
   SF17            5444-DATA
   SF18            5456-DATA
   SF19            5468-DATA
   SF20            5480-DATA
   SF21            5492-DATA
   SF22            5504-DATA
   SF23            5516-DATA
   SHORT            484-STW      524/BCS
   SHORTER          513/BE       516-STD
   SHRTL           1137/P       1151-J
   SH01            4409-DATA
   SH02            4417-DATA
   SH03            4425-DATA
   SIX              555/EOR     1053-DATA
   SIXCR           1134/P       1145-J
   SI9CL1           672-LW      5531/K
   SI9CL2           679-LW      5535/K
   SI9CL3           686-LW      5539/K
   SI9CL4           693-LW      5543/K       5548/K       5556/K
   SI9NAO           637-LW      1347/K       1355/K       2476/K       2803/K       2911/K       5624/K
      5640/K       5647/DATA    5656/DATA    5661/DATA    5666/DATA    5671/DATA    5676/DATA    5681/DATA
      5686/DATA    5691/DATA    5696/DATA    6766/K
   SKIP6            809/BIR      813-LW
   SL               185/XPSD     236-PZE      649/STW     1027/PZE
   SLAD             648/EOR     1027-PZE
   SLRET            240-XPSD
   SLSW             648-EOR
   SLTR             185-XPSD
   SO14A           4566-DATA
   SO15A           4572-DATA
   SPACE           1073-TEXT    1157/J       1161/J       1165/J       1169/J
   SPDA             579/LW       582/STW      587/LW*      591/MTW     7781/STW     7805-DATA
   SPD1            1177-DATA    7654/K       7782/STW     7784/STW
   SPT              411/BAL     7736-LCI
   SPTERR          7742/BNE     7744/BNE     7748-LW
   SPTERR01        7748/LW      7753-DATA
   SPTERR02        7753/DATA    7809-GEN
   SPTMSG          7809/GEN     7809/GEN     7828-DATA
   SPTMSGA         7809/GEN     7833-EQU
   SPT01           7745-LCI     7750/B
   SPUR            1277/XPSD    1279-PZE
   SPURTRAP        1086/DATA    1277-XPSD
   SPURW            160/DATA    1289-WAIT
   SSWAIT           889-WAIT
   STB01           3284-DATA
   STB02           3292-DATA
   STB03           3300-DATA
   STB04           3306-DATA
   STB05           3314-DATA
   STCF              45/OPEN      49-CNAME
   STCF01          3391-DATA
   STCF02          3399-DATA
   STCF03          3407-DATA
   STCF04          3415-DATA
   STD01           3322-DATA
   STD02           3334-DATA
   STD03           3346-DATA
   STD04           3358-DATA
   STH01           3236-DATA
   STH02           3244-DATA
   STH03           3252-DATA
   STH04           3260-DATA
   STH05           3268-DATA
   STH06           3276-DATA
   STORE            418/LW       429/LW      1044-STW
   STRMG1           740/LW      1045-STW
   STRWD            763/STW      792-STW      795/LW
   STS01           3370-DATA
   STS02           3381-DATA
   STW01           1712-DATA
   STW02           1720-DATA
   SW01            2369-DATA
   SW02            2377-DATA
   SW03            2381-DATA
   SW04            2389-DATA
   SW05            2395-DATA
   SW06            2403-DATA
   S001            4483-DATA
   S002            4489-DATA
   S003            4495-DATA
   S004            4501-DATA
   S005            4507-DATA
   S006            4513-DATA
   S007            4519-DATA
   S008            4526-DATA
   S009            4532-DATA
   S01             4602-DATA
   S010            4538-DATA
   S011            4544-DATA
   S012            4549-DATA
   S013            4553-DATA
   S014            4558-DATA
   S015            4562-DATA
   S016            4578-DATA
   S017            4583-DATA
   S018            4588-DATA
   S019            4592-DATA
   S02             4608-DATA
   S020            4597-DATA
   S03             4614-DATA
   S04             4620-DATA
   S05             4626-DATA
   S06             4632-DATA
   S07             4638-DATA
   S08             4646-DATA
   S09             4652-DATA
   S10             4658-DATA
   S11             4664-DATA
   S12             4670-DATA
   S13             4678-DATA
   S14             4684-DATA
   S15             4690-DATA
   S16             4696-DATA
   S17             4702-DATA
   S18             4708-DATA
   S19             4714-DATA
   S20             4720-DATA
   S21             4726-DATA
   S22             4732-DATA
   S23             4738-DATA
   S24             4744-DATA
   S25             4750-DATA
   S26             4756-DATA
   S27             4762-DATA
   S28             4768-DATA
   S29             4774-DATA
   S30             4780-DATA
   S31             4786-DATA
   S32             4792-DATA
   S33             4798-DATA
   S34             4808-DATA
   S35             4818-DATA
   S36             4828-DATA
   S37             4838-DATA
   S38             4848-DATA
   S39             4858-DATA
   S40             4868-DATA
   S41             4874-DATA
   S42             4880-DATA
   S43             4886-DATA
   S44             4892-DATA
   S45             4898-DATA
   S46             4904-DATA
   S47             4910-DATA
   S48             4916-DATA
   S49             4926-DATA
   S50             4936-DATA
   S51             4946-DATA
   S52             4956-DATA
   S53             4966-DATA
   TABLE            421/STW      434/STW      440/LW       444/LW       452/LW       456/LW       459/LW
       464/LW       465/LW       468/LW       469/LW       472/LW       473/LW       477/LW       478/LW
       486/LW       487/LW       488/LW       493/LW       505/LW       538/LW       540/LW       553/LW
       561/LW       565/LW       567/LW       599/LW       600/LW       606/LW       610/LW       614/LW
       703/STCF    1044/STW     1222-RES     1814/XPSD    7698/LW
   TEMP             834/STW      837/LW      1075-DATA
   TEST             529/STW      532/STW      534/STW      535/STW      537/LW       552/LW       556/LW
       560/LW       564/LW       598/LW       605/LW      1242-RES     1270/EQU     1271/EQU     1272/EQU
   TESTDATA        7738/LW      7739/LW      7741/CW      7743/CW      7751-DATA
   TESTIO           724-AIO      727/BCR      732/BEZ
   TITLE           1135/P       1147-J
   TO               432/STW      434-STW
   TOP              838/AND     1076-DATA
   TSTDVC           713/BCS      715-BIR
   TTL             1145/J       1147/J       1167/J       1183-DATA
   TYPE             382/LW       386/STW      725/TIO*     807/LW       830/TDV*     857/SIO*     866/TIO*
      1079-DATA    1288/LW      1298/STW
   UII              184/XPSD     229-PZE      645/STW      967/XPSD    1028/PZE
   UIIAD            644/EOR     1028-PZE
   UIIRET           233-XPSD    5703/K
   UIISW            644-EOR      665/BCR     5702/K
   UIITR            184-XPSD     899/STW      909/STW
   WDTR             189/XPSD     267-PZE     1029/PZE
   WDTRAD          1029-PZE
   WDTRET           271-XPSD
   WDTRTR           189-XPSD
   WKO              767/STW      788/EOR     1261-PZE
   WORD             748/STW      775/AND     1262-PZE
   WORDS            761-STW      799/BIR
   XP                68-SET       70/ORG
   XPSD             441/LW       545/LW      1266-EQU
   XPSDID           543/LW      1063-I
   XRTC             931-B
   XW01            3423-DATA
   XW02            3431-DATA
   XW03            3439-DATA
   XW04            3447-DATA
   Y               1269-EQU
   ZERO             391/LW       392/LW       410/LW       447/LW       616/LW       621/LW       771/LW
       890/LW      1263-EQU     1273/EQU     1274/EQU     7701/LW      7724/LW      7763/LW
   ZIOA             939/STW      941-DATA     957/SIO*
   ZIOAIN            95/DATA     100/DATA     937-B
   ZR               620/BCS      718-LW
   2Q3             1050-DATA
   6Q3              721/LW       730/AND      731/EOR      862/AND      863/EOR      871/AND      872/EOR
      1049-GEN
