1 /*################################################################################
2   ##
3   ##   Copyright (C) 2016-2020 Keith O'Hara
4   ##
5   ##   This file is part of the GCE-Math C++ library.
6   ##
7   ##   Licensed under the Apache License, Version 2.0 (the "License");
8   ##   you may not use this file except in compliance with the License.
9   ##   You may obtain a copy of the License at
10   ##
11   ##       http://www.apache.org/licenses/LICENSE-2.0
12   ##
13   ##   Unless required by applicable law or agreed to in writing, software
14   ##   distributed under the License is distributed on an "AS IS" BASIS,
15   ##   WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
16   ##   See the License for the specific language governing permissions and
17   ##   limitations under the License.
18   ##
19   ################################################################################*/
20 
21 #define TEST_PRINT_PRECISION_1 2
22 #define TEST_PRINT_PRECISION_2 2
23 
24 #include "gcem_tests.hpp"
25 
main()26 int main()
27 {
28     print_begin("fmod");
29 
30     //
31 
32     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,   0.0,   0.0);
33     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,  -0.0,   0.0);
34     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,   0.0,  -0.0);
35     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,   5.3,   2.0);
36     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,  -5.3,   2.0);
37     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,   5.3,  -2.0);
38     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,  -5.3,  -2.0);
39     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,  18.5,   4.2);
40     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -18.5,   4.2);
41     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod,  18.5,  -4.2);
42     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -18.5,  -4.2);
43 
44     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -std::numeric_limits<long double>::infinity(),  0.0);
45     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -std::numeric_limits<long double>::infinity(), -1.0);
46     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -std::numeric_limits<long double>::infinity(),  1.0);
47     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -std::numeric_limits<long double>::infinity(),  std::numeric_limits<long double>::infinity());
48     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -std::numeric_limits<long double>::infinity(), -std::numeric_limits<long double>::infinity());
49     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, -std::numeric_limits<long double>::infinity(),  std::numeric_limits<long double>::quiet_NaN());
50 
51     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::infinity(),  0.0);
52     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::infinity(), -1.0);
53     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::infinity(),  1.0);
54     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::infinity(),  std::numeric_limits<long double>::infinity());
55     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::infinity(), -std::numeric_limits<long double>::infinity());
56     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::infinity(),  std::numeric_limits<long double>::quiet_NaN());
57 
58     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::quiet_NaN(),  0.0);
59     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::quiet_NaN(), -1.0);
60     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::quiet_NaN(),  1.0);
61     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::quiet_NaN(),  std::numeric_limits<long double>::infinity());
62     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::quiet_NaN(), -std::numeric_limits<long double>::infinity());
63     GCEM_TEST_COMPARE_VALS(gcem::fmod,std::fmod, std::numeric_limits<long double>::quiet_NaN(),  std::numeric_limits<long double>::quiet_NaN());
64 
65     //
66 
67     print_final("fmod");
68 
69     return 0;
70 }
71