int main()
{
TEST_SET_START("20040930102626EJL","EJL", "negated2");
double x0n = hide_double(-0.0);
double x0p = hide_double(0.0);
double x1n = hide_double(-83532.96153153);
double x1p = hide_double(83532.96153153);
double x2n = hide_double(-0.0000000013152);
double x2p = hide_double(0.0000000013152);
double x3n = hide_double(-HUGE_VAL);
double x3p = hide_double(HUGE_VAL);
vec_double2 x0n_v = spu_splats(x0n);
vec_double2 x0p_v = spu_splats(x0p);
vec_double2 x1n_v = spu_splats(x1n);
vec_double2 x1p_v = spu_splats(x1p);
vec_double2 x2n_v = spu_splats(x2n);
vec_double2 x2p_v = spu_splats(x2p);
vec_double2 x3n_v = spu_splats(x3n);
vec_double2 x3p_v = spu_splats(x3p);
vec_double2 res_v;
TEST_START("negated2");
res_v = negated2(x0n_v);
TEST_CHECK("20040930102629EJL", allequal_double2( res_v, x0p_v ), 0);
res_v = negated2(x0p_v);
TEST_CHECK("20040930102631EJL", allequal_double2( res_v, x0n_v ), 0);
res_v = negated2(x1n_v);
TEST_CHECK("20040930102632EJL", allequal_double2( res_v, x1p_v ), 0);
res_v = negated2(x1p_v);
TEST_CHECK("20040930102635EJL", allequal_double2( res_v, x1n_v ), 0);
res_v = negated2(x2n_v);
TEST_CHECK("20040930102637EJL", allequal_double2( res_v, x2p_v ), 0);
res_v = negated2(x2p_v);
TEST_CHECK("20040930102639EJL", allequal_double2( res_v, x2n_v ), 0);
res_v = negated2(x3n_v);
TEST_CHECK("20040930102641EJL", allposinf_double2( res_v ), 0);
res_v = negated2(x3p_v);
TEST_CHECK("20040930102643EJL", allneginf_double2( res_v ), 0);
TEST_SET_DONE();
TEST_EXIT();
}
int main()
{
TEST_SET_START("20040908022501EJL","EJL", "fabs");
double x0n = hide_double(-0.0);
double x0p = hide_double(0.0);
double x1n = hide_double(-83532.96153153);
double x1p = hide_double(83532.96153153);
double x2n = hide_double(-0.0000000013152);
double x2p = hide_double(0.0000000013152);
double x3n = hide_double(-HUGE_VAL);
double x3p = hide_double(HUGE_VAL);
vec_double2 x0n_v = spu_splats(x0n);
vec_double2 x0p_v = spu_splats(x0p);
vec_double2 x1n_v = spu_splats(x1n);
vec_double2 x1p_v = spu_splats(x1p);
vec_double2 x2n_v = spu_splats(x2n);
vec_double2 x2p_v = spu_splats(x2p);
vec_double2 x3n_v = spu_splats(x3n);
vec_double2 x3p_v = spu_splats(x3p);
double res;
vec_double2 res_v;
TEST_START("fabsd2");
res_v = fabsd2(x0n_v);
TEST_CHECK("20040908022502EJL", allequal_double2( res_v, x0p_v ), 0);
res_v = fabsd2(x0p_v);
TEST_CHECK("20040908022503EJL", allequal_double2( res_v, x0p_v ), 0);
res_v = fabsd2(x1n_v);
TEST_CHECK("20040908022504EJL", allequal_double2( res_v, x1p_v ), 0);
res_v = fabsd2(x1p_v);
TEST_CHECK("20040908022505EJL", allequal_double2( res_v, x1p_v ), 0);
res_v = fabsd2(x2n_v);
TEST_CHECK("20040908022506EJL", allequal_double2( res_v, x2p_v ), 0);
res_v = fabsd2(x2p_v);
TEST_CHECK("20040908022507EJL", allequal_double2( res_v, x2p_v ), 0);
res_v = fabsd2(x3n_v);
TEST_CHECK("20040908022508EJL", allposinf_double2( res_v ), 0);
res_v = fabsd2(x3p_v);
TEST_CHECK("20040908022509EJL", allposinf_double2( res_v ), 0);
TEST_START("fabs");
res = fabs( x0n );
TEST_CHECK("20040908022510EJL", res == x0p, 0);
res = fabs( x0p );
TEST_CHECK("20040908022511EJL", res == x0p, 0);
res = fabs( x1n );
TEST_CHECK("20040908022512EJL", res == x1p, 0);
res = fabs( x1p );
TEST_CHECK("20040908022513EJL", res == x1p, 0);
res = fabs( x2n );
TEST_CHECK("20040908022514EJL", res == x2p, 0);
res = fabs( x2p );
TEST_CHECK("20040908022515EJL", res == x2p, 0);
res = fabs( x3n );
TEST_CHECK("20040908022516EJL", isinf(res) == 1, 0);
res = fabs( x3p );
TEST_CHECK("20040908022517EJL", isinf(res) == 1, 0);
TEST_SET_DONE();
TEST_EXIT();
}
int main()
{
TEST_SET_START("20040928174038EJL","EJL", "rsqrtd2");
unsigned long long i6 = 0x7464fff515d76f87ull;
unsigned long long i6r = 0x25b3c03b72dba06cull;
unsigned long long i7 = 0x7606a4533cf5605eull;
unsigned long long i7r = 0x24e3056f4b45f6a9ull;
unsigned long long i8 = 0x4beae58c6f48733eull;
unsigned long long i8r = 0x39f173b787396c5full;
unsigned long long i9 = 0x3999ed5c8316b00bull;
unsigned long long i9r = 0x43192359a70ec761ull;
unsigned long long i10 = 0x68f7885c4b84b793ull;
unsigned long long i10r = 0x2b6a62d48c269d90ull;
unsigned long long i11 = 0x1aabc083c5c26227ull;
unsigned long long i11r = 0x52912e543817fabbull;
double x0 = hide_double(-HUGE_VAL); // -Inf -> NaN
double x1 = hide_double(HUGE_VAL); // Inf -> +0
double x2 = hide_double(0.0); // +0 -> Inf
double x3 = hide_double(-0.0); // -0 -> -Inf
double x4 = hide_double(nan("")); // NaN -> NaN
double x5 = hide_double(4.0);
double x5r = hide_double(0.5);
double x6 = hide_double(make_double(i6));
double x6r = hide_double(make_double(i6r));
double x7 = hide_double(make_double(i7));
double x7r = hide_double(make_double(i7r));
double x8 = hide_double(make_double(i8));
double x8r = hide_double(make_double(i8r));
double x9 = hide_double(make_double(i9));
double x9r = hide_double(make_double(i9r));
double x10 = hide_double(make_double(i10));
double x10r = hide_double(make_double(i10r));
double x11 = hide_double(make_double(i11));
double x11r = hide_double(make_double(i11r));
vec_double2 x0_v = spu_splats(x0);
vec_double2 x1_v = spu_splats(x1);
vec_double2 x2_v = spu_splats(x2);
vec_double2 x3_v = spu_splats(x3);
vec_double2 x4_v = spu_splats(x4);
vec_double2 x5_v = spu_splats(x5);
vec_double2 x5r_v = spu_splats(x5r);
vec_double2 x6_v = spu_splats(x6);
vec_double2 x6r_v = spu_splats(x6r);
vec_double2 x7_v = spu_splats(x7);
vec_double2 x7r_v = spu_splats(x7r);
vec_double2 x8_v = spu_splats(x8);
vec_double2 x8r_v = spu_splats(x8r);
vec_double2 x9_v = spu_splats(x9);
vec_double2 x9r_v = spu_splats(x9r);
vec_double2 x10_v = spu_splats(x10);
vec_double2 x10r_v = spu_splats(x10r);
vec_double2 x11_v = spu_splats(x11);
vec_double2 x11r_v = spu_splats(x11r);
vec_double2 res_v;
TEST_START("rsqrtd2");
res_v = rsqrtd2(x0_v);
TEST_CHECK("20040928174042EJL", allnan_double2( res_v ), 0);
res_v = rsqrtd2(x1_v);
TEST_CHECK("20040928174045EJL", allposzero_double2( res_v ), 0);
res_v = rsqrtd2(x2_v);
TEST_CHECK("20040928174047EJL", allposinf_double2( res_v ), 0);
res_v = rsqrtd2(x3_v);
TEST_CHECK("20040928174049EJL", allneginf_double2( res_v ), 0);
res_v = rsqrtd2(x4_v);
TEST_CHECK("20040928174054EJL", allnan_double2( res_v ), 0);
res_v = rsqrtd2(x5_v);
TEST_CHECK("20040928174058EJL", allequal_double2( res_v, x5r_v ), 0);
res_v = rsqrtd2(x6_v);
TEST_CHECK("20040928174101EJL", allequal_ulps_double2( res_v, x6r_v, 1 ), 0);
res_v = rsqrtd2(x7_v);
TEST_CHECK("20040928174104EJL", allequal_ulps_double2( res_v, x7r_v, 1 ), 0);
res_v = rsqrtd2(x8_v);
TEST_CHECK("20040928174106EJL", allequal_ulps_double2( res_v, x8r_v, 1 ), 0);
res_v = rsqrtd2(x9_v);
TEST_CHECK("20040928174108EJL", allequal_ulps_double2( res_v, x9r_v, 1 ), 0);
res_v = rsqrtd2(x10_v);
TEST_CHECK("20040928174110EJL", allequal_ulps_double2( res_v, x10r_v, 1 ), 0);
res_v = rsqrtd2(x11_v);
TEST_CHECK("20040928174113EJL", allequal_ulps_double2( res_v, x11r_v, 1 ), 0);
TEST_SET_DONE();
TEST_EXIT();
}
int main()
{
TEST_SET_START("20060825000000AAN","AAN", "isgreaterequald2");
//-QNaN: NG
double x0 = hide_double(-nan(""));
double y0 = hide_double(1.0);
unsigned long long r0 = 0x0000000000000000ull;
//+Inf > -Inf
double x1 = hide_double( HUGE_VAL);
double y1 = hide_double(-HUGE_VAL);
unsigned long long r1 = 0xffffffffffffffffull;
//-Inf < -Dmax
double x2 = hide_double(-HUGE_VAL);
double y2 = hide_double(-DBL_MAX);
unsigned long long r2 = 0x0000000000000000ull;
//-Norm > -Inf
double x3 = hide_double(-67418234.34256245);
double y3 = hide_double(-HUGE_VAL);
unsigned long long r3 = 0xffffffffffffffffull;
//-Norm < -Denorm
double x4 = hide_double(-273453.3234458053);
double y4 = hide_double(-3.0e-321);
unsigned long long r4 = 0x0000000000000000ull;
//-Norm = -Norm
double x5 = hide_double(-168.97345223013);
double y5 = hide_double(-168.97345223013);
unsigned long long r5 = 0xffffffffffffffffull;
//-Norm > -Norm
double x6 = hide_double(-168.97345223013);
double y6 = hide_double(-21345853556.492);
unsigned long long r6 = 0xffffffffffffffffull;
//-Norm < -0
double x7 = hide_double(-168.97345223013);
double y7 = hide_double(-0.0);
unsigned long long r7 = 0x0000000000000000ull;
//-Unf > -Norm
double x8 = hide_double(-1.0e-999);
double y8 = hide_double(-83532.96153153);
unsigned long long r8 = 0xffffffffffffffffull;
//-Unf = 0
double x9 = hide_double(-1.0e-999);
double y9 = hide_double(0.0);
unsigned long long r9 = 0xffffffffffffffffull;
//-0 = 0
double x10 = hide_double(-0.0);
double y10 = hide_double( 0.0);
unsigned long long r10 = 0xffffffffffffffffull;
//+Unf = 0
double x11 = hide_double( 1.0e-999);
double y11 = hide_double( 0.0);
unsigned long long r11 = 0xffffffffffffffffull;
//+Unf < +Norm
double x12 = hide_double( 1e-999);
double y12 = hide_double(0.0031529324);
unsigned long long r12 = 0x0000000000000000ull;
//+Norm > +Denorm
double x13 = hide_double(5172.2845321);
double y13 = hide_double(3.0e-321);
unsigned long long r13 = 0xffffffffffffffffull;
//+Norm = +Norm
double x14 = hide_double(5172.2845321);
double y14 = hide_double(5172.2845321);
unsigned long long r14 = 0xffffffffffffffffull;
//+Norm < +Norm
double x15 = hide_double(264.345643345);
double y15 = hide_double(2353705.31415);
unsigned long long r15 = 0x0000000000000000ull;
//+Norm > -Norm
double x16 = hide_double( 926.605118542);
double y16 = hide_double(-9.43574552184);
unsigned long long r16 = 0xffffffffffffffffull;
//+Norm < +Dmax
double x17 = hide_double( 926.605118542);
double y17 = hide_double(DBL_MAX);
unsigned long long r17 = 0x0000000000000000ull;
//+Inf > +Dmax
double x18 = hide_double(HUGE_VAL);
double y18 = hide_double(DBL_MAX);
unsigned long long r18 = 0xffffffffffffffffull;
//+QNaN: NG
double x19 = hide_double(nan(""));
double y19 = hide_double(3.14);
unsigned long long r19 = 0x0000000000000000ull;
vec_double2 x0_v = spu_splats(x0);
vec_double2 y0_v = spu_splats(y0);
vec_ullong2 r0_v = spu_splats(r0);
vec_double2 x1_v = spu_splats(x1);
vec_double2 y1_v = spu_splats(y1);
vec_ullong2 r1_v = spu_splats(r1);
vec_double2 x2_v = spu_splats(x2);
vec_double2 y2_v = spu_splats(y2);
vec_ullong2 r2_v = spu_splats(r2);
vec_double2 x3_v = spu_splats(x3);
vec_double2 y3_v = spu_splats(y3);
vec_ullong2 r3_v = spu_splats(r3);
vec_double2 x4_v = spu_splats(x4);
vec_double2 y4_v = spu_splats(y4);
vec_ullong2 r4_v = spu_splats(r4);
vec_double2 x5_v = spu_splats(x5);
vec_double2 y5_v = spu_splats(y5);
vec_ullong2 r5_v = spu_splats(r5);
vec_double2 x6_v = spu_splats(x6);
vec_double2 y6_v = spu_splats(y6);
vec_ullong2 r6_v = spu_splats(r6);
vec_double2 x7_v = spu_splats(x7);
vec_double2 y7_v = spu_splats(y7);
vec_ullong2 r7_v = spu_splats(r7);
vec_double2 x8_v = spu_splats(x8);
vec_double2 y8_v = spu_splats(y8);
vec_ullong2 r8_v = spu_splats(r8);
vec_double2 x9_v = spu_splats(x9);
vec_double2 y9_v = spu_splats(y9);
vec_ullong2 r9_v = spu_splats(r9);
vec_double2 x10_v = spu_splats(x10);
vec_double2 y10_v = spu_splats(y10);
vec_ullong2 r10_v = spu_splats(r10);
vec_double2 x11_v = spu_splats(x11);
vec_double2 y11_v = spu_splats(y11);
vec_ullong2 r11_v = spu_splats(r11);
vec_double2 x12_v = spu_splats(x12);
vec_double2 y12_v = spu_splats(y12);
vec_ullong2 r12_v = spu_splats(r12);
vec_double2 x13_v = spu_splats(x13);
vec_double2 y13_v = spu_splats(y13);
vec_ullong2 r13_v = spu_splats(r13);
vec_double2 x14_v = spu_splats(x14);
vec_double2 y14_v = spu_splats(y14);
vec_ullong2 r14_v = spu_splats(r14);
vec_double2 x15_v = spu_splats(x15);
vec_double2 y15_v = spu_splats(y15);
vec_ullong2 r15_v = spu_splats(r15);
vec_double2 x16_v = spu_splats(x16);
vec_double2 y16_v = spu_splats(y16);
vec_ullong2 r16_v = spu_splats(r16);
vec_double2 x17_v = spu_splats(x17);
vec_double2 y17_v = spu_splats(y17);
vec_ullong2 r17_v = spu_splats(r17);
vec_double2 x18_v = spu_splats(x18);
vec_double2 y18_v = spu_splats(y18);
vec_ullong2 r18_v = spu_splats(r18);
vec_double2 x19_v = spu_splats(x19);
vec_double2 y19_v = spu_splats(y19);
vec_ullong2 r19_v = spu_splats(r19);
vec_ullong2 res_v;
TEST_START("isgreaterequald2");
res_v = (vec_ullong2)isgreaterequald2(x0_v, y0_v);
TEST_CHECK("20060825000000AAN", allequal_ullong2( res_v, r0_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x1_v, y1_v);
TEST_CHECK("20060825000001AAN", allequal_ullong2( res_v, r1_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x2_v, y2_v);
TEST_CHECK("20060825000002AAN", allequal_ullong2( res_v, r2_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x3_v, y3_v);
TEST_CHECK("20060825000003AAN", allequal_ullong2( res_v, r3_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x4_v, y4_v);
TEST_CHECK("20060825000004AAN", allequal_ullong2( res_v, r4_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x5_v, y5_v);
TEST_CHECK("20060825000005AAN", allequal_ullong2( res_v, r5_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x6_v, y6_v);
TEST_CHECK("20060825000006AAN", allequal_ullong2( res_v, r6_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x7_v, y7_v);
TEST_CHECK("20060825000007AAN", allequal_ullong2( res_v, r7_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x8_v, y8_v);
TEST_CHECK("20060825000008AAN", allequal_ullong2( res_v, r8_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x9_v, y9_v);
TEST_CHECK("20060825000009AAN", allequal_ullong2( res_v, r9_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x10_v, y10_v);
TEST_CHECK("20060825000000AAN", allequal_ullong2( res_v, r10_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x11_v, y11_v);
TEST_CHECK("20060825000001AAN", allequal_ullong2( res_v, r11_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x12_v, y12_v);
TEST_CHECK("20060825000002AAN", allequal_ullong2( res_v, r12_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x13_v, y13_v);
TEST_CHECK("20060825000003AAN", allequal_ullong2( res_v, r13_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x14_v, y14_v);
TEST_CHECK("20060825000004AAN", allequal_ullong2( res_v, r14_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x15_v, y15_v);
TEST_CHECK("20060825000005AAN", allequal_ullong2( res_v, r15_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x16_v, y16_v);
TEST_CHECK("20060825000006AAN", allequal_ullong2( res_v, r16_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x17_v, y17_v);
TEST_CHECK("20060825000007AAN", allequal_ullong2( res_v, r17_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x18_v, y18_v);
TEST_CHECK("20060825000008AAN", allequal_ullong2( res_v, r18_v ), 0);
res_v = (vec_ullong2)isgreaterequald2(x19_v, y19_v);
TEST_CHECK("20060825000009AAN", allequal_ullong2( res_v, r19_v ), 0);
TEST_SET_DONE();
TEST_EXIT();
}
int main()
{
TEST_SET_START("20040920095218EJL","EJL", "recipd2");
unsigned long long i6 = 0x7fd0000000000001ull; // 2^1022 + 1 ulp
unsigned long long i7 = 0xffd0000000000000ull; // -2^1022
unsigned long long i7r = 0x8010000000000000ull; // -2^-1022
unsigned long long i8 = 0x7606a4533cf5605eull; // random values
unsigned long long i8r = 0x09d69cea2b5b5b57ull;
unsigned long long i9 = 0x4c042c295376566eull;
unsigned long long i9r = 0x33d9618e87b961f4ull;
unsigned long long i10 = 0x39b3720562510408ull;
unsigned long long i10r = 0x462a54842d7f9b5dull;
unsigned long long i11 = 0x6911a64538a389aeull;
unsigned long long i11r = 0x16cd02637ed13ff2ull;
unsigned long long i12 = 0x1ac4d062d451c99dull;
unsigned long long i12r = 0x6518994c26ebbb3eull;
double x0 = hide_double(-HUGE_VAL); // -Inf
double x1 = hide_double(HUGE_VAL); // Inf
double x2 = hide_double(0.0); // 0
double x3 = hide_double(-0.0); // -0
double x4 = hide_double(nan("")); // NaN
double x5 = hide_double(2.0);
double x5r = hide_double(0.5);
double x6 = hide_double(make_double(i6));
double x7 = hide_double(make_double(i7));
double x7r = hide_double(make_double(i7r));
double x8 = hide_double(make_double(i8));
double x8r = hide_double(make_double(i8r));
double x9 = hide_double(make_double(i9));
double x9r = hide_double(make_double(i9r));
double x10 = hide_double(make_double(i10));
double x10r = hide_double(make_double(i10r));
double x11 = hide_double(make_double(i11));
double x11r = hide_double(make_double(i11r));
double x12 = hide_double(make_double(i12));
double x12r = hide_double(make_double(i12r));
vec_double2 x0_v = spu_splats(x0);
vec_double2 x1_v = spu_splats(x1);
vec_double2 x2_v = spu_splats(x2);
vec_double2 x3_v = spu_splats(x3);
vec_double2 x4_v = spu_splats(x4);
vec_double2 x5_v = spu_splats(x5);
vec_double2 x5r_v = spu_splats(x5r);
vec_double2 x6_v = spu_splats(x6);
vec_double2 x7_v = spu_splats(x7);
vec_double2 x7r_v = spu_splats(x7r);
vec_double2 x8_v = spu_splats(x8);
vec_double2 x8r_v = spu_splats(x8r);
vec_double2 x9_v = spu_splats(x9);
vec_double2 x9r_v = spu_splats(x9r);
vec_double2 x10_v = spu_splats(x10);
vec_double2 x10r_v = spu_splats(x10r);
vec_double2 x11_v = spu_splats(x11);
vec_double2 x11r_v = spu_splats(x11r);
vec_double2 x12_v = spu_splats(x12);
vec_double2 x12r_v = spu_splats(x12r);
vec_double2 res_v;
TEST_START("recipd2");
res_v = recipd2(x0_v);
TEST_CHECK("20040920095224EJL", allnegzero_double2( res_v ), 0);
res_v = recipd2(x1_v);
TEST_CHECK("20040920095226EJL", allposzero_double2( res_v ), 0);
res_v = recipd2(x2_v);
TEST_CHECK("20040920095228EJL", allposinf_double2( res_v ), 0);
res_v = recipd2(x3_v);
TEST_CHECK("20040920095233EJL", allneginf_double2( res_v ), 0);
res_v = recipd2(x4_v);
TEST_CHECK("20040920095235EJL", allnan_double2( res_v ), 0);
res_v = recipd2(x5_v);
TEST_CHECK("20040920095237EJL", allequal_double2( res_v, x5r_v ), 0);
res_v = recipd2(x6_v);
TEST_CHECK("20040920095239EJL", allzerodenorm_double2( res_v ), 0);
res_v = recipd2(x7_v);
TEST_CHECK("20040920095242EJL", allequal_double2( res_v, x7r_v ), 0);
res_v = recipd2(x8_v);
TEST_CHECK("20040920095245EJL", allequal_ulps_double2( res_v, x8r_v, 1 ), 0);
res_v = recipd2(x9_v);
TEST_CHECK("20040920095247EJL", allequal_ulps_double2( res_v, x9r_v, 1 ), 0);
res_v = recipd2(x10_v);
TEST_CHECK("20040920095248EJL", allequal_ulps_double2( res_v, x10r_v, 1 ), 0);
res_v = recipd2(x11_v);
TEST_CHECK("20040920095250EJL", allequal_ulps_double2( res_v, x11r_v, 1 ), 0);
res_v = recipd2(x12_v);
TEST_CHECK("20040920095252EJL", allequal_ulps_double2( res_v, x12r_v, 1 ), 0);
TEST_SET_DONE();
TEST_EXIT();
}
int main()
{
TEST_SET_START("20060828114000MH","MH", "fmad2");
// double denorm_min = hide_double(make_double(0x0000000000000001ull));
double denorm_max = hide_double(make_double(0x000fffffffffffffull));
// double norm_min = hide_double(make_double(0x0010000000000000ull));
double norm_max = hide_double(make_double(0x7fefffffffffffffull));
double x0 = hide_double(1760.135);
double y0 = hide_double(19355.03);
double z0 = hide_double(-12351.9);
double a0 = hide_double(34055113.82905);
double x1 = hide_double(-139.035);
double y1 = hide_double(0.0);
double z1 = hide_double(-1.0);
double x2 = hide_double(nan(""));
double y2 = hide_double(-1.0);
double z2 = hide_double(-0.0);
double x3 = hide_double(1.0);
double y3 = hide_double(HUGE_VAL);
double z3 = hide_double(-1.0);
double x4 = norm_max;
double y4 = norm_max;
double z4 = hide_double(0.0);
double x5 = hide_double(100.0);
double y5 = denorm_max;
double z5 = hide_double(0.0);
double a5 = hide_double(make_double(0x0078fffffffffffeull));
vec_double2 x0_v = spu_splats(x0);
vec_double2 y0_v = spu_splats(y0);
vec_double2 z0_v = spu_splats(z0);
vec_double2 x1_v = spu_splats(x1);
vec_double2 y1_v = spu_splats(y1);
vec_double2 z1_v = spu_splats(z1);
vec_double2 x2_v = spu_splats(x2);
vec_double2 y2_v = spu_splats(y2);
vec_double2 z2_v = spu_splats(z2);
vec_double2 x3_v = spu_splats(x3);
vec_double2 y3_v = spu_splats(y3);
vec_double2 z3_v = spu_splats(z3);
vec_double2 x4_v = spu_splats(x4);
vec_double2 y4_v = spu_splats(y4);
vec_double2 z4_v = spu_splats(z4);
vec_double2 x5_v = spu_splats(x5);
vec_double2 y5_v = spu_splats(y5);
vec_double2 z5_v = spu_splats(z5);
vec_double2 a0_v = spu_splats(a0);
vec_double2 a1_v = spu_splats(z1);
vec_double2 a5_v = spu_splats(a5);
vec_double2 res_v;
TEST_START("fmad2");
res_v = fmad2(x0_v, y0_v, z0_v);
TEST_CHECK("20060828114001MH", allequal_ulps_double2( res_v, a0_v, 1 ), 0);
res_v = fmad2(y0_v, x0_v, z0_v);
TEST_CHECK("20060828114002MH", allequal_ulps_double2( res_v, a0_v, 1 ), 0);
res_v = fmad2(x1_v, y1_v, z1_v);
TEST_CHECK("20060828114003MH", allequal_ulps_double2( res_v, a1_v, 1 ), 0);
res_v = fmad2(y1_v, x1_v, z1_v);
TEST_CHECK("20060828114004MH", allequal_ulps_double2( res_v, a1_v, 1 ), 0);
res_v = fmad2(x2_v, y2_v, z2_v);
TEST_CHECK("20060828114005MH", allnan_double2( res_v ), 0);
res_v = fmad2(y2_v, x2_v, z2_v);
TEST_CHECK("20060828114006MH", allnan_double2( res_v ), 0);
res_v = fmad2(x3_v, y3_v, z3_v);
TEST_CHECK("20060828114007MH", allposinf_double2( res_v ), 0);
res_v = fmad2(y3_v, x3_v, z3_v);
TEST_CHECK("20060828114008MH", allposinf_double2( res_v ), 0);
res_v = fmad2(x4_v, y4_v, z4_v);
TEST_CHECK("20060828114009MH", allposinf_double2( res_v ), 0);
res_v = fmad2(y4_v, x4_v, z4_v);
TEST_CHECK("20060828114010MH", allposinf_double2( res_v ), 0);
res_v = fmad2(x5_v, y5_v, z5_v);
TEST_CHECK("20060828114011MH", allequal_ulps_double2( res_v, a5_v, 1 ), 0);
res_v = fmad2(y5_v, x5_v, z5_v);
TEST_CHECK("20060828114012MH", allequal_ulps_double2( res_v, a5_v, 1 ), 0);
//printf("res:%.10le, a5:%.10le\n", spu_extract(res_v, 0), spu_extract(a5_v, 0));
TEST_SET_DONE();
TEST_EXIT();
}
int main()
{
TEST_SET_START("20060904000000AAN","AAN", "ilogbd2");
// -Nan
double x0 = hide_double(-nan(""));
long long r0 = (long long)FP_ILOGBNAN;
// -Inf
double x1 = hide_double(-HUGE_VAL);
long long r1 = (long long)FP_ILOGB0;
// -Dmax
double x2 = hide_double(-DBL_MAX);
long long r2 = 1023ll;
// -Norm
double x3 = hide_double(-824842.58421394);
long long r3 = 19ll;
// -Dmin
double x4 = hide_double(-DBL_MIN);
long long r4 = -1022ll;
// -Denorm
double x5 = hide_double(-2.40e-310);
long long r5 = -1029ll;
// -Unf
double x6 = hide_double(-1.0e-999);
long long r6 = (long long)FP_ILOGB0;
// -0
double x7 = hide_double(-0.0);
long long r7 = (long long)FP_ILOGB0;
// 0
double x8 = hide_double( 0.0);
long long r8 = (long long)FP_ILOGB0;
// +Unf
double x9 = hide_double( 1.0e-999);
long long r9 = (long long)FP_ILOGB0;
// +Denorm
double x10 = hide_double( 2.40e-310);
long long r10 = -1029ll;
// +Dmin
double x11 = hide_double( DBL_MIN);
long long r11 = -1022ll;
// +Norm
double x12 = hide_double(3.14152634);
long long r12 = 1ll;
// +Norm
double x13 = hide_double(7.0673903e149);
long long r13 = 497ll;
// +Norm
double x14 = hide_double(2.4673e304);
long long r14 = 1011ll;
// +Norm
double x15 = hide_double(7.235672e-25);
long long r15 = -81ll;
// +Denorm
double x16 = hide_double(9.452854e-312);
long long r16 = -1034ll;
// +Demorm
double x17 = hide_double(3.045784e-320);
long long r17 = -1062ll;
// -Norm
double x18 = hide_double(-6.459273e7);
long long r18 = 25ll;
// -Norm
double x19 = hide_double(-2.493472e-99);
long long r19 = -328ll;
// -Norm
double x20 = hide_double(-1.4824543e128);
long long r20 = 425ll;
// -Denorm
double x21 = hide_double(-5.53856231e-315);
long long r21 = -1044ll;
// -Demorm
double x22 = hide_double(-2.5684367e-312);
long long r22 = -1036ll;
// +Dmax
double x23 = hide_double(DBL_MAX);
long long r23 = 1023ll;
// +Inf
double x24 = hide_double(HUGE_VAL);
long long r24 = (long long)FP_ILOGB0;
//+Nan
double x25 = hide_double( nan(""));
long long r25 = (long long)FP_ILOGBNAN;
// Compound
vec_double2 x26_v = (vec_double2) { -2.561286432e-317, -1.0e-999 };
vec_llong2 r26_v = (vec_llong2) { -1052ll, FP_ILOGB0 };
// Compound
vec_double2 x27_v = (vec_double2) { 345.27533, -8.673e-310 };
vec_llong2 r27_v = (vec_llong2) { 8ll, -1027ll };
// Compound
vec_double2 x28_v = (vec_double2) { nan(""), -3678342.8765343 };
vec_llong2 r28_v = (vec_llong2) { FP_ILOGBNAN, 21ll };
// Compound
vec_double2 x29_v = (vec_double2) { HUGE_VAL, -nan("") };
vec_llong2 r29_v = (vec_llong2) { FP_ILOGB0, FP_ILOGBNAN };
// Compound
vec_double2 x30_v = (vec_double2) { -1.2e-99, -HUGE_VAL } ;
vec_llong2 r30_v = (vec_llong2) { -329ll, FP_ILOGB0 };
vec_double2 x0_v = spu_splats(x0);
vec_llong2 r0_v = spu_splats(r0);
vec_double2 x1_v = spu_splats(x1);
vec_llong2 r1_v = spu_splats(r1);
vec_double2 x2_v = spu_splats(x2);
vec_llong2 r2_v = spu_splats(r2);
vec_double2 x3_v = spu_splats(x3);
vec_llong2 r3_v = spu_splats(r3);
vec_double2 x4_v = spu_splats(x4);
vec_llong2 r4_v = spu_splats(r4);
vec_double2 x5_v = spu_splats(x5);
vec_llong2 r5_v = spu_splats(r5);
vec_double2 x6_v = spu_splats(x6);
vec_llong2 r6_v = spu_splats(r6);
vec_double2 x7_v = spu_splats(x7);
vec_llong2 r7_v = spu_splats(r7);
vec_double2 x8_v = spu_splats(x8);
vec_llong2 r8_v = spu_splats(r8);
vec_double2 x9_v = spu_splats(x9);
vec_llong2 r9_v = spu_splats(r9);
vec_double2 x10_v = spu_splats(x10);
vec_llong2 r10_v = spu_splats(r10);
vec_double2 x11_v = spu_splats(x11);
vec_llong2 r11_v = spu_splats(r11);
vec_double2 x12_v = spu_splats(x12);
vec_llong2 r12_v = spu_splats(r12);
vec_double2 x13_v = spu_splats(x13);
vec_llong2 r13_v = spu_splats(r13);
vec_double2 x14_v = spu_splats(x14);
vec_llong2 r14_v = spu_splats(r14);
vec_double2 x15_v = spu_splats(x15);
vec_llong2 r15_v = spu_splats(r15);
vec_double2 x16_v = spu_splats(x16);
vec_llong2 r16_v = spu_splats(r16);
vec_double2 x17_v = spu_splats(x17);
vec_llong2 r17_v = spu_splats(r17);
vec_double2 x18_v = spu_splats(x18);
vec_llong2 r18_v = spu_splats(r18);
vec_double2 x19_v = spu_splats(x19);
vec_llong2 r19_v = spu_splats(r19);
vec_double2 x20_v = spu_splats(x20);
vec_llong2 r20_v = spu_splats(r20);
vec_double2 x21_v = spu_splats(x21);
vec_llong2 r21_v = spu_splats(r21);
vec_double2 x22_v = spu_splats(x22);
vec_llong2 r22_v = spu_splats(r22);
vec_double2 x23_v = spu_splats(x23);
vec_llong2 r23_v = spu_splats(r23);
vec_double2 x24_v = spu_splats(x24);
vec_llong2 r24_v = spu_splats(r24);
vec_double2 x25_v = spu_splats(x25);
vec_llong2 r25_v = spu_splats(r25);
vec_llong2 res_v;
TEST_START("ilogbd2");
res_v = (vec_llong2)ilogbd2(x0_v);
TEST_CHECK("20060904000000AAN", allequal_llong2( res_v, r0_v ), 0);
res_v = (vec_llong2)ilogbd2(x1_v);
TEST_CHECK("20060904000001AAN", allequal_llong2( res_v, r1_v ), 0);
res_v = (vec_llong2)ilogbd2(x2_v);
TEST_CHECK("20060904000002AAN", allequal_llong2( res_v, r2_v ), 0);
res_v = (vec_llong2)ilogbd2(x3_v);
TEST_CHECK("20060904000003AAN", allequal_llong2( res_v, r3_v ), 0);
res_v = (vec_llong2)ilogbd2(x4_v);
TEST_CHECK("20060904000004AAN", allequal_llong2( res_v, r4_v ), 0);
res_v = (vec_llong2)ilogbd2(x5_v);
TEST_CHECK("20060904000005AAN", allequal_llong2( res_v, r5_v ), 0);
res_v = (vec_llong2)ilogbd2(x6_v);
TEST_CHECK("20060904000006AAN", allequal_llong2( res_v, r6_v ), 0);
res_v = (vec_llong2)ilogbd2(x7_v);
TEST_CHECK("20060904000007AAN", allequal_llong2( res_v, r7_v ), 0);
res_v = (vec_llong2)ilogbd2(x8_v);
TEST_CHECK("20060904000008AAN", allequal_llong2( res_v, r8_v ), 0);
res_v = (vec_llong2)ilogbd2(x9_v);
TEST_CHECK("20060904000009AAN", allequal_llong2( res_v, r9_v ), 0);
res_v = (vec_llong2)ilogbd2(x10_v);
TEST_CHECK("20060904000010AAN", allequal_llong2( res_v, r10_v ), 0);
res_v = (vec_llong2)ilogbd2(x11_v);
TEST_CHECK("20060904000011AAN", allequal_llong2( res_v, r11_v ), 0);
res_v = (vec_llong2)ilogbd2(x12_v);
TEST_CHECK("20060904000012AAN", allequal_llong2( res_v, r12_v ), 0);
res_v = (vec_llong2)ilogbd2(x13_v);
TEST_CHECK("20060904000013AAN", allequal_llong2( res_v, r13_v ), 0);
res_v = (vec_llong2)ilogbd2(x14_v);
TEST_CHECK("20060904000014AAN", allequal_llong2( res_v, r14_v ), 0);
res_v = (vec_llong2)ilogbd2(x15_v);
TEST_CHECK("20060904000015AAN", allequal_llong2( res_v, r15_v ), 0);
res_v = (vec_llong2)ilogbd2(x16_v);
TEST_CHECK("20060904000016AAN", allequal_llong2( res_v, r16_v ), 0);
res_v = (vec_llong2)ilogbd2(x17_v);
TEST_CHECK("20060904000017AAN", allequal_llong2( res_v, r17_v ), 0);
res_v = (vec_llong2)ilogbd2(x18_v);
TEST_CHECK("20060904000018AAN", allequal_llong2( res_v, r18_v ), 0);
res_v = (vec_llong2)ilogbd2(x19_v);
TEST_CHECK("20060904000019AAN", allequal_llong2( res_v, r19_v ), 0);
res_v = (vec_llong2)ilogbd2(x20_v);
TEST_CHECK("20060904000020AAN", allequal_llong2( res_v, r20_v ), 0);
res_v = (vec_llong2)ilogbd2(x21_v);
TEST_CHECK("20060904000021AAN", allequal_llong2( res_v, r21_v ), 0);
res_v = (vec_llong2)ilogbd2(x22_v);
TEST_CHECK("20060904000022AAN", allequal_llong2( res_v, r22_v ), 0);
res_v = (vec_llong2)ilogbd2(x23_v);
TEST_CHECK("20060904000023AAN", allequal_llong2( res_v, r23_v ), 0);
res_v = (vec_llong2)ilogbd2(x24_v);
TEST_CHECK("20060904000024AAN", allequal_llong2( res_v, r24_v ), 0);
res_v = (vec_llong2)ilogbd2(x25_v);
TEST_CHECK("20060904000025AAN", allequal_llong2( res_v, r25_v ), 0);
res_v = (vec_llong2)ilogbd2(x26_v);
TEST_CHECK("20060904000026AAN", allequal_llong2( res_v, r26_v ), 0);
res_v = (vec_llong2)ilogbd2(x27_v);
TEST_CHECK("20060904000027AAN", allequal_llong2( res_v, r27_v ), 0);
res_v = (vec_llong2)ilogbd2(x28_v);
TEST_CHECK("20060904000028AAN", allequal_llong2( res_v, r28_v ), 0);
res_v = (vec_llong2)ilogbd2(x29_v);
TEST_CHECK("20060904000029AAN", allequal_llong2( res_v, r29_v ), 0);
res_v = (vec_llong2)ilogbd2(x30_v);
TEST_CHECK("20060904000030AAN", allequal_llong2( res_v, r30_v ), 0);
TEST_SET_DONE();
TEST_EXIT();
}
int main()
{
TEST_SET_START("20060824103000MH","MH", "fmind2_fmaxd2");
double denorm_min = hide_double(make_double(0x0000000000000001ull));
double denorm_max = hide_double(make_double(0x000fffffffffffffull));
double norm_min = hide_double(make_double(0x0010000000000000ull));
double norm_max = hide_double(make_double(0x7fefffffffffffffull));
double x0min = hide_double(1760.135);
double x0max = hide_double(19355.03);
double x1min = hide_double(-12351.9);
double x1max = hide_double(-139.035);
double x2min = hide_double(-1.0);
double x2max = hide_double(0.0);
double x3min = hide_double(nan(""));
double x3max = hide_double(-1.0);
double x4min = hide_double(-0.0);
double x4max = hide_double(0.0);
double x5min = denorm_min;
double x5max = hide_double(1.0e-323);
double x6min = norm_max;
double x6max = hide_double(HUGE_VAL);
double x7min = hide_double(-HUGE_VAL);
double x7max = hide_double(19355.03);
double x8min = hide_double(-HUGE_VAL);
double x8max = hide_double(HUGE_VAL);
double x9min = denorm_max;
double x9max = norm_min;
vec_double2 x0min_v = spu_splats(x0min);
vec_double2 x0max_v = spu_splats(x0max);
vec_double2 x1min_v = spu_splats(x1min);
vec_double2 x1max_v = spu_splats(x1max);
vec_double2 x2min_v = spu_splats(x2min);
vec_double2 x2max_v = spu_splats(x2max);
vec_double2 x3min_v = spu_splats(x3min);
vec_double2 x3max_v = spu_splats(x3max);
vec_double2 x4min_v = spu_splats(x4min);
vec_double2 x4max_v = spu_splats(x4max);
vec_double2 x5min_v = spu_splats(x5min);
vec_double2 x5max_v = spu_splats(x5max);
vec_double2 x6min_v = spu_splats(x6min);
vec_double2 x6max_v = spu_splats(x6max);
vec_double2 x7min_v = spu_splats(x7min);
vec_double2 x7max_v = spu_splats(x7max);
vec_double2 x8min_v = spu_splats(x8min);
vec_double2 x8max_v = spu_splats(x8max);
vec_double2 x9min_v = spu_splats(x9min);
vec_double2 x9max_v = spu_splats(x9max);
vec_double2 x51min_v = (vec_double2){x5min, x1min};
vec_double2 x51max_v = (vec_double2){x5max, x1max};
vec_double2 res_v;
TEST_START("fmind2");
res_v = fmind2(x0min_v, x0max_v);
TEST_CHECK("20060824103001MH", allequal_double2( res_v, x0min_v ), 0);
res_v = fmind2(x0max_v, x0min_v);
TEST_CHECK("20060824103002MH", allequal_double2( res_v, x0min_v ), 0);
res_v = fmind2(x1min_v, x1max_v);
TEST_CHECK("20060824103003MH", allequal_double2( res_v, x1min_v ), 0);
res_v = fmind2(x1max_v, x1min_v);
TEST_CHECK("20060824103004MH", allequal_double2( res_v, x1min_v ), 0);
res_v = fmind2(x2min_v, x2max_v);
TEST_CHECK("20060824103005MH", allequal_double2( res_v, x2min_v ), 0);
res_v = fmind2(x2max_v, x2min_v);
TEST_CHECK("20060824103006MH", allequal_double2( res_v, x2min_v ), 0);
res_v = fmind2(x3min_v, x3max_v);
TEST_CHECK("20060824103007MH", allequal_double2( res_v, x3max_v ), 0);
res_v = fmind2(x3max_v, x3min_v);
TEST_CHECK("20060824103008MH", allequal_double2( res_v, x3max_v ), 0);
res_v = fmind2(x4min_v, x4max_v);
TEST_CHECK("20060824103009MH", allequal_double2( res_v, x4min_v ), 0);
res_v = fmind2(x4max_v, x4min_v);
TEST_CHECK("20060824103010MH", allequal_double2( res_v, x4min_v ), 0);
res_v = fmind2(x5min_v, x5max_v);
TEST_CHECK("20060824103011MH", allequal_double2( res_v, x5min_v ), 0);
res_v = fmind2(x5max_v, x5min_v);
TEST_CHECK("20060824103012MH", allequal_double2( res_v, x5min_v ), 0);
res_v = fmind2(x6min_v, x6max_v);
TEST_CHECK("20060824103013MH", allequal_double2( res_v, x6min_v ), 0);
res_v = fmind2(x6max_v, x6min_v);
TEST_CHECK("20060824103014MH", allequal_double2( res_v, x6min_v ), 0);
res_v = fmind2(x7min_v, x7max_v);
TEST_CHECK("20060824103015MH", allequal_double2( res_v, x7min_v ), 0);
res_v = fmind2(x7max_v, x7min_v);
TEST_CHECK("20060824103016MH", allequal_double2( res_v, x7min_v ), 0);
res_v = fmind2(x8min_v, x8max_v);
TEST_CHECK("20060824103017MH", allequal_double2( res_v, x8min_v ), 0);
res_v = fmind2(x8max_v, x8min_v);
TEST_CHECK("20060824103018MH", allequal_double2( res_v, x8min_v ), 0);
res_v = fmind2(x9min_v, x9max_v);
TEST_CHECK("20060824103019MH", allequal_double2( res_v, x9min_v ), 0);
res_v = fmind2(x9max_v, x9min_v);
TEST_CHECK("20060824103020MH", allequal_double2( res_v, x9min_v ), 0);
res_v = fmind2(x51min_v, x51max_v);
TEST_CHECK("20060824103021MH", allequal_double2( res_v, x51min_v ), 0);
res_v = fmind2(x51max_v, x51min_v);
TEST_CHECK("20060824103022MH", allequal_double2( res_v, x51min_v ), 0);
TEST_START("fmaxd2");
res_v = fmaxd2(x0min_v, x0max_v);
TEST_CHECK("20060824103101MH", allequal_double2( res_v, x0max_v ), 0);
res_v = fmaxd2(x0max_v, x0min_v);
TEST_CHECK("20060824103102MH", allequal_double2( res_v, x0max_v ), 0);
res_v = fmaxd2(x1min_v, x1max_v);
TEST_CHECK("20060824103103MH", allequal_double2( res_v, x1max_v ), 0);
res_v = fmaxd2(x1max_v, x1min_v);
TEST_CHECK("20060824103104MH", allequal_double2( res_v, x1max_v ), 0);
res_v = fmaxd2(x2min_v, x2max_v);
TEST_CHECK("20060824103105MH", allequal_double2( res_v, x2max_v ), 0);
res_v = fmaxd2(x2max_v, x2min_v);
TEST_CHECK("20060824103106MH", allequal_double2( res_v, x2max_v ), 0);
res_v = fmaxd2(x3min_v, x3max_v);
TEST_CHECK("20060824103107MH", allequal_double2( res_v, x3max_v ), 0);
res_v = fmaxd2(x3max_v, x3min_v);
TEST_CHECK("20060824103108MH", allequal_double2( res_v, x3max_v ), 0);
res_v = fmaxd2(x4min_v, x4max_v);
TEST_CHECK("20060824103109MH", allequal_double2( res_v, x4max_v ), 0);
res_v = fmaxd2(x4max_v, x4min_v);
TEST_CHECK("20060824103110MH", allequal_double2( res_v, x4max_v ), 0);
res_v = fmaxd2(x5min_v, x5max_v);
TEST_CHECK("20060824103111MH", allequal_double2( res_v, x5max_v ), 0);
res_v = fmaxd2(x5max_v, x5min_v);
TEST_CHECK("20060824103112MH", allequal_double2( res_v, x5max_v ), 0);
res_v = fmaxd2(x6min_v, x6max_v);
TEST_CHECK("20060824103113MH", allequal_double2( res_v, x6max_v ), 0);
res_v = fmaxd2(x6max_v, x6min_v);
TEST_CHECK("20060824103114MH", allequal_double2( res_v, x6max_v ), 0);
res_v = fmaxd2(x7min_v, x7max_v);
TEST_CHECK("20060824103115MH", allequal_double2( res_v, x7max_v ), 0);
res_v = fmaxd2(x7max_v, x7min_v);
TEST_CHECK("20060824103116MH", allequal_double2( res_v, x7max_v ), 0);
res_v = fmaxd2(x8min_v, x8max_v);
TEST_CHECK("20060824103117MH", allequal_double2( res_v, x8max_v ), 0);
res_v = fmaxd2(x8max_v, x8min_v);
TEST_CHECK("20060824103118MH", allequal_double2( res_v, x8max_v ), 0);
res_v = fmaxd2(x9min_v, x9max_v);
TEST_CHECK("20060824103119MH", allequal_double2( res_v, x9max_v ), 0);
res_v = fmaxd2(x9max_v, x9min_v);
TEST_CHECK("20060824103120MH", allequal_double2( res_v, x9max_v ), 0);
res_v = fmaxd2(x51min_v, x51max_v);
TEST_CHECK("20060824103121MH", allequal_double2( res_v, x51max_v ), 0);
res_v = fmaxd2(x51max_v, x51min_v);
TEST_CHECK("20060824103122MH", allequal_double2( res_v, x51max_v ), 0);
TEST_SET_DONE();
TEST_EXIT();
}
