\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}\begin{array}{l}
\mathbf{if}\;\alpha \leq 72043923.58267654:\\
\;\;\;\;\frac{\log \left(e^{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2}} \cdot e\right)}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\beta}{\left(\alpha + \beta\right) + 2} - \left(\frac{4}{\alpha \cdot \alpha} - \left(\frac{2}{\alpha} + \frac{8}{{\alpha}^{3}}\right)\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 72043923.58267654)
(/ (log (* (exp (/ (- beta alpha) (+ (+ alpha beta) 2.0))) E)) 2.0)
(/
(-
(/ beta (+ (+ alpha beta) 2.0))
(- (/ 4.0 (* alpha alpha)) (+ (/ 2.0 alpha) (/ 8.0 (pow alpha 3.0)))))
2.0)))double code(double alpha, double beta) {
return (((beta - alpha) / ((alpha + beta) + 2.0)) + 1.0) / 2.0;
}
double code(double alpha, double beta) {
double tmp;
if (alpha <= 72043923.58267654) {
tmp = log(exp((beta - alpha) / ((alpha + beta) + 2.0)) * ((double) M_E)) / 2.0;
} else {
tmp = ((beta / ((alpha + beta) + 2.0)) - ((4.0 / (alpha * alpha)) - ((2.0 / alpha) + (8.0 / pow(alpha, 3.0))))) / 2.0;
}
return tmp;
}



Bits error versus alpha



Bits error versus beta
Results
if alpha < 72043923.5826765448Initial program 0.1
rmApplied add-log-exp_binary640.1
Applied add-log-exp_binary640.1
Applied sum-log_binary640.1
Simplified0.1
if 72043923.5826765448 < alpha Initial program 49.3
rmApplied div-sub_binary6449.3
Applied associate-+l-_binary6447.7
Simplified47.7
Taylor expanded around inf 18.8
Simplified18.8
Final simplification6.4
herbie shell --seed 2020220
(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))