1------------------------------------------------------------------------
2-- or.decTest -- digitwise logical OR                                 --
3-- Copyright (c) IBM Corporation, 1981, 2008.  All rights reserved.   --
4------------------------------------------------------------------------
5-- Please see the document "General Decimal Arithmetic Testcases"     --
6-- at http://www2.hursley.ibm.com/decimal for the description of      --
7-- these testcases.                                                   --
8--                                                                    --
9-- These testcases are experimental ('beta' versions), and they       --
10-- may contain errors.  They are offered on an as-is basis.  In       --
11-- particular, achieving the same results as the tests here is not    --
12-- a guarantee that an implementation complies with any Standard      --
13-- or specification.  The tests are not exhaustive.                   --
14--                                                                    --
15-- Please send comments, suggestions, and corrections to the author:  --
16--   Mike Cowlishaw, IBM Fellow                                       --
17--   IBM UK, PO Box 31, Birmingham Road, Warwick CV34 5JL, UK         --
18--   mfc@uk.ibm.com                                                   --
19------------------------------------------------------------------------
20version: 2.59
21
22extended:    1
23precision:   9
24rounding:    half_up
25maxExponent: 999
26minExponent: -999
27
28-- Sanity check (truth table)
29orx001 or             0    0 ->    0
30orx002 or             0    1 ->    1
31orx003 or             1    0 ->    1
32orx004 or             1    1 ->    1
33orx005 or          1100 1010 -> 1110
34-- and at msd and msd-1
35orx006 or 000000000 000000000 ->           0
36orx007 or 000000000 100000000 ->   100000000
37orx008 or 100000000 000000000 ->   100000000
38orx009 or 100000000 100000000 ->   100000000
39orx010 or 000000000 000000000 ->           0
40orx011 or 000000000 010000000 ->    10000000
41orx012 or 010000000 000000000 ->    10000000
42orx013 or 010000000 010000000 ->    10000000
43
44-- Various lengths
45--        123456789     123456789      123456789
46orx021 or 111111111     111111111  ->  111111111
47orx022 or 111111111111  111111111  ->  111111111
48orx023 or  11111111      11111111  ->   11111111
49orx025 or   1111111       1111111  ->    1111111
50orx026 or    111111        111111  ->     111111
51orx027 or     11111         11111  ->      11111
52orx028 or      1111          1111  ->       1111
53orx029 or       111           111  ->        111
54orx031 or        11            11  ->         11
55orx032 or         1             1  ->          1
56orx033 or 111111111111 1111111111  ->  111111111
57orx034 or 11111111111 11111111111  ->  111111111
58orx035 or 1111111111 111111111111  ->  111111111
59orx036 or 111111111 1111111111111  ->  111111111
60
61orx040 or 111111111  111111111111  ->  111111111
62orx041 or  11111111  111111111111  ->  111111111
63orx042 or  11111111     111111111  ->  111111111
64orx043 or   1111111     100000010  ->  101111111
65orx044 or    111111     100000100  ->  100111111
66orx045 or     11111     100001000  ->  100011111
67orx046 or      1111     100010000  ->  100011111
68orx047 or       111     100100000  ->  100100111
69orx048 or        11     101000000  ->  101000011
70orx049 or         1     110000000  ->  110000001
71
72orx050 or 1111111111  1  ->  111111111
73orx051 or  111111111  1  ->  111111111
74orx052 or   11111111  1  ->  11111111
75orx053 or    1111111  1  ->  1111111
76orx054 or     111111  1  ->  111111
77orx055 or      11111  1  ->  11111
78orx056 or       1111  1  ->  1111
79orx057 or        111  1  ->  111
80orx058 or         11  1  ->  11
81orx059 or          1  1  ->  1
82
83orx060 or 1111111111  0  ->  111111111
84orx061 or  111111111  0  ->  111111111
85orx062 or   11111111  0  ->  11111111
86orx063 or    1111111  0  ->  1111111
87orx064 or     111111  0  ->  111111
88orx065 or      11111  0  ->  11111
89orx066 or       1111  0  ->  1111
90orx067 or        111  0  ->  111
91orx068 or         11  0  ->  11
92orx069 or          1  0  ->  1
93
94orx070 or 1  1111111111  ->  111111111
95orx071 or 1   111111111  ->  111111111
96orx072 or 1    11111111  ->  11111111
97orx073 or 1     1111111  ->  1111111
98orx074 or 1      111111  ->  111111
99orx075 or 1       11111  ->  11111
100orx076 or 1        1111  ->  1111
101orx077 or 1         111  ->  111
102orx078 or 1          11  ->  11
103orx079 or 1           1  ->  1
104
105orx080 or 0  1111111111  ->  111111111
106orx081 or 0   111111111  ->  111111111
107orx082 or 0    11111111  ->  11111111
108orx083 or 0     1111111  ->  1111111
109orx084 or 0      111111  ->  111111
110orx085 or 0       11111  ->  11111
111orx086 or 0        1111  ->  1111
112orx087 or 0         111  ->  111
113orx088 or 0          11  ->  11
114orx089 or 0           1  ->  1
115
116orx090 or 011111111  111101111  ->  111111111
117orx091 or 101111111  111101111  ->  111111111
118orx092 or 110111111  111101111  ->  111111111
119orx093 or 111011111  111101111  ->  111111111
120orx094 or 111101111  111101111  ->  111101111
121orx095 or 111110111  111101111  ->  111111111
122orx096 or 111111011  111101111  ->  111111111
123orx097 or 111111101  111101111  ->  111111111
124orx098 or 111111110  111101111  ->  111111111
125
126orx100 or 111101111  011111111  ->  111111111
127orx101 or 111101111  101111111  ->  111111111
128orx102 or 111101111  110111111  ->  111111111
129orx103 or 111101111  111011111  ->  111111111
130orx104 or 111101111  111101111  ->  111101111
131orx105 or 111101111  111110111  ->  111111111
132orx106 or 111101111  111111011  ->  111111111
133orx107 or 111101111  111111101  ->  111111111
134orx108 or 111101111  111111110  ->  111111111
135
136-- non-0/1 should not be accepted, nor should signs
137orx220 or 111111112  111111111  ->  NaN Invalid_operation
138orx221 or 333333333  333333333  ->  NaN Invalid_operation
139orx222 or 555555555  555555555  ->  NaN Invalid_operation
140orx223 or 777777777  777777777  ->  NaN Invalid_operation
141orx224 or 999999999  999999999  ->  NaN Invalid_operation
142orx225 or 222222222  999999999  ->  NaN Invalid_operation
143orx226 or 444444444  999999999  ->  NaN Invalid_operation
144orx227 or 666666666  999999999  ->  NaN Invalid_operation
145orx228 or 888888888  999999999  ->  NaN Invalid_operation
146orx229 or 999999999  222222222  ->  NaN Invalid_operation
147orx230 or 999999999  444444444  ->  NaN Invalid_operation
148orx231 or 999999999  666666666  ->  NaN Invalid_operation
149orx232 or 999999999  888888888  ->  NaN Invalid_operation
150-- a few randoms
151orx240 or  567468689 -934981942 ->  NaN Invalid_operation
152orx241 or  567367689  934981942 ->  NaN Invalid_operation
153orx242 or -631917772 -706014634 ->  NaN Invalid_operation
154orx243 or -756253257  138579234 ->  NaN Invalid_operation
155orx244 or  835590149  567435400 ->  NaN Invalid_operation
156-- test MSD
157orx250 or  200000000 100000000 ->  NaN Invalid_operation
158orx251 or  700000000 100000000 ->  NaN Invalid_operation
159orx252 or  800000000 100000000 ->  NaN Invalid_operation
160orx253 or  900000000 100000000 ->  NaN Invalid_operation
161orx254 or  200000000 000000000 ->  NaN Invalid_operation
162orx255 or  700000000 000000000 ->  NaN Invalid_operation
163orx256 or  800000000 000000000 ->  NaN Invalid_operation
164orx257 or  900000000 000000000 ->  NaN Invalid_operation
165orx258 or  100000000 200000000 ->  NaN Invalid_operation
166orx259 or  100000000 700000000 ->  NaN Invalid_operation
167orx260 or  100000000 800000000 ->  NaN Invalid_operation
168orx261 or  100000000 900000000 ->  NaN Invalid_operation
169orx262 or  000000000 200000000 ->  NaN Invalid_operation
170orx263 or  000000000 700000000 ->  NaN Invalid_operation
171orx264 or  000000000 800000000 ->  NaN Invalid_operation
172orx265 or  000000000 900000000 ->  NaN Invalid_operation
173-- test MSD-1
174orx270 or  020000000 100000000 ->  NaN Invalid_operation
175orx271 or  070100000 100000000 ->  NaN Invalid_operation
176orx272 or  080010000 100000001 ->  NaN Invalid_operation
177orx273 or  090001000 100000010 ->  NaN Invalid_operation
178orx274 or  100000100 020010100 ->  NaN Invalid_operation
179orx275 or  100000000 070001000 ->  NaN Invalid_operation
180orx276 or  100000010 080010100 ->  NaN Invalid_operation
181orx277 or  100000000 090000010 ->  NaN Invalid_operation
182-- test LSD
183orx280 or  001000002 100000000 ->  NaN Invalid_operation
184orx281 or  000000007 100000000 ->  NaN Invalid_operation
185orx282 or  000000008 100000000 ->  NaN Invalid_operation
186orx283 or  000000009 100000000 ->  NaN Invalid_operation
187orx284 or  100000000 000100002 ->  NaN Invalid_operation
188orx285 or  100100000 001000007 ->  NaN Invalid_operation
189orx286 or  100010000 010000008 ->  NaN Invalid_operation
190orx287 or  100001000 100000009 ->  NaN Invalid_operation
191-- test Middie
192orx288 or  001020000 100000000 ->  NaN Invalid_operation
193orx289 or  000070001 100000000 ->  NaN Invalid_operation
194orx290 or  000080000 100010000 ->  NaN Invalid_operation
195orx291 or  000090000 100001000 ->  NaN Invalid_operation
196orx292 or  100000010 000020100 ->  NaN Invalid_operation
197orx293 or  100100000 000070010 ->  NaN Invalid_operation
198orx294 or  100010100 000080001 ->  NaN Invalid_operation
199orx295 or  100001000 000090000 ->  NaN Invalid_operation
200-- signs
201orx296 or -100001000 -000000000 ->  NaN Invalid_operation
202orx297 or -100001000  000010000 ->  NaN Invalid_operation
203orx298 or  100001000 -000000000 ->  NaN Invalid_operation
204orx299 or  100001000  000011000 ->  100011000
205
206-- Nmax, Nmin, Ntiny
207orx331 or  2   9.99999999E+999     -> NaN Invalid_operation
208orx332 or  3   1E-999              -> NaN Invalid_operation
209orx333 or  4   1.00000000E-999     -> NaN Invalid_operation
210orx334 or  5   1E-1007             -> NaN Invalid_operation
211orx335 or  6   -1E-1007            -> NaN Invalid_operation
212orx336 or  7   -1.00000000E-999    -> NaN Invalid_operation
213orx337 or  8   -1E-999             -> NaN Invalid_operation
214orx338 or  9   -9.99999999E+999    -> NaN Invalid_operation
215orx341 or  9.99999999E+999     -18 -> NaN Invalid_operation
216orx342 or  1E-999               01 -> NaN Invalid_operation
217orx343 or  1.00000000E-999     -18 -> NaN Invalid_operation
218orx344 or  1E-1007              18 -> NaN Invalid_operation
219orx345 or  -1E-1007            -10 -> NaN Invalid_operation
220orx346 or  -1.00000000E-999     18 -> NaN Invalid_operation
221orx347 or  -1E-999              10 -> NaN Invalid_operation
222orx348 or  -9.99999999E+999    -18 -> NaN Invalid_operation
223
224-- A few other non-integers
225orx361 or  1.0                  1  -> NaN Invalid_operation
226orx362 or  1E+1                 1  -> NaN Invalid_operation
227orx363 or  0.0                  1  -> NaN Invalid_operation
228orx364 or  0E+1                 1  -> NaN Invalid_operation
229orx365 or  9.9                  1  -> NaN Invalid_operation
230orx366 or  9E+1                 1  -> NaN Invalid_operation
231orx371 or  0 1.0                   -> NaN Invalid_operation
232orx372 or  0 1E+1                  -> NaN Invalid_operation
233orx373 or  0 0.0                   -> NaN Invalid_operation
234orx374 or  0 0E+1                  -> NaN Invalid_operation
235orx375 or  0 9.9                   -> NaN Invalid_operation
236orx376 or  0 9E+1                  -> NaN Invalid_operation
237
238-- All Specials are in error
239orx780 or -Inf  -Inf   -> NaN Invalid_operation
240orx781 or -Inf  -1000  -> NaN Invalid_operation
241orx782 or -Inf  -1     -> NaN Invalid_operation
242orx783 or -Inf  -0     -> NaN Invalid_operation
243orx784 or -Inf   0     -> NaN Invalid_operation
244orx785 or -Inf   1     -> NaN Invalid_operation
245orx786 or -Inf   1000  -> NaN Invalid_operation
246orx787 or -1000 -Inf   -> NaN Invalid_operation
247orx788 or -Inf  -Inf   -> NaN Invalid_operation
248orx789 or -1    -Inf   -> NaN Invalid_operation
249orx790 or -0    -Inf   -> NaN Invalid_operation
250orx791 or  0    -Inf   -> NaN Invalid_operation
251orx792 or  1    -Inf   -> NaN Invalid_operation
252orx793 or  1000 -Inf   -> NaN Invalid_operation
253orx794 or  Inf  -Inf   -> NaN Invalid_operation
254
255orx800 or  Inf  -Inf   -> NaN Invalid_operation
256orx801 or  Inf  -1000  -> NaN Invalid_operation
257orx802 or  Inf  -1     -> NaN Invalid_operation
258orx803 or  Inf  -0     -> NaN Invalid_operation
259orx804 or  Inf   0     -> NaN Invalid_operation
260orx805 or  Inf   1     -> NaN Invalid_operation
261orx806 or  Inf   1000  -> NaN Invalid_operation
262orx807 or  Inf   Inf   -> NaN Invalid_operation
263orx808 or -1000  Inf   -> NaN Invalid_operation
264orx809 or -Inf   Inf   -> NaN Invalid_operation
265orx810 or -1     Inf   -> NaN Invalid_operation
266orx811 or -0     Inf   -> NaN Invalid_operation
267orx812 or  0     Inf   -> NaN Invalid_operation
268orx813 or  1     Inf   -> NaN Invalid_operation
269orx814 or  1000  Inf   -> NaN Invalid_operation
270orx815 or  Inf   Inf   -> NaN Invalid_operation
271
272orx821 or  NaN -Inf    -> NaN Invalid_operation
273orx822 or  NaN -1000   -> NaN Invalid_operation
274orx823 or  NaN -1      -> NaN Invalid_operation
275orx824 or  NaN -0      -> NaN Invalid_operation
276orx825 or  NaN  0      -> NaN Invalid_operation
277orx826 or  NaN  1      -> NaN Invalid_operation
278orx827 or  NaN  1000   -> NaN Invalid_operation
279orx828 or  NaN  Inf    -> NaN Invalid_operation
280orx829 or  NaN  NaN    -> NaN Invalid_operation
281orx830 or -Inf  NaN    -> NaN Invalid_operation
282orx831 or -1000 NaN    -> NaN Invalid_operation
283orx832 or -1    NaN    -> NaN Invalid_operation
284orx833 or -0    NaN    -> NaN Invalid_operation
285orx834 or  0    NaN    -> NaN Invalid_operation
286orx835 or  1    NaN    -> NaN Invalid_operation
287orx836 or  1000 NaN    -> NaN Invalid_operation
288orx837 or  Inf  NaN    -> NaN Invalid_operation
289
290orx841 or  sNaN -Inf   ->  NaN  Invalid_operation
291orx842 or  sNaN -1000  ->  NaN  Invalid_operation
292orx843 or  sNaN -1     ->  NaN  Invalid_operation
293orx844 or  sNaN -0     ->  NaN  Invalid_operation
294orx845 or  sNaN  0     ->  NaN  Invalid_operation
295orx846 or  sNaN  1     ->  NaN  Invalid_operation
296orx847 or  sNaN  1000  ->  NaN  Invalid_operation
297orx848 or  sNaN  NaN   ->  NaN  Invalid_operation
298orx849 or  sNaN sNaN   ->  NaN  Invalid_operation
299orx850 or  NaN  sNaN   ->  NaN  Invalid_operation
300orx851 or -Inf  sNaN   ->  NaN  Invalid_operation
301orx852 or -1000 sNaN   ->  NaN  Invalid_operation
302orx853 or -1    sNaN   ->  NaN  Invalid_operation
303orx854 or -0    sNaN   ->  NaN  Invalid_operation
304orx855 or  0    sNaN   ->  NaN  Invalid_operation
305orx856 or  1    sNaN   ->  NaN  Invalid_operation
306orx857 or  1000 sNaN   ->  NaN  Invalid_operation
307orx858 or  Inf  sNaN   ->  NaN  Invalid_operation
308orx859 or  NaN  sNaN   ->  NaN  Invalid_operation
309
310-- propagating NaNs
311orx861 or  NaN1   -Inf    -> NaN Invalid_operation
312orx862 or +NaN2   -1000   -> NaN Invalid_operation
313orx863 or  NaN3    1000   -> NaN Invalid_operation
314orx864 or  NaN4    Inf    -> NaN Invalid_operation
315orx865 or  NaN5   +NaN6   -> NaN Invalid_operation
316orx866 or -Inf     NaN7   -> NaN Invalid_operation
317orx867 or -1000    NaN8   -> NaN Invalid_operation
318orx868 or  1000    NaN9   -> NaN Invalid_operation
319orx869 or  Inf    +NaN10  -> NaN Invalid_operation
320orx871 or  sNaN11  -Inf   -> NaN Invalid_operation
321orx872 or  sNaN12  -1000  -> NaN Invalid_operation
322orx873 or  sNaN13   1000  -> NaN Invalid_operation
323orx874 or  sNaN14   NaN17 -> NaN Invalid_operation
324orx875 or  sNaN15  sNaN18 -> NaN Invalid_operation
325orx876 or  NaN16   sNaN19 -> NaN Invalid_operation
326orx877 or -Inf    +sNaN20 -> NaN Invalid_operation
327orx878 or -1000    sNaN21 -> NaN Invalid_operation
328orx879 or  1000    sNaN22 -> NaN Invalid_operation
329orx880 or  Inf     sNaN23 -> NaN Invalid_operation
330orx881 or +NaN25  +sNaN24 -> NaN Invalid_operation
331orx882 or -NaN26    NaN28 -> NaN Invalid_operation
332orx883 or -sNaN27  sNaN29 -> NaN Invalid_operation
333orx884 or  1000    -NaN30 -> NaN Invalid_operation
334orx885 or  1000   -sNaN31 -> NaN Invalid_operation
335