\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}\begin{array}{l}
\mathbf{if}\;\alpha \leq 8.680683382301839 \cdot 10^{+40}:\\
\;\;\;\;\frac{\log \left(e^{\frac{\beta - \alpha}{\beta + \left(\alpha + 2\right)} + 1}\right)}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\beta}{2 + \left(\alpha + \beta\right)} + \left(\left(\frac{2}{\alpha} + \frac{8}{{\alpha}^{3}}\right) - \frac{4}{\alpha \cdot \alpha}\right)}{2}\\
\end{array}(FPCore (alpha beta) :precision binary64 (/ (+ (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 1.0) 2.0))
(FPCore (alpha beta)
:precision binary64
(if (<= alpha 8.680683382301839e+40)
(/ (log (exp (+ (/ (- beta alpha) (+ beta (+ alpha 2.0))) 1.0))) 2.0)
(/
(+
(/ beta (+ 2.0 (+ alpha beta)))
(- (+ (/ 2.0 alpha) (/ 8.0 (pow alpha 3.0))) (/ 4.0 (* alpha alpha))))
2.0)))double code(double alpha, double beta) {
return (((double) ((((double) (beta - alpha)) / ((double) (((double) (alpha + beta)) + 2.0))) + 1.0)) / 2.0);
}
double code(double alpha, double beta) {
double tmp;
if ((alpha <= 8.680683382301839e+40)) {
tmp = (((double) log(((double) exp(((double) ((((double) (beta - alpha)) / ((double) (beta + ((double) (alpha + 2.0))))) + 1.0)))))) / 2.0);
} else {
tmp = (((double) ((beta / ((double) (2.0 + ((double) (alpha + beta))))) + ((double) (((double) ((2.0 / alpha) + (8.0 / ((double) pow(alpha, 3.0))))) - (4.0 / ((double) (alpha * alpha))))))) / 2.0);
}
return tmp;
}



Bits error versus alpha



Bits error versus beta
Results
if alpha < 8.6806833823018389e40Initial program Error: 2.1 bits
rmApplied add-log-expError: 2.1 bits
Applied add-log-expError: 2.1 bits
Applied sum-logError: 2.2 bits
SimplifiedError: 2.1 bits
if 8.6806833823018389e40 < alpha Initial program Error: 51.0 bits
rmApplied div-subError: 51.0 bits
Applied associate-+l-Error: 49.4 bits
SimplifiedError: 49.4 bits
Taylor expanded around inf Error: 17.7 bits
SimplifiedError: 17.7 bits
Final simplificationError: 6.7 bits
herbie shell --seed 2020204
(FPCore (alpha beta)
:name "Octave 3.8, jcobi/1"
:precision binary64
:pre (and (> alpha -1.0) (> beta -1.0))
(/ (+ (/ (- beta alpha) (+ (+ alpha beta) 2.0)) 1.0) 2.0))