\frac{\frac{\frac{\left(\alpha + \beta\right) \cdot \left(\beta - \alpha\right)}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}{2}\begin{array}{l}
\mathbf{if}\;\alpha \le 1.5371929371909745 \cdot 10^{209}:\\
\;\;\;\;\frac{\sqrt[3]{\left(\frac{\frac{\alpha + \beta}{\sqrt{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}}{\frac{\sqrt{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}} + 1\right) \cdot \left(\left(\frac{\frac{\alpha + \beta}{\sqrt{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}}{\frac{\sqrt{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}} + 1\right) \cdot \left(\frac{\frac{\alpha + \beta}{\sqrt{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}}{\frac{\sqrt{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}} + 1\right)\right)}}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(\frac{2}{\alpha} + \frac{8}{{\alpha}^{3}}\right) - \frac{4}{\alpha \cdot \alpha}}{2}\\
\end{array}double f(double alpha, double beta, double i) {
double r105429 = alpha;
double r105430 = beta;
double r105431 = r105429 + r105430;
double r105432 = r105430 - r105429;
double r105433 = r105431 * r105432;
double r105434 = 2.0;
double r105435 = i;
double r105436 = r105434 * r105435;
double r105437 = r105431 + r105436;
double r105438 = r105433 / r105437;
double r105439 = r105437 + r105434;
double r105440 = r105438 / r105439;
double r105441 = 1.0;
double r105442 = r105440 + r105441;
double r105443 = r105442 / r105434;
return r105443;
}
double f(double alpha, double beta, double i) {
double r105444 = alpha;
double r105445 = 1.5371929371909745e+209;
bool r105446 = r105444 <= r105445;
double r105447 = beta;
double r105448 = r105444 + r105447;
double r105449 = 2.0;
double r105450 = i;
double r105451 = r105449 * r105450;
double r105452 = r105448 + r105451;
double r105453 = r105452 + r105449;
double r105454 = sqrt(r105453);
double r105455 = r105448 / r105454;
double r105456 = r105447 - r105444;
double r105457 = r105456 / r105452;
double r105458 = r105454 / r105457;
double r105459 = r105455 / r105458;
double r105460 = 1.0;
double r105461 = r105459 + r105460;
double r105462 = r105461 * r105461;
double r105463 = r105461 * r105462;
double r105464 = cbrt(r105463);
double r105465 = r105464 / r105449;
double r105466 = r105449 / r105444;
double r105467 = 8.0;
double r105468 = 3.0;
double r105469 = pow(r105444, r105468);
double r105470 = r105467 / r105469;
double r105471 = r105466 + r105470;
double r105472 = 4.0;
double r105473 = r105444 * r105444;
double r105474 = r105472 / r105473;
double r105475 = r105471 - r105474;
double r105476 = r105475 / r105449;
double r105477 = r105446 ? r105465 : r105476;
return r105477;
}



Bits error versus alpha



Bits error versus beta



Bits error versus i
Results
if alpha < 1.5371929371909745e+209Initial program 18.9
rmApplied add-sqr-sqrt18.9
Applied *-un-lft-identity18.9
Applied times-frac7.4
Applied times-frac7.4
Simplified7.4
rmApplied add-sqr-sqrt7.4
Applied sqrt-prod7.5
Applied *-un-lft-identity7.5
Applied times-frac7.5
rmApplied add-cbrt-cube7.4
Simplified7.4
if 1.5371929371909745e+209 < alpha Initial program 64.0
rmApplied add-sqr-sqrt64.0
Applied *-un-lft-identity64.0
Applied times-frac50.9
Applied times-frac50.8
Simplified50.8
rmApplied associate-*r/50.9
Taylor expanded around inf 40.5
Simplified40.5
Final simplification11.0
herbie shell --seed 2020046
(FPCore (alpha beta i)
:name "Octave 3.8, jcobi/2"
:precision binary64
:pre (and (> alpha -1) (> beta -1) (> i 0.0))
(/ (+ (/ (/ (* (+ alpha beta) (- beta alpha)) (+ (+ alpha beta) (* 2 i))) (+ (+ (+ alpha beta) (* 2 i)) 2)) 1) 2))