\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}\;\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} \le -1:\\
\;\;\;\;\frac{\left(\frac{8}{{\alpha}^{3}} - \frac{4}{\alpha \cdot \alpha}\right) + \frac{2}{\alpha}}{2}\\
\mathbf{else}:\\
\;\;\;\;\frac{\log \left(e^{\left(\alpha + \beta\right) \cdot \frac{\frac{\beta - \alpha}{\left(\alpha + \beta\right) + 2 \cdot i}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2} + 1}\right)}{2}\\
\end{array}double f(double alpha, double beta, double i) {
double r102543 = alpha;
double r102544 = beta;
double r102545 = r102543 + r102544;
double r102546 = r102544 - r102543;
double r102547 = r102545 * r102546;
double r102548 = 2.0;
double r102549 = i;
double r102550 = r102548 * r102549;
double r102551 = r102545 + r102550;
double r102552 = r102547 / r102551;
double r102553 = r102551 + r102548;
double r102554 = r102552 / r102553;
double r102555 = 1.0;
double r102556 = r102554 + r102555;
double r102557 = r102556 / r102548;
return r102557;
}
double f(double alpha, double beta, double i) {
double r102558 = alpha;
double r102559 = beta;
double r102560 = r102558 + r102559;
double r102561 = r102559 - r102558;
double r102562 = r102560 * r102561;
double r102563 = 2.0;
double r102564 = i;
double r102565 = r102563 * r102564;
double r102566 = r102560 + r102565;
double r102567 = r102562 / r102566;
double r102568 = r102566 + r102563;
double r102569 = r102567 / r102568;
double r102570 = -1.0;
bool r102571 = r102569 <= r102570;
double r102572 = 8.0;
double r102573 = 3.0;
double r102574 = pow(r102558, r102573);
double r102575 = r102572 / r102574;
double r102576 = 4.0;
double r102577 = r102558 * r102558;
double r102578 = r102576 / r102577;
double r102579 = r102575 - r102578;
double r102580 = r102563 / r102558;
double r102581 = r102579 + r102580;
double r102582 = r102581 / r102563;
double r102583 = r102561 / r102566;
double r102584 = r102583 / r102568;
double r102585 = r102560 * r102584;
double r102586 = 1.0;
double r102587 = r102585 + r102586;
double r102588 = exp(r102587);
double r102589 = log(r102588);
double r102590 = r102589 / r102563;
double r102591 = r102571 ? r102582 : r102590;
return r102591;
}



Bits error versus alpha



Bits error versus beta



Bits error versus i
Results
if (/ (/ (* (+ alpha beta) (- beta alpha)) (+ (+ alpha beta) (* 2.0 i))) (+ (+ (+ alpha beta) (* 2.0 i)) 2.0)) < -1.0Initial program 63.3
rmApplied *-un-lft-identity63.3
Applied *-un-lft-identity63.3
Applied times-frac54.2
Applied times-frac54.1
Simplified54.1
Taylor expanded around inf 33.0
Simplified33.0
if -1.0 < (/ (/ (* (+ alpha beta) (- beta alpha)) (+ (+ alpha beta) (* 2.0 i))) (+ (+ (+ alpha beta) (* 2.0 i)) 2.0)) Initial program 13.1
rmApplied *-un-lft-identity13.1
Applied *-un-lft-identity13.1
Applied times-frac0.5
Applied times-frac0.5
Simplified0.5
rmApplied add-log-exp0.5
Applied add-log-exp0.6
Applied sum-log0.6
Simplified0.6
Final simplification7.5
herbie shell --seed 2019323
(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))