* 
********************************************************************
*  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
* 
* 
********************************************************************
* 
* 
* 
********************************************************************
*  TABLES FOR DBLE TESTS
********************************************************************
* 
DBHED DEC 9         NR. OF TABLE ENTRIES. EACH ENTRY
*                                   CONSISTS OF 5 WORDS.
*  WORD 1 - 1ST WORD OF INPUT 
*  WORD 2 - 2ND WORD OF INPUT 
*  WORD 3 - 1ST WORD OF EXPECTED OUTPUT 
*  WORD 4 - 2ND WORD OF EXPECTED OUTPUT 
*  WORD 5 - 3RD WORD OF EXPECTED OUTPUT 
* 
* 
DBBAS EQU * 
      OCT 077777    0.1701412E+39 
      OCT 177776      UPPER BOUNDARY-OUTER RANGE
* 
      OCT 077777    0.170141163178E+39
      OCT 177400
      OCT 000376
* 
* 
      OCT 100000    -0.1701412E+39
      OCT 000376      LOWER BOUNDARY-OUTER RANGE
* 
      OCT 100000    -0.170141183460E+39 
      OCT 0 
      OCT 000376
* 
* 
      OCT 040000    0.1469368E-38 
      OCT 1           UPPER BOUNDARY-INNER RANGE
* 
      OCT 040000    0.146936793853E-38
      OCT 0 
      OCT 1 
* 
* 
      OCT 137777    -0.1469369E-38
      OCT 176401      LOWER BOUNDARY-INNER RANGE
* 
      OCT 137777    -0.146936898950E-38 
      OCT 176400
      OCT 1 
* 
* 
      OCT 076612    0.9046138E+19 
      OCT 053576
* 
      OCT 076612    0.904613845903E+19
      OCT 053400
      OCT 000176
* 
* 
      OCT 057302    0.7403148E+00 
      OCT 121400
* 
      OCT 057302    0.740314841270E+00
      OCT 121400
      OCT 0 
* 
* 
      OCT 040762    0.1117218E-18 
      OCT 166205
* 
      OCT 040762    0.111721805266E-18
      OCT 166000
      OCT 000205
* 
* 
      OCT 115330    -0.2091832E-22
      OCT 060153
* 
      OCT 115330    -0.209183192871E-22 
      OCT 060000
      OCT 000153
* 
* 
      OCT 131524    -0.2209911E+20
      OCT 006202
* 
      OCT 131524    -0.220991105949E+20 
      OCT 006000
      OCT 000202
* 
* 
* 
********************************************************************
* 
* 
* 
********************************************************************
*  TABLE FOR SNGL TESTS 
********************************************************************
* 
* 
SGHED DEC 18        NR. OF ENTRIES. 
*                                   EACH ENTRY CONSISTS OF 5 WORDS. 
* 
*  FIRST 3 WORDS  - INPUT 
*  SECOND 2 WORDS - OUTPUT
* 
SGBAS EQU * 
      OCT 054173    +0.287135603715E+35 
      OCT 000526
      OCT 106346
* 
      OCT 054173    +0.2871356E+35
      OCT 000746
* 
* 
      OCT 056172    +0.447201649260E+27 
      OCT 124176
      OCT 170262
* 
      OCT 056172    +0.4472016E+27
      OCT 124262
* 
* 
      OCT 060557    +0.214263410162E+15 
      OCT 105471
      OCT 136540
* 
      OCT 060557    +0.2142634E+15
      OCT 105540
* 
* 
      OCT 046047    +0.998174653012E+07 
      OCT 114503
      OCT 155460
* 
      OCT 046047    +0.9981746E+07
      OCT 114460
* 
* 
      OCT 041443    +0.209814274109E+01 
      OCT 176076
      OCT 165004
* 
      OCT 041443    +0.2008143E+01
      OCT 176004
* 
* 
      OCT 061147    +0.187692645130E-03 
      OCT 127056
      OCT 023351
* 
      OCT 061147    +0.1876926E-03
      OCT 127351
* 
* 
      OCT 053416    +0.791765024518E-10 
      OCT 032105
      OCT 060677
* 
      OCT 053416    +0.7917650E-10
      OCT 032277
* 
* 
      OCT 073326    +0.100659253781E-18 
      OCT 062211
      OCT 043603
* 
      OCT 073326    +0.1006593E-18
      OCT 062603
* 
* 
      OCT 047131    +0.791117549280E-26 
      OCT 033165
      OCT 011525
* 
      OCT 047131    +0.7911175E-26
      OCT 033125
* 
* 
      OCT 076101    +0.912876403313E-37 
      OCT 014640
      OCT 110413
* 
      OCT 076101    +0.9128764E-37
      OCT 015013
* 
* 
      OCT 123006    -0.222764026459E+30 
      OCT 136521
      OCT 001304
* 
      OCT 123006    -0.2227640E+30
      OCT 136704
* 
* 
      OCT 135273    -0.623901549812E+18 
      OCT 123304
      OCT 122570
* 
      OCT 135273    -0.6239015E+18
      OCT 123570
* 
* 
      OCT 116745    -0.200918547392E+06 
      OCT 027173
      OCT 142044
* 
      OCT 116745    -0.2009186E+06
      OCT 027044
* 
* 
      OCT 103050    -0.111893657122E-37 
      OCT 114715
      OCT 057405
* 
      OCT 103050    -0.1118937E-37
      OCT 115005
* 
* 
      OCT 125123    -0.211198476202E-29 
      OCT 162564
      OCT 107075
* 
      OCT 125123    -0.2111985E-29
      OCT 162475
* 
* 
      OCT 137263    -0.432109685454E-21 
      OCT 110363
      OCT 136565
* 
      OCT 137263    -0.4321097E-21
      OCT 110565
* 
* 
      OCT 123016    -0.998563210089E-14 
      OCT 131465
      OCT 001245
* 
      OCT 123016    -0.9985632E-14
      OCT 131645
* 
* 
      OCT 115506    -0.600354780987E-05 
      OCT 172540
      OCT 004737
* 
      OCT 115506    -0.6003548E-05
      OCT 172737
* 
* 
* 
********************************************************************
* 
* 
* 
********************************************************************
*  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
* 
* 
                                                                                                                                            