\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 219.372087011913067:\\
\;\;\;\;\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}:\\
\;\;\;\;0.00390625 \cdot \frac{1}{{i}^{4}} + \left(0.015625 \cdot \frac{1}{{i}^{2}} + 0.0625\right)\\
\end{array}double f(double i) {
double r54598 = i;
double r54599 = r54598 * r54598;
double r54600 = r54599 * r54599;
double r54601 = 2.0;
double r54602 = r54601 * r54598;
double r54603 = r54602 * r54602;
double r54604 = r54600 / r54603;
double r54605 = 1.0;
double r54606 = r54603 - r54605;
double r54607 = r54604 / r54606;
return r54607;
}
double f(double i) {
double r54608 = i;
double r54609 = 219.37208701191307;
bool r54610 = r54608 <= r54609;
double r54611 = r54608 * r54608;
double r54612 = 2.0;
double r54613 = r54612 * r54608;
double r54614 = r54613 * r54613;
double r54615 = 1.0;
double r54616 = r54614 - r54615;
double r54617 = r54612 * r54612;
double r54618 = r54616 * r54617;
double r54619 = r54611 / r54618;
double r54620 = 0.00390625;
double r54621 = 1.0;
double r54622 = 4.0;
double r54623 = pow(r54608, r54622);
double r54624 = r54621 / r54623;
double r54625 = r54620 * r54624;
double r54626 = 0.015625;
double r54627 = 2.0;
double r54628 = pow(r54608, r54627);
double r54629 = r54621 / r54628;
double r54630 = r54626 * r54629;
double r54631 = 0.0625;
double r54632 = r54630 + r54631;
double r54633 = r54625 + r54632;
double r54634 = r54610 ? r54619 : r54633;
return r54634;
}



Bits error versus i
Results
if i < 219.37208701191307Initial program 45.6
Simplified0.0
if 219.37208701191307 < i Initial program 48.5
Simplified32.6
Taylor expanded around inf 0.0
Final simplification0.0
herbie shell --seed 2020021
(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)))