From 483eb2f56657e8e7f419ab1a4fab8dce9ade8609 Mon Sep 17 00:00:00 2001
From: Daniel Baumann <daniel.baumann@progress-linux.org>
Date: Sat, 27 Apr 2024 20:24:20 +0200
Subject: Adding upstream version 14.2.21.

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
---
 .../libs/math/example/inverse_gamma_example.cpp    | 57 ++++++++++++++++++++++
 1 file changed, 57 insertions(+)
 create mode 100644 src/boost/libs/math/example/inverse_gamma_example.cpp

(limited to 'src/boost/libs/math/example/inverse_gamma_example.cpp')

diff --git a/src/boost/libs/math/example/inverse_gamma_example.cpp b/src/boost/libs/math/example/inverse_gamma_example.cpp
new file mode 100644
index 00000000..5ec49665
--- /dev/null
+++ b/src/boost/libs/math/example/inverse_gamma_example.cpp
@@ -0,0 +1,57 @@
+// inverse_gamma_example.cpp
+
+// Copyright Paul A. Bristow 2010.
+
+// 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)
+
+// Example 1 of using inverse gamma functions.
+
+#include <boost/math/special_functions/gamma.hpp>
+
+using boost::math::gamma_p_inv; // Compute x given a
+//using boost::math::gamma_q_inv;
+//using boost::math::gamma_p_inva; // Compute a given x
+//using boost::math::gamma_q_inva;
+
+#include <iostream>
+   using std::cout;    using std::endl;
+#include <iomanip>
+   using std::setprecision;
+#include <cmath>
+   using std::sqrt;
+#include <limits>
+
+int main()
+{
+  cout << "Example 1 using Inverse Gamma function. " << endl;
+
+  #ifdef BOOST_NO_CXX11_NUMERIC_LIMITS
+  int max_digits10 = 2 + (boost::math::policies::digits<double, boost::math::policies::policy<> >() * 30103UL) / 100000UL;
+  cout << "BOOST_NO_CXX11_NUMERIC_LIMITS is defined" << endl; 
+#else 
+  int max_digits10 = std::numeric_limits<double>::max_digits10;
+#endif
+  cout << "Show all potentially significant decimal digits std::numeric_limits<double>::max_digits10 = "
+    << max_digits10 << endl; 
+  cout.precision(max_digits10); // 
+
+  double x = 1.;
+  double a = 10;
+
+  double r = boost::math::gamma_q_inv(a ,x);
+
+  cout << " x = " << x << ", = gamma_q_inv(a,x)" << r << endl; // 
+  
+  return 0;
+}  // int main()
+
+/*
+
+Output is:
+
+*/
+
+
-- 
cgit v1.2.3