File: git_issue_826.cpp

package info (click to toggle)
boost1.83 1.83.0-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 545,632 kB
  • sloc: cpp: 3,857,086; xml: 125,552; ansic: 34,414; python: 25,887; asm: 5,276; sh: 4,799; ada: 1,681; makefile: 1,629; perl: 1,212; pascal: 1,139; sql: 810; yacc: 478; ruby: 102; lisp: 24; csh: 6
file content (31 lines) | stat: -rw-r--r-- 979 bytes parent folder | download | duplicates (8)
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
// Copyright Nicholas McKibben, 2022
// Use, modification and distribution are subject to the
// Boost Software License, Version 1.0. (See accompanying file
// LICENSE or copy at http://www.boost.org/LICENSE_1_0.txt)

#include <cfenv>
#include <iostream>
#include <boost/math/distributions/beta.hpp>
#include "math_unit_test.hpp"

#pragma STDC FENV_ACCESS ON

int main() {
    constexpr double q {0.999995};
    constexpr double a {2};
    constexpr double b {99999};
    std::feclearexcept(FE_ALL_EXCEPT);
    boost::math::beta_distribution<double> d {a, b};
    const auto ans = boost::math::quantile(d, q);
    if(std::fetestexcept(FE_OVERFLOW)) {
        std::cout << "overflow reported" << std::endl;
    } else {
        std::cout << "overflow not reported" << std::endl;
    }
    std::cout << std::setprecision(16) << "Ans is: " << ans << std::endl;
    return 0;

    CHECK_ULP_CLOSE(ans, 0.000149761910560502, 1);
}
// overflow reported
// Ans is: 0.000149761910560502