\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 2.5910419616899343 \cdot 10^{69}:\\
\;\;\;\;\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}\\
\mathbf{else}:\\
\;\;\;\;\frac{\left(2 \cdot \frac{1}{\alpha} + 8 \cdot \frac{1}{{\alpha}^{3}}\right) - 4 \cdot \frac{1}{{\alpha}^{2}}}{2}\\
\end{array}double code(double alpha, double beta, double i) {
return ((((((alpha + beta) * (beta - alpha)) / ((alpha + beta) + (2.0 * i))) / (((alpha + beta) + (2.0 * i)) + 2.0)) + 1.0) / 2.0);
}
double code(double alpha, double beta, double i) {
double VAR;
if ((alpha <= 2.5910419616899343e+69)) {
VAR = (log(exp((((alpha + beta) * (((beta - alpha) / ((alpha + beta) + (2.0 * i))) / (((alpha + beta) + (2.0 * i)) + 2.0))) + 1.0))) / 2.0);
} else {
VAR = ((((2.0 * (1.0 / alpha)) + (8.0 * (1.0 / pow(alpha, 3.0)))) - (4.0 * (1.0 / pow(alpha, 2.0)))) / 2.0);
}
return VAR;
}



Bits error versus alpha



Bits error versus beta



Bits error versus i
Results
if alpha < 2.5910419616899343e+69Initial program 12.4
rmApplied *-un-lft-identity12.4
Applied *-un-lft-identity12.4
Applied times-frac2.0
Applied times-frac2.0
Simplified2.0
rmApplied add-log-exp2.0
Applied add-log-exp2.0
Applied sum-log2.0
Simplified2.0
if 2.5910419616899343e+69 < alpha Initial program 56.1
Taylor expanded around inf 41.2
Final simplification12.0
herbie shell --seed 2020075
(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))