\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}\begin{array}{l}
\mathbf{if}\;\alpha \leq 2.9257281358558516 \cdot 10^{+23}:\\
\;\;\;\;\frac{1 + \frac{1}{\sqrt{\left(\alpha + \beta\right) + 2}} \cdot \frac{\beta - \alpha}{\sqrt{\left(\alpha + \beta\right) + 2}}}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\sqrt[3]{\beta} \cdot \sqrt[3]{\beta}}{\frac{\left(\alpha + \beta\right) + 2}{\sqrt[3]{\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 2.9257281358558516e+23)
(/
(+
1.0
(*
(/ 1.0 (sqrt (+ (+ alpha beta) 2.0)))
(/ (- beta alpha) (sqrt (+ (+ alpha beta) 2.0)))))
2.0)
(/
(-
(/ (* (cbrt beta) (cbrt beta)) (/ (+ (+ alpha beta) 2.0) (cbrt 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 <= 2.9257281358558516e+23) {
tmp = (1.0 + ((1.0 / sqrt((alpha + beta) + 2.0)) * ((beta - alpha) / sqrt((alpha + beta) + 2.0)))) / 2.0;
} else {
tmp = (((cbrt(beta) * cbrt(beta)) / (((alpha + beta) + 2.0) / cbrt(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 < 2.9257281358558516e23Initial program 0.8
rmApplied add-sqr-sqrt_binary640.8
Applied *-un-lft-identity_binary640.8
Applied times-frac_binary640.8
Simplified0.8
Simplified0.8
if 2.9257281358558516e23 < alpha Initial program 51.3
rmApplied div-sub_binary6451.3
Applied associate-+l-_binary6449.6
Simplified49.6
rmApplied add-cube-cbrt_binary6449.7
Applied associate-/l*_binary6449.7
Taylor expanded around inf 18.1
Simplified18.1
Final simplification6.0
herbie shell --seed 2020224
(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))