1 //Copyright (c) 2008-2016 Emil Dotchevski and Reverge Studios, Inc.
2
3 //Distributed under the Boost Software License, Version 1.0. (See accompanying
4 //file LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)
5
6 #include <boost/qvm/math.hpp>
7 #include <boost/detail/lightweight_test.hpp>
8 #include <stdlib.h>
9
10 namespace
11 {
12 template <class T>
13 void
test1(T (* f1)(T),T (* f2)(T))14 test1( T (*f1)(T), T (*f2)(T) )
15 {
16 for( int i=0; i!=100; ++i )
17 {
18 T a = T(rand()) / T(RAND_MAX);
19 BOOST_TEST_EQ(f1(a), f2(a));
20 }
21 }
22 template <class T,class U>
23 void
test2(T (* f1)(T,U),T (* f2)(T,U))24 test2( T (*f1)(T,U), T (*f2)(T,U) )
25 {
26 for( int i=0; i!=100; ++i )
27 {
28 T a = T(rand()) / T(RAND_MAX);
29 T b = T(rand()) / T(RAND_MAX);
30 BOOST_TEST_EQ(f1(a,b), f2(a,b));
31 }
32 }
33 }
34
35 int
main()36 main()
37 {
38 test1<float>(&boost::qvm::acos<float>, &::acosf);
39 test1<float>(&boost::qvm::asin<float>, &::asinf);
40 test1<float>(&boost::qvm::atan<float>, &::atanf);
41 test2<float,float>(&boost::qvm::atan2<float>, &::atan2f);
42 test1<float>(&boost::qvm::cos<float>, &::cosf);
43 test1<float>(&boost::qvm::sin<float>, &::sinf);
44 test1<float>(&boost::qvm::tan<float>, &::tanf);
45 test1<float>(&boost::qvm::cosh<float>, &::coshf);
46 test1<float>(&boost::qvm::sinh<float>, &::sinhf);
47 test1<float>(&boost::qvm::tanh<float>, &::tanhf);
48 test1<float>(&boost::qvm::exp<float>, &::expf);
49 test1<float>(&boost::qvm::log<float>, &::logf);
50 test1<float>(&boost::qvm::log10<float>, &::log10f);
51 test2<float,float>(&boost::qvm::mod<float>, &::fmodf);
52 test2<float,float>(&boost::qvm::pow<float>, &::powf);
53 test1<float>(&boost::qvm::sqrt<float>, &::sqrtf);
54 test1<float>(&boost::qvm::ceil<float>, &::ceilf);
55 test1<float>(&boost::qvm::abs<float>, &::fabsf);
56 test1<float>(&boost::qvm::floor<float>, &::floorf);
57 test2<float, int>(&boost::qvm::ldexp<float>, &::ldexpf);
58
59 test1<double>(&boost::qvm::acos<double>, &::acos);
60 test1<double>(&boost::qvm::asin<double>, &::asin);
61 test1<double>(&boost::qvm::atan<double>, &::atan);
62 test2<double,double>(&boost::qvm::atan2<double>, &::atan2);
63 test1<double>(&boost::qvm::cos<double>, &::cos);
64 test1<double>(&boost::qvm::sin<double>, &::sin);
65 test1<double>(&boost::qvm::tan<double>, &::tan);
66 test1<double>(&boost::qvm::cosh<double>, &::cosh);
67 test1<double>(&boost::qvm::sinh<double>, &::sinh);
68 test1<double>(&boost::qvm::tanh<double>, &::tanh);
69 test1<double>(&boost::qvm::exp<double>, &::exp);
70 test1<double>(&boost::qvm::log<double>, &::log);
71 test1<double>(&boost::qvm::log10<double>, &::log10);
72 test2<double,double>(&boost::qvm::mod<double>, &::fmod);
73 test2<double,double>(&boost::qvm::pow<double>, &::pow);
74 test1<double>(&boost::qvm::sqrt<double>, &::sqrt);
75 test1<double>(&boost::qvm::ceil<double>, &::ceil);
76 test1<double>(&boost::qvm::abs<double>, &::fabs);
77 test1<double>(&boost::qvm::floor<double>, &::floor);
78 test2<double, int>(&boost::qvm::ldexp<double>, &::ldexp);
79
80 test1<long double>(&boost::qvm::acos<long double>, &::acosl);
81 test1<long double>(&boost::qvm::asin<long double>, &::asinl);
82 test1<long double>(&boost::qvm::atan<long double>, &::atanl);
83 test2<long double,long double>(&boost::qvm::atan2<long double>, &::atan2l);
84 test1<long double>(&boost::qvm::cos<long double>, &::cosl);
85 test1<long double>(&boost::qvm::sin<long double>, &::sinl);
86 test1<long double>(&boost::qvm::tan<long double>, &::tanl);
87 test1<long double>(&boost::qvm::cosh<long double>, &::coshl);
88 test1<long double>(&boost::qvm::sinh<long double>, &::sinhl);
89 test1<long double>(&boost::qvm::tanh<long double>, &::tanhl);
90 test1<long double>(&boost::qvm::exp<long double>, &::expl);
91 test1<long double>(&boost::qvm::log<long double>, &::logl);
92 test1<long double>(&boost::qvm::log10<long double>, &::log10l);
93 test2<long double,long double>(&boost::qvm::mod<long double>, &::fmodl);
94 test2<long double,long double>(&boost::qvm::pow<long double>, &::powl);
95 test1<long double>(&boost::qvm::sqrt<long double>, &::sqrtl);
96 test1<long double>(&boost::qvm::ceil<long double>, &::ceill);
97 test1<long double>(&boost::qvm::abs<long double>, &::fabsl);
98 test1<long double>(&boost::qvm::floor<long double>, &::floorl);
99 test2<long double, int>(&boost::qvm::ldexp<long double>, &::ldexpl);
100
101 return boost::report_errors();
102 }
103