\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 2.733428746494648075360941799582727737144 \cdot 10^{158}:\\
\;\;\;\;\frac{\frac{\sqrt[3]{{\left(\frac{\left(\left(\alpha + \beta\right) + \beta \cdot \alpha\right) + 1}{\left(\alpha + \beta\right) + 2 \cdot 1}\right)}^{3}}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\frac{1}{\left(\frac{1}{\alpha} + \frac{1}{\beta}\right) - \frac{1}{{\alpha}^{2}}}}{\left(\alpha + \beta\right) + 2 \cdot 1}}{\left(\left(\alpha + \beta\right) + 2 \cdot 1\right) + 1}\\
\end{array}double f(double alpha, double beta) {
double r125162 = alpha;
double r125163 = beta;
double r125164 = r125162 + r125163;
double r125165 = r125163 * r125162;
double r125166 = r125164 + r125165;
double r125167 = 1.0;
double r125168 = r125166 + r125167;
double r125169 = 2.0;
double r125170 = r125169 * r125167;
double r125171 = r125164 + r125170;
double r125172 = r125168 / r125171;
double r125173 = r125172 / r125171;
double r125174 = r125171 + r125167;
double r125175 = r125173 / r125174;
return r125175;
}
double f(double alpha, double beta) {
double r125176 = alpha;
double r125177 = 2.733428746494648e+158;
bool r125178 = r125176 <= r125177;
double r125179 = beta;
double r125180 = r125176 + r125179;
double r125181 = r125179 * r125176;
double r125182 = r125180 + r125181;
double r125183 = 1.0;
double r125184 = r125182 + r125183;
double r125185 = 2.0;
double r125186 = r125185 * r125183;
double r125187 = r125180 + r125186;
double r125188 = r125184 / r125187;
double r125189 = 3.0;
double r125190 = pow(r125188, r125189);
double r125191 = cbrt(r125190);
double r125192 = r125191 / r125187;
double r125193 = r125187 + r125183;
double r125194 = r125192 / r125193;
double r125195 = 1.0;
double r125196 = r125195 / r125176;
double r125197 = r125195 / r125179;
double r125198 = r125196 + r125197;
double r125199 = 2.0;
double r125200 = pow(r125176, r125199);
double r125201 = r125195 / r125200;
double r125202 = r125198 - r125201;
double r125203 = r125195 / r125202;
double r125204 = r125203 / r125187;
double r125205 = r125204 / r125193;
double r125206 = r125178 ? r125194 : r125205;
return r125206;
}



Bits error versus alpha



Bits error versus beta
Results
if alpha < 2.733428746494648e+158Initial program 1.2
rmApplied add-cbrt-cube7.9
Applied add-cbrt-cube18.1
Applied cbrt-undiv18.1
Simplified1.7
if 2.733428746494648e+158 < alpha Initial program 14.7
rmApplied clear-num14.7
Taylor expanded around inf 0.2
Final simplification1.4
herbie shell --seed 2019352
(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)))