\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}\;\beta \le 6.85580170450604043 \cdot 10^{160}:\\
\;\;\;\;\frac{\frac{\frac{\sqrt{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}}{\sqrt{\left(\alpha + \beta\right) + 2 \cdot 1}}}{\frac{\left(\alpha + \beta\right) + 2 \cdot 1}{\frac{\sqrt{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}}{\sqrt{\left(\alpha + \beta\right) + 2 \cdot 1}}}}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{0.25 \cdot \alpha + \left(0.5 + 0.25 \cdot \beta\right)}{\left(\alpha + \beta\right) \cdot \left(\alpha + \beta\right) - \left(2 \cdot 1\right) \cdot \left(2 \cdot 1\right)}}{\frac{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}{\left(\alpha + \beta\right) - 2 \cdot 1}}\\
\end{array}double f(double alpha, double beta) {
double r175186 = alpha;
double r175187 = beta;
double r175188 = r175186 + r175187;
double r175189 = r175187 * r175186;
double r175190 = r175188 + r175189;
double r175191 = 1.0;
double r175192 = r175190 + r175191;
double r175193 = 2.0;
double r175194 = r175193 * r175191;
double r175195 = r175188 + r175194;
double r175196 = r175192 / r175195;
double r175197 = r175196 / r175195;
double r175198 = r175195 + r175191;
double r175199 = r175197 / r175198;
return r175199;
}
double f(double alpha, double beta) {
double r175200 = beta;
double r175201 = 6.85580170450604e+160;
bool r175202 = r175200 <= r175201;
double r175203 = alpha;
double r175204 = r175203 + r175200;
double r175205 = r175200 * r175203;
double r175206 = r175204 + r175205;
double r175207 = 1.0;
double r175208 = r175206 + r175207;
double r175209 = sqrt(r175208);
double r175210 = 2.0;
double r175211 = r175210 * r175207;
double r175212 = r175204 + r175211;
double r175213 = sqrt(r175212);
double r175214 = r175209 / r175213;
double r175215 = r175212 / r175214;
double r175216 = r175214 / r175215;
double r175217 = r175212 + r175207;
double r175218 = r175216 / r175217;
double r175219 = 0.25;
double r175220 = r175219 * r175203;
double r175221 = 0.5;
double r175222 = r175219 * r175200;
double r175223 = r175221 + r175222;
double r175224 = r175220 + r175223;
double r175225 = r175204 * r175204;
double r175226 = r175211 * r175211;
double r175227 = r175225 - r175226;
double r175228 = r175224 / r175227;
double r175229 = r175204 - r175211;
double r175230 = r175217 / r175229;
double r175231 = r175228 / r175230;
double r175232 = r175202 ? r175218 : r175231;
return r175232;
}



Bits error versus alpha



Bits error versus beta
Results
if beta < 6.85580170450604e+160Initial program 1.2
rmApplied add-sqr-sqrt1.8
Applied add-sqr-sqrt1.7
Applied times-frac1.7
Applied associate-/l*1.2
if 6.85580170450604e+160 < beta Initial program 16.3
rmApplied flip-+17.7
Applied associate-/r/17.7
Applied associate-/l*17.7
Taylor expanded around 0 7.6
Final simplification2.3
herbie shell --seed 2020045
(FPCore (alpha beta)
:name "Octave 3.8, jcobi/3"
:precision binary64
:pre (and (> alpha -1) (> beta -1))
(/ (/ (/ (+ (+ (+ alpha beta) (* beta alpha)) 1) (+ (+ alpha beta) (* 2 1))) (+ (+ alpha beta) (* 2 1))) (+ (+ (+ alpha beta) (* 2 1)) 1)))