int main(int argc, char** argv) {
plan_tests(43 + ARRAY_SIZE(Hypot_test_values));
/* check the division operator */
ok((fixed_one / fixed_one) * fixed(1000) == fixed(1000), "1/1", 0);
ok((fixed_two / fixed_two) * fixed(1000) == fixed(1000), "2/2", 0);
ok((fixed_one / fixed_two) * fixed(1000) == fixed(500), "1/2", 0);
ok((fixed(1000) / fixed(100)) * fixed(1000) == fixed(10000), "1000/100", 0);
ok((fixed(100) / fixed(20)) * fixed(1000) == fixed(5000), "100/20", 0);
ok((fixed(1000000) / fixed(2)) * fixed(1000) == fixed(500000000), "1M/2", 0);
ok((fixed_minus_one / fixed_one) * fixed(1000) == -fixed(1000), "-1/1", 0);
ok((fixed_one / fixed_minus_one) * fixed(1000) == -fixed(1000), "1/-1", 0);
ok((fixed_minus_one / fixed_minus_one) * fixed(1000) == fixed(1000), "-1/-1", 0);
ok((fixed(-1000000) / fixed(2)) * fixed(1000) == -fixed(500000000), "-1M/2", 0);
ok((long)((fixed_one / (fixed_one / fixed(10))) * fixed(1000)) == (10000), "1/0.1", 0);
ok((long)((fixed_one / (fixed_one / fixed(-10))) * fixed(1000)) == -(10000) ||
(long)((fixed_one / (fixed_one / fixed(-10))) * fixed(1000)) == -(10001), "1/-0.1", 0);
ok(equals(fixed_one / fixed_half, 2), "1/0.5", 0);
ok(equals(fixed(1000) / fixed_half, 2000), "1/0.5", 0);
ok(equals(fixed(1000) / (fixed_one / 5), 5000), "1/0.5", 0);
ok(equals(fixed(1000000) / (fixed_one / 5), 5000000), "1/0.5", 0);
ok(equals(fixed(10000000) / (fixed_one / 5), 50000000), "1/0.5", 0);
double da = 20.0;
double dsina = sin(da);
fixed a(da);
fixed sina(sin(a));
printf("a=%g, sin(a)=%g\n", FIXED_DOUBLE(a), FIXED_DOUBLE(sina));
printf("a=%g, sin(a)=%g\n", da, dsina);
ok(fabs(sina - fixed(dsina)) < fixed(1.0e-5), "sin(a)", 0);
double dx = -0.3;
double dy = 0.6;
double dt = atan2(dy, dx);
fixed x(dx);
fixed y(dy);
fixed t(atan2(y, x));
printf("x=%g, y=%g atan(y,x)=%g\n",
FIXED_DOUBLE(x), FIXED_DOUBLE(y), FIXED_DOUBLE(t));
printf("x=%g, y=%g atan(y,x)=%g\n", dx, dy, dt);
ok(fabs(t - fixed(dt)) < fixed(1.0e-5), "atan(y,x)", 0);
{
for (int i=1; i<=2048; i*= 2) {
test_mag_rmag(i);
}
}
test_hypot();
return exit_status();
}
int main()
{
test_acos();
test_asin();
test_atan();
test_atan2();
test_ceil();
test_cos();
test_cosh();
test_exp();
test_fabs();
test_floor();
test_fmod();
test_frexp();
test_ldexp();
test_log();
test_log10();
test_modf();
test_pow();
test_sin();
test_sinh();
test_sqrt();
test_tan();
test_tanh();
test_signbit();
test_fpclassify();
test_isfinite();
test_isinf();
test_isnan();
test_isnormal();
test_isgreater();
test_isgreaterequal();
test_isless();
test_islessequal();
test_islessgreater();
test_isunordered();
test_acosh();
test_asinh();
test_atanh();
test_cbrt();
test_copysign();
test_erf();
test_erfc();
test_exp2();
test_expm1();
test_fdim();
test_fma();
test_fmax();
test_fmin();
test_hypot();
test_ilogb();
test_lgamma();
test_llrint();
test_llround();
test_log1p();
test_log2();
test_logb();
test_lrint();
test_lround();
test_nan();
test_nearbyint();
test_nextafter();
test_nexttoward();
test_remainder();
test_remquo();
test_rint();
test_round();
test_scalbln();
test_scalbn();
test_tgamma();
test_trunc();
}
