\frac{\frac{\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\begin{array}{l}
\mathbf{if}\;\alpha \le 8.00429695723737471 \cdot 10^{118}:\\
\;\;\;\;\frac{\frac{e^{\log \left(\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1\right) - \log \left(\left(\alpha + \beta\right) + 2 \cdot 1\right)}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{1 + \left(\beta - \frac{\beta}{\alpha} \cdot 2\right)}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\\
\end{array}double code(double alpha, double beta) {
return (((((double) (((double) (((double) (alpha + beta)) + ((double) (beta * alpha)))) + 1.0)) / ((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0))))) / ((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0))))) / ((double) (((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0)))) + 1.0)));
}
double code(double alpha, double beta) {
double VAR;
if ((alpha <= 8.004296957237375e+118)) {
VAR = ((((double) exp(((double) (((double) log(((double) (((double) (((double) (alpha + beta)) + ((double) (beta * alpha)))) + 1.0)))) - ((double) log(((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0)))))))))) / ((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0))))) / ((double) (((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0)))) + 1.0)));
} else {
VAR = ((((double) (1.0 + ((double) (beta - ((double) ((beta / alpha) * 2.0)))))) / ((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0))))) / ((double) (((double) (((double) (alpha + beta)) + ((double) (2.0 * 1.0)))) + 1.0)));
}
return VAR;
}



Bits error versus alpha



Bits error versus beta
Results
if alpha < 8.00429695723737471e118Initial program 0.7
rmApplied add-exp-log1.9
Applied add-exp-log1.0
Applied div-exp1.0
if 8.00429695723737471e118 < alpha Initial program 15.5
rmApplied add-exp-log16.5
Applied add-exp-log15.9
Applied div-exp15.9
Taylor expanded around inf 28.8
Simplified7.1
Final simplification2.3
herbie shell --seed 2020181
(FPCore (alpha beta)
:name "Octave 3.8, jcobi/3"
:precision binary64
:pre (and (> alpha -1.0) (> beta -1.0))
(/ (/ (/ (+ (+ (+ alpha beta) (* beta alpha)) 1.0) (+ (+ alpha beta) (* 2.0 1.0))) (+ (+ alpha beta) (* 2.0 1.0))) (+ (+ (+ alpha beta) (* 2.0 1.0)) 1.0)))