\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.823746423369379629993693579012082700522 \cdot 10^{220}:\\
\;\;\;\;\frac{\sqrt[3]{{\left(\left(\alpha + \beta\right) \cdot \left(\left(\sqrt[3]{\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}} \cdot \sqrt[3]{\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}\right) \cdot \sqrt[3]{\frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2}}\right) + 1\right)}^{3}}}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{1 \cdot \left(\left(2 \cdot \frac{1}{\alpha} + 8 \cdot \frac{1}{{\alpha}^{3}}\right) - 4 \cdot \frac{1}{{\alpha}^{2}}\right)}{2}\\
\end{array}double f(double alpha, double beta, double i) {
double r82254 = alpha;
double r82255 = beta;
double r82256 = r82254 + r82255;
double r82257 = r82255 - r82254;
double r82258 = r82256 * r82257;
double r82259 = 2.0;
double r82260 = i;
double r82261 = r82259 * r82260;
double r82262 = r82256 + r82261;
double r82263 = r82258 / r82262;
double r82264 = r82262 + r82259;
double r82265 = r82263 / r82264;
double r82266 = 1.0;
double r82267 = r82265 + r82266;
double r82268 = r82267 / r82259;
return r82268;
}
double f(double alpha, double beta, double i) {
double r82269 = alpha;
double r82270 = 1.8237464233693796e+220;
bool r82271 = r82269 <= r82270;
double r82272 = beta;
double r82273 = r82269 + r82272;
double r82274 = r82272 - r82269;
double r82275 = 2.0;
double r82276 = i;
double r82277 = r82275 * r82276;
double r82278 = r82273 + r82277;
double r82279 = r82274 / r82278;
double r82280 = r82278 + r82275;
double r82281 = r82279 / r82280;
double r82282 = cbrt(r82281);
double r82283 = r82282 * r82282;
double r82284 = r82283 * r82282;
double r82285 = r82273 * r82284;
double r82286 = 1.0;
double r82287 = r82285 + r82286;
double r82288 = 3.0;
double r82289 = pow(r82287, r82288);
double r82290 = cbrt(r82289);
double r82291 = r82290 / r82275;
double r82292 = 1.0;
double r82293 = r82292 / r82269;
double r82294 = r82275 * r82293;
double r82295 = 8.0;
double r82296 = pow(r82269, r82288);
double r82297 = r82292 / r82296;
double r82298 = r82295 * r82297;
double r82299 = r82294 + r82298;
double r82300 = 4.0;
double r82301 = 2.0;
double r82302 = pow(r82269, r82301);
double r82303 = r82292 / r82302;
double r82304 = r82300 * r82303;
double r82305 = r82299 - r82304;
double r82306 = r82292 * r82305;
double r82307 = r82306 / r82275;
double r82308 = r82271 ? r82291 : r82307;
return r82308;
}



Bits error versus alpha



Bits error versus beta



Bits error versus i
Results
if alpha < 1.8237464233693796e+220Initial program 19.7
rmApplied *-un-lft-identity19.7
Applied *-un-lft-identity19.7
Applied times-frac8.3
Applied times-frac8.2
Simplified8.2
rmApplied add-cbrt-cube8.2
Simplified8.2
rmApplied add-cube-cbrt8.4
if 1.8237464233693796e+220 < alpha Initial program 64.0
rmApplied *-un-lft-identity64.0
Applied *-un-lft-identity64.0
Applied times-frac52.3
Applied times-frac52.4
Simplified52.4
rmApplied add-cbrt-cube52.4
Simplified52.4
rmApplied *-un-lft-identity52.4
Applied unpow-prod-down52.4
Applied cbrt-prod52.4
Simplified52.4
Simplified52.4
Taylor expanded around inf 41.4
Final simplification11.6
herbie shell --seed 2019304
(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))