\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2} + 1}{2}\begin{array}{l}
\mathbf{if}\;\alpha \leq 199951.55748759874:\\
\;\;\;\;\frac{\left(\sqrt[3]{\beta} \cdot \sqrt[3]{\beta}\right) \cdot \frac{\sqrt[3]{\beta}}{\left(\alpha + \beta\right) + 2} - \log \left(e^{\frac{\alpha}{\left(\alpha + \beta\right) + 2} - 1}\right)}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(\sqrt[3]{\beta} \cdot \sqrt[3]{\beta}\right) \cdot \frac{\sqrt[3]{\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 199951.55748759874)
(/
(-
(* (* (cbrt beta) (cbrt beta)) (/ (cbrt beta) (+ (+ alpha beta) 2.0)))
(log (exp (- (/ alpha (+ (+ alpha beta) 2.0)) 1.0))))
2.0)
(/
(-
(* (* (cbrt beta) (cbrt beta)) (/ (cbrt 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 (((beta - alpha) / ((alpha + beta) + 2.0)) + 1.0) / 2.0;
}
double code(double alpha, double beta) {
double tmp;
if (alpha <= 199951.55748759874) {
tmp = (((cbrt(beta) * cbrt(beta)) * (cbrt(beta) / ((alpha + beta) + 2.0))) - log(exp((alpha / ((alpha + beta) + 2.0)) - 1.0))) / 2.0;
} else {
tmp = (((cbrt(beta) * cbrt(beta)) * (cbrt(beta) / ((alpha + beta) + 2.0))) - ((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 < 199951.55748759874Initial program 0.0
rmApplied div-sub_binary64_21040.0
Applied associate-+l-_binary64_20360.0
Simplified0.0
rmApplied add-log-exp_binary64_21350.0
Applied add-log-exp_binary64_21350.1
Applied diff-log_binary64_21880.1
Simplified0.0
rmApplied *-un-lft-identity_binary64_20990.0
Applied add-cube-cbrt_binary64_21310.3
Applied times-frac_binary64_21050.3
Simplified0.3
if 199951.55748759874 < alpha Initial program 48.7
rmApplied div-sub_binary64_210448.7
Applied associate-+l-_binary64_203647.2
Simplified47.2
rmApplied add-log-exp_binary64_213547.2
Applied add-log-exp_binary64_213547.3
Applied diff-log_binary64_218847.3
Simplified47.2
rmApplied *-un-lft-identity_binary64_209947.2
Applied add-cube-cbrt_binary64_213147.4
Applied times-frac_binary64_210547.4
Simplified47.4
Taylor expanded around inf 18.7
Simplified18.7
Final simplification6.4
herbie shell --seed 2020299
(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))