\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}\begin{array}{l}
\mathbf{if}\;\alpha \leq 104449142829.8675:\\
\;\;\;\;\frac{\frac{1}{\frac{\sqrt[3]{\left(\alpha + \beta\right) + 2} \cdot e^{\log \left(\sqrt[3]{\left(\alpha + \beta\right) + 2}\right)}}{\sqrt[3]{\beta} \cdot \sqrt[3]{\beta}} \cdot \frac{\sqrt[3]{\left(\alpha + \beta\right) + 2}}{\sqrt[3]{\beta}}} - \left(\frac{\alpha}{\left(\alpha + \beta\right) + 2} - 1\right)}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{1}{\frac{\left(\alpha + \beta\right) + 2}{\beta}} - \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 104449142829.8675)
(/
(-
(/
1.0
(*
(/
(*
(cbrt (+ (+ alpha beta) 2.0))
(exp (log (cbrt (+ (+ alpha beta) 2.0)))))
(* (cbrt beta) (cbrt beta)))
(/ (cbrt (+ (+ alpha beta) 2.0)) (cbrt beta))))
(- (/ alpha (+ (+ alpha beta) 2.0)) 1.0))
2.0)
(/
(-
(/ 1.0 (/ (+ (+ alpha beta) 2.0) beta))
(- (/ 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 <= 104449142829.8675) {
tmp = ((1.0 / (((cbrt((alpha + beta) + 2.0) * exp(log(cbrt((alpha + beta) + 2.0)))) / (cbrt(beta) * cbrt(beta))) * (cbrt((alpha + beta) + 2.0) / cbrt(beta)))) - ((alpha / ((alpha + beta) + 2.0)) - 1.0)) / 2.0;
} else {
tmp = ((1.0 / (((alpha + beta) + 2.0) / beta)) - ((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 < 104449142829.86749Initial program 0.2
rmApplied div-sub_binary640.2
Applied associate-+l-_binary640.2
Simplified0.2
rmApplied clear-num_binary640.2
rmApplied add-cube-cbrt_binary640.5
Applied add-cube-cbrt_binary640.2
Applied times-frac_binary640.2
rmApplied add-exp-log_binary641.3
if 104449142829.86749 < alpha Initial program 49.5
rmApplied div-sub_binary6449.5
Applied associate-+l-_binary6448.0
Simplified48.0
rmApplied clear-num_binary6448.0
Taylor expanded around inf 18.4
Simplified18.4
Final simplification6.8
herbie shell --seed 2020232
(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))