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



Bits error versus alpha



Bits error versus beta
Results
if alpha < 44511.5731189620055Initial program 0.0
rmApplied div-sub_binary640.0
Applied associate-+l-_binary640.0
Simplified0.0
rmApplied add-cube-cbrt_binary640.0
rmApplied add-log-exp_binary640.0
Simplified0.0
if 44511.5731189620055 < alpha Initial program 48.9
rmApplied div-sub_binary6448.9
Applied associate-+l-_binary6447.4
Simplified47.4
Taylor expanded around inf 18.3
Simplified18.3
Final simplification6.1
herbie shell --seed 2020205
(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))