\frac{\frac{\left(i \cdot i\right) \cdot \left(i \cdot i\right)}{\left(2 \cdot i\right) \cdot \left(2 \cdot i\right)}}{\left(2 \cdot i\right) \cdot \left(2 \cdot i\right) - 1}\begin{array}{l}
\mathbf{if}\;i \le 1971.78810324239817:\\
\;\;\;\;\frac{i \cdot i}{\left(\left(2 \cdot i\right) \cdot \left(2 \cdot i\right) - 1\right) \cdot \left(2 \cdot 2\right)}\\
\mathbf{else}:\\
\;\;\;\;\mathsf{fma}\left(0.00390625, \frac{1}{{i}^{4}}, \mathsf{fma}\left(0.015625, \frac{1}{{i}^{2}}, 0.0625\right)\right)\\
\end{array}double f(double i) {
double r43595 = i;
double r43596 = r43595 * r43595;
double r43597 = r43596 * r43596;
double r43598 = 2.0;
double r43599 = r43598 * r43595;
double r43600 = r43599 * r43599;
double r43601 = r43597 / r43600;
double r43602 = 1.0;
double r43603 = r43600 - r43602;
double r43604 = r43601 / r43603;
return r43604;
}
double f(double i) {
double r43605 = i;
double r43606 = 1971.7881032423982;
bool r43607 = r43605 <= r43606;
double r43608 = r43605 * r43605;
double r43609 = 2.0;
double r43610 = r43609 * r43605;
double r43611 = r43610 * r43610;
double r43612 = 1.0;
double r43613 = r43611 - r43612;
double r43614 = r43609 * r43609;
double r43615 = r43613 * r43614;
double r43616 = r43608 / r43615;
double r43617 = 0.00390625;
double r43618 = 1.0;
double r43619 = 4.0;
double r43620 = pow(r43605, r43619);
double r43621 = r43618 / r43620;
double r43622 = 0.015625;
double r43623 = 2.0;
double r43624 = pow(r43605, r43623);
double r43625 = r43618 / r43624;
double r43626 = 0.0625;
double r43627 = fma(r43622, r43625, r43626);
double r43628 = fma(r43617, r43621, r43627);
double r43629 = r43607 ? r43616 : r43628;
return r43629;
}



Bits error versus i
if i < 1971.7881032423982Initial program 44.9
Simplified0.0
if 1971.7881032423982 < i Initial program 47.8
Simplified32.3
Taylor expanded around inf 0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2020089 +o rules:numerics
(FPCore (i)
:name "Octave 3.8, jcobi/4, as called"
:precision binary64
:pre (and (> i 0.0))
(/ (/ (* (* i i) (* i i)) (* (* 2 i) (* 2 i))) (- (* (* 2 i) (* 2 i)) 1)))