\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}\begin{array}{l}
\mathbf{if}\;\alpha \leq 1.74995439910408 \cdot 10^{+24}:\\
\;\;\;\;\frac{\frac{\beta}{\left(\alpha + \beta\right) + 2} - \frac{{\left(\frac{\alpha}{\left(\alpha + \beta\right) + 2}\right)}^{3} - 1}{1 + \frac{\alpha \cdot \left(-1 + {\left(\frac{\alpha}{\left(\alpha + \beta\right) + 2}\right)}^{2}\right)}{\left(\left(\alpha + \beta\right) + 2\right) \cdot \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 1.74995439910408e+24)
(/
(-
(/ beta (+ (+ alpha beta) 2.0))
(/
(- (pow (/ alpha (+ (+ alpha beta) 2.0)) 3.0) 1.0)
(+
1.0
(/
(* alpha (+ -1.0 (pow (/ alpha (+ (+ alpha beta) 2.0)) 2.0)))
(*
(+ (+ 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 <= 1.74995439910408e+24)) {
tmp = (((double) ((beta / ((double) (((double) (alpha + beta)) + 2.0))) - (((double) (((double) pow((alpha / ((double) (((double) (alpha + beta)) + 2.0))), 3.0)) - 1.0)) / ((double) (1.0 + (((double) (alpha * ((double) (-1.0 + ((double) pow((alpha / ((double) (((double) (alpha + beta)) + 2.0))), 2.0)))))) / ((double) (((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 < 1.7499543991040801e24Initial program 1.0
rmApplied div-sub_binary641.0
Applied associate-+l-_binary641.0
Simplified1.0
rmApplied flip3--_binary641.1
Simplified1.1
Simplified1.1
rmApplied flip-+_binary641.1
Applied frac-times_binary641.1
Simplified1.1
Simplified1.1
if 1.7499543991040801e24 < alpha Initial program 50.3
rmApplied div-sub_binary6450.2
Applied associate-+l-_binary6448.5
Simplified48.5
Taylor expanded around inf 19.2
Simplified19.2
Final simplification6.6
herbie shell --seed 2020219
(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))