File: ccmath_scalbln_test.cpp

package info (click to toggle)
scipy 1.16.0-1exp7
  • links: PTS, VCS
  • area: main
  • in suites: experimental
  • size: 234,820 kB
  • sloc: cpp: 503,145; python: 344,611; ansic: 195,638; javascript: 89,566; fortran: 56,210; cs: 3,081; f90: 1,150; sh: 848; makefile: 785; pascal: 284; csh: 135; lisp: 134; xml: 56; perl: 51
file content (72 lines) | stat: -rw-r--r-- 2,326 bytes parent folder | download | duplicates (11)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
//  (C) Copyright Matt Borland 2021.
//  Use, modification and distribution are subject to the
//  Boost Software License, Version 1.0. (See accompanying file
//  LICENSE_1_0.txt or copy at http://www.boost.org/LICENSE_1_0.txt)

#include <cmath>
#include <cfloat>
#include <cstdint>
#include <limits>
#include <type_traits>
#include <boost/math/ccmath/scalbln.hpp>
#include <boost/math/ccmath/isnan.hpp>
#include <boost/math/ccmath/isinf.hpp>

#ifdef BOOST_HAS_FLOAT128
#include <boost/multiprecision/float128.hpp>
#endif

template <typename T>
constexpr void test()
{
    // Tests are only valid on binary systems
    if constexpr (FLT_RADIX == 2)
    {
        if constexpr (std::numeric_limits<T>::has_quiet_NaN)
        {
            static_assert(boost::math::ccmath::isnan(boost::math::ccmath::scalbln(std::numeric_limits<T>::quiet_NaN(), 1l)), "If x is NaN, NaN is returned");
        }

        static_assert(!boost::math::ccmath::scalbln(T(0), 1l), "If x is +- 0, it is returned, unmodified");
        static_assert(!boost::math::ccmath::scalbln(T(-0), 1l), "If x is +- 0, it is returned, unmodified");

        static_assert(boost::math::ccmath::isinf(boost::math::ccmath::scalbln(std::numeric_limits<T>::infinity(), 1l)), 
                        "If x is +- inf, it is returned, unmodified");
        static_assert(boost::math::ccmath::isinf(boost::math::ccmath::scalbln(-std::numeric_limits<T>::infinity(), 1l)), 
                        "If x is +- inf, it is returned, unmodified");

        static_assert(boost::math::ccmath::scalbln(T(2), 0l) == T(2), "If exp is 0, then x is returned, unmodified");

        // 1 * 2^2 = 4
        static_assert(boost::math::ccmath::scalbln(T(1), 2l) == T(4));

        // 1.2 * 2^10 = 1228.8
        static_assert(boost::math::ccmath::scalbln(T(1.2), 10l) == T(1228.8));

        // 500 * 2^-2 = 125
        static_assert(boost::math::ccmath::scalbln(T(500), -2l) == T(125));
    }
}

#if !defined(BOOST_MATH_NO_CONSTEXPR_DETECTION) && !defined(BOOST_MATH_USING_BUILTIN_CONSTANT_P)
int main()
{
    test<float>();
    test<double>();

    #ifndef BOOST_MATH_NO_LONG_DOUBLE_MATH_FUNCTIONS
    test<long double>();
    #endif
    
    #ifdef BOOST_HAS_FLOAT128
    test<boost::multiprecision::float128>();
    #endif

    return 0;
}
#else
int main()
{
    return 0;
}
#endif