* 
* 
********************************************************************
*  SPECIAL TEST TABLE XMPY TEST 
********************************************************************
* 
MLHD1 EQU * 
      DEC 4 
* 
MLBS1 EQU * 
      OCT 073017    +0.170141183461E+20 
      OCT 022476      UPPER BOUNDARY-OUTER RANGE
      OCT 156600
* 
      OCT 042543    +0.999999999999E+19 
      OCT 110602
      OCT 042600
* 
      OCT 077777    +0.170141183460E+39 
      OCT 177777
      OCT 177776
* 
* 
      OCT 104760    -0.170141183461E+20 
      OCT 155301      LOWER BOUNDARY-OUTER RANGE
      OCT 021600
* 
      OCT 042543    +0.999999999999E+19 
      OCT 110602
      OCT 042600
* 
      OCT 100000    -0.170141183460E+39 
      OCT 0 
      OCT 000376
* 
* 
      OCT 067405    +0.146936793852E-20 
      OCT 132635      UPPER BOUNDARY-INNER RANGE
      OCT 034167
* 
      OCT 044711    +0.100000000000E-17 
      OCT 073507
      OCT 044613
* 
      OCT 0         0.00E00 
      OCT 0 
      OCT 0 
* 
* 
      OCT 067405    +0.146936793853E-20 
      OCT 132635      LOWER BOUNDARY-INNER RANGE
      OCT 035567
* 
      OCT 133066    -0.100000000000E-17 
      OCT 104270
      OCT 133613
* 
      OCT 0         0.00E00 
      OCT 0 
      OCT 0 
* 
* 
********************************************************************
* 
* 
* 
* 
* 
********************************************************************
*  SPECIAL TEST TABLE XDIV TEST 
********************************************************************
* 
* 
DVHD1 EQU * 
      DEC 6 
* 
DVBS1 EQU * 
      OCT 073017    +0.170141183461E+20 
      OCT 022476      UPPER BOUNDARY-OUTER RANGE
      OCT 156600
* 
      OCT 045616    +0.999999999999E-21 
      OCT 150050
      OCT 035167
* 
      OCT 077777    +0.170141183460E+39 
      OCT 177777
      OCT 177776
* 
* 
      OCT 104760    -0.170141183461E+20 
      OCT 155301      LOWER BOUNDARY-OUTER RANGE
      OCT 021600
* 
      OCT 045616    +0.999999999999E-21 
      OCT 150050
      OCT 035167
* 
      OCT 100000    -0.170141183460E+39 
      OCT 0 
      OCT 000376
* 
* 
      OCT 067405    +0.146936793852E-20 
      OCT 132635      UPPER BOUNDARY-INNER RANGE
      OCT 034167
* 
      OCT 067405    +0.999999999999E+18 
      OCT 132635
      OCT 035570
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
* 
      OCT 110372    -0.146936793852E-20 
      OCT 045142      LOWER BOUNDARY-INNER RANGE
      OCT 144167
* 
      OCT 067405    +0.999999999999E+18 
      OCT 132635
      OCT 035570
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
* 
      OCT 073017    +0.170141183466E+20 
      OCT 022476      DIVIDE BY 0 
      OCT 166200
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
      OCT 077777    +0.170141183460E+39 
      OCT 177777
      OCT 177776
* 
* 
      OCT 104760    -0.170141183466E+20 
      OCT 155301      DIVIDE BY 0 
      OCT 012200
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
      OCT 100000    -0.170141183460E+39 
      OCT 0 
      OCT 000376
* 
* 
* 
* 
********************************************************************
*  TABLE FOR XADD TEST
********************************************************************
* 
ADHED DEC 18        NR. OF ENTRIES. EACH ENTRY
*                                   CONSISTS OF 9 WORDS.
* 
*  1ST WORD - 1ST WORD OF 1ST OPERAND 
*  2ND WORD - 2ND WORD OF 1ST OPERAND 
*  3RD WORD - 3RD WORD OF 1ST OPERAND 
* 
*  4TH WORD - 1ST WORD OF 2ND OPERAND 
*  5TH WORD - 2ND WORD OF 2ND OPERAND 
*  6TH WORD - 3RD WORD OF 2ND OPERAND 
* 
*  7TH WORD - 1ST WORD OF RESULT
*  8TH WORD - 2ND WORD OF RESULT
*  9TH WORD - 3RD WORD OF RESULT
* 
ADBAS EQU * 
      OCT 072423    0.389056288128E+38
      OCT 147144
      OCT 010772
* 
      OCT 0         0.00E+00
      OCT 0 
      OCT 0 
* 
      OCT 072423    0.380056288128E+38
      OCT 147144
      OCT 010772
* 
* 
      OCT 045526    0.100141183460E+39
      OCT 076612
      OCT 022776
* 
      OCT 132251    -0.100141183460E+39 
      OCT 101165
      OCT 155776
* 
      OCT 0         0.00E+00
      OCT 0 
      OCT 0 
* 
* 
      OCT 074151    0.298123765034E+30
      OCT 043132
      OCT 137704
* 
      OCT 046764    0.772036481090E+30
      OCT 126337
      OCT 167710
* 
      OCT 066016    0.107016024612E+31
      OCT 177166
      OCT 117710
* 
* 
      OCT 066352    0.200912867305E+22
      OCT 041353
      OCT 051216
* 
      OCT 066217    0.100128749347E+22
      OCT 047614
      OCT 103214
* 
      OCT 050630    0.301041616652E+22
      OCT 172530
      OCT 145620
* 
* 
      OCT 046602    0.213054823012E+14
      OCT 043321
      OCT 036132
* 
      OCT 043116    0.773023549017E+14
      OCT 055547
      OCT 075536
* 
      OCT 054656    0.986078372029E+14
      OCT 166433
      OCT 145136
* 
* 
      OCT 065712    0.220756933711E+06
      OCT 116740
      OCT 173044
* 
      OCT 057141    0.386579030127E+06
      OCT 030173
      OCT 063446
* 
      OCT 045043    0.607335963838E+06
      OCT 037665
      OCT 170450
* 
* 
      OCT 044776    0.289045238812E+00
      OCT 157147
      OCT 141777
* 
      OCT 052642    0.669023651899E+00
      OCT 110450
      OCT 112000
* 
      OCT 075242    0.958068890712E+00
      OCT 000134
      OCT 073000
* 
* 
      OCT 113621    -0.330954612881E+32 
      OCT 131403
      OCT 143322
* 
      OCT 135020    -0.443266128566E+32 
      OCT 117647
      OCT 031324
* 
      OCT 102731    -0.774220741446E+32 
      OCT 074451
      OCT 012724
* 
* 
      OCT 104621    -0.559274621027E+24 
      OCT 124573
      OCT 125636
* 
      OCT 134546    -0.333392230092E+24 
      OCT 142537
      OCT 137636
* 
      OCT 120574    -0.892666851119E+24 
      OCT 033555
      OCT 132640
* 
* 
      OCT 130355    -0.556432098326E+16 
      OCT 017101
      OCT 100552
* 
      OCT 125166    -0.300954281811E+16 
      OCT 130653
      OCT 017550
* 
      OCT 103050    -0.857386380138E+16 
      OCT 073427
      OCT 010152
* 
* 
      OCT 132014    -0.398201765439E+08 
      OCT 106756
      OCT 114064
* 
      OCT 125400    -0.222815023671E+08 
      OCT 134150
      OCT 101062
* 
      OCT 104614    -0.621016789110E+08 
      OCT 165042
      OCT 154464
* 
* 
      OCT 040030    +0.530193762998E-22 
      OCT 131703
      OCT 005557
* 
      OCT 051064    +0.339991276308E-22 
      OCT 070321
      OCT 106555
* 
      OCT 064462    +0.870185039307E-22 
      OCT 166053
      OCT 151157
* 
* 
      OCT 043026    +0.778120659375E-14 
      OCT 036646
      OCT 157245
* 
      OCT 050071    +0.111332091996E-14 
      OCT 022545
      OCT 124237
* 
      OCT 050035    +0.889452751371E-14 
      OCT 061123
      OCT 111645
* 
* 
      OCT 075774    +0.923761080010E-06 
      OCT 030143
      OCT 155731
* 
      OCT 042047    +0.991776928998E-09 
      OCT 103065
      OCT 033707
* 
      OCT 076036    +0.924752856939E-06 
      OCT 042046
      OCT 173331
* 
* 
      OCT 131214    -0.391022576801E-26 
      OCT 146301
      OCT 152523
* 
      OCT 123204    -0.225889001134E-26 
      OCT 021076
      OCT 142121
* 
      OCT 102716    -0.616911577934E-26 
      OCT 156741
      OCT 033523
* 
* 
      OCT 123541    -0.600519744432E-18 
      OCT 000547
      OCT 174611
* 
      OCT 113413    -0.711198003215E-18 
      OCT 131367
      OCT 166211
* 
      OCT 117466    -0.131171774765E-17 
      OCT 055057
      OCT 171213
* 
* 
      OCT 111035    -0.499701254438E-10 
      OCT 050771
      OCT 033675
* 
      OCT 134377    -0.322876411235E-10 
      OCT 126206
      OCT 163675
* 
      OCT 122616    -0.822577665673E-10 
      OCT 077500
      OCT 007677
* 
* 
      OCT 100734    -0.769881020151E-02 
      OCT 154575
      OCT 155363
* 
      OCT 133440    -0.111198022357E-02 
      OCT 010516
      OCT 052357
* 
      OCT 133722    -0.881079042509E-02 
      OCT 067350
      OCT 133765
* 
* 
********************************************************************
* 
* 
* 
********************************************************************
*  TEST TABLE FOR XSUB TEST 
********************************************************************
* 
SBHED DEC 7         NR. OF ENTRIES. EACH ENTRY
*                                   CONSISTS OF 9 WORDS 
* 
SBBAS EQU * 
      OCT 077777    +0.170141183460E+39 
      OCT 177777
      OCT 177776
* 
      OCT 077777    +0.170141183460E+39 
      OCT 177777
      OCT 177776
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
* 
      OCT 040000    +0.146936793854E-38 
      OCT 0 
      OCT 001001
* 
      OCT 040000    +0.146936793854E-38 
      OCT 0 
      OCT 001001
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
* 
      OCT 051245    +0.999127650234E+26 
      OCT 054730
      OCT 045256
* 
      OCT 044756    +0.111723012883E+26 
      OCT 116524
      OCT 152650
* 
      OCT 044547    +0.887404637351E+26 
      OCT 103055
      OCT 127656
* 
* 
      OCT 054207    +0.398701183404E+18 
      OCT 104722
      OCT 102566
* 
      OCT 107115    -0.512054382698E+18 
      OCT 012007
      OCT 154566
* 
      OCT 062435    +0.910755566102E+18 
      OCT 035345
      OCT 053170
* 
* 
      OCT 043026    +0.778120659375E-14 
      OCT 036646
      OCT 157245
* 
      OCT 050071    +0.111332091996E-14 
      OCT 022545
      OCT 124237
* 
      OCT 074036    +0.666788567379E-14 
      OCT 030764
      OCT 051243
* 
* 
      OCT 042047    +0.991776928998E-09 
      OCT 103065
      OCT 033707
* 
      OCT 100412    -0.923761080009E-09 
      OCT 005743
      OCT 075305
* 
      OCT 040721    +0.191553800901E-08 
      OCT 040041
      OCT 136711
* 
* 
      OCT 107005    -0.351227790163E-30 
      OCT 021403
      OCT 141067
* 
      OCT 132331    -0.231579889015E-30 
      OCT 014163
      OCT 140467
* 
      OCT 131130    -0.119647901148E-30 
      OCT 012440
      OCT 001065
* 
* 
********************************************************************
* 
* 
* 
* 
* 
********************************************************************
*  TABLE FOR XMPY TESTS 
********************************************************************
MLHED DEC 18        NR. OF ENTRIES. EACH ENTRY
* 
*                                   CONSISTS OF 9 WORDS.
* 
*  FIRST 3 WORDS  - 1ST OPEAND
*  SECOND 3 WORDS - 2ND OPEAND
*  LAST 3 WORDS   - EXPECTED OUTPUT 
* 
MLBAS EQU * 
      OCT 070130    +0.259048713216E+21 
      OCT 027501
      OCT 057210
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
* 
      OCT 104305    -0.671190053874E+17 
      OCT 147543
      OCT 015160
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
      OCT 0         +0.00E+00 
      OCT 0 
      OCT 0 
* 
* 
      OCT 123061    -0.444697001151E+30 
      OCT 132061
      OCT 165706
* 
      OCT 132376    -0.300015997644E+03 
      OCT 174745
      OCT 002422
* 
      OCT 064477    +0.133416214449E+33 
      OCT 030237
      OCT 161726
* 
* 
      OCT 051200    +0.510669117427E+29 
      OCT 143630
      OCT 053700
* 
      OCT 047776    +0.199987005543E+02 
      OCT 125533
      OCT 126412
* 
      OCT 063437    +0.102127187617E+31 
      OCT 041136
      OCT 071710
* 
* 
      OCT 054441    +0.980022398709E+14 
      OCT 166261
      OCT 154136
* 
      OCT 055553    +0.599117266542E+07 
      OCT 002252
      OCT 054456
* 
      OCT 077521    +0.587148340664E+21 
      OCT 043703
      OCT 172612
* 
* 
      OCT 041726    +0.444590012834E+07 
      OCT 146040
      OCT 155456
* 
      OCT 043316    +0.290016541196E+06 
      OCT 004250
      OCT 136446
* 
      OCT 045415    +0.128938457772E+13 
      OCT 051722
      OCT 127522
* 
* 
      OCT 077600    +0.510008296672E+03 
      OCT 103756
      OCT 142022
* 
      OCT 075775    +0.154988760012E+02 
      OCT 131263
      OCT 067410
* 
      OCT 075602    +0.790455534971E+04 
      OCT 034255
      OCT 114032
* 
* 
      OCT 060463    +0.221008901154E-10 
      OCT 061737
      OCT 005273
* 
      OCT 053346    +0.434501999876E+02 
      OCT 100234
      OCT 157414
* 
      OCT 040775    +0.960288095417E-09 
      OCT 110433
      OCT 151707
* 
* 
      OCT 061000    +0.340011987202E-15 
      OCT 072331
      OCT 035233
* 
      OCT 050777    +0.200192506734E-01 
      OCT 132256
      OCT 166367
* 
      OCT 076620    +0.680678520374E-17 
      OCT 021141
      OCT 121217
* 
* 
      OCT 064022    +0.550960071891E-20 
      OCT 145524
      OCT 113173
* 
      OCT 072360    +0.697011278004E-05 
      OCT 064014
      OCT 067737
* 
      OCT 057424    +0.384025383838E-25 
      OCT 100033
      OCT 044131
* 
                