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



Bits error versus alpha



Bits error versus beta
Results
if (/.f64 (-.f64 beta alpha) (+.f64 (+.f64 alpha beta) 2)) < -0.99999999999975286Initial program 60.4
rmApplied div-sub_binary64_212960.4
Applied associate-+l-_binary64_205958.5
Simplified58.5
Taylor expanded around inf 11.3
Simplified11.3
if -0.99999999999975286 < (/.f64 (-.f64 beta alpha) (+.f64 (+.f64 alpha beta) 2)) Initial program 0.3
rmApplied div-sub_binary64_21290.3
Applied associate-+l-_binary64_20590.3
Simplified0.3
rmApplied add-exp-log_binary64_21620.3
Simplified0.3
Final simplification3.2
herbie shell --seed 2020342
(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))