\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 200.9309000121655515158636262640357017517:\\
\;\;\;\;\frac{i}{\left(2 \cdot i\right) \cdot \left(2 \cdot i\right) - 1} \cdot \frac{i}{2 \cdot 2}\\
\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 r57721 = i;
double r57722 = r57721 * r57721;
double r57723 = r57722 * r57722;
double r57724 = 2.0;
double r57725 = r57724 * r57721;
double r57726 = r57725 * r57725;
double r57727 = r57723 / r57726;
double r57728 = 1.0;
double r57729 = r57726 - r57728;
double r57730 = r57727 / r57729;
return r57730;
}
double f(double i) {
double r57731 = i;
double r57732 = 200.93090001216555;
bool r57733 = r57731 <= r57732;
double r57734 = 2.0;
double r57735 = r57734 * r57731;
double r57736 = r57735 * r57735;
double r57737 = 1.0;
double r57738 = r57736 - r57737;
double r57739 = r57731 / r57738;
double r57740 = r57734 * r57734;
double r57741 = r57731 / r57740;
double r57742 = r57739 * r57741;
double r57743 = 0.00390625;
double r57744 = 1.0;
double r57745 = 4.0;
double r57746 = pow(r57731, r57745);
double r57747 = r57744 / r57746;
double r57748 = r57743 * r57747;
double r57749 = 0.015625;
double r57750 = 2.0;
double r57751 = pow(r57731, r57750);
double r57752 = r57744 / r57751;
double r57753 = r57749 * r57752;
double r57754 = 0.0625;
double r57755 = r57753 + r57754;
double r57756 = r57748 + r57755;
double r57757 = r57733 ? r57742 : r57756;
return r57757;
}



Bits error versus i
Results
if i < 200.93090001216555Initial program 45.3
Simplified0.0
rmApplied times-frac0.0
if 200.93090001216555 < i Initial program 48.8
Simplified33.4
Taylor expanded around inf 0.0
Final simplification0.0
herbie shell --seed 2019353
(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)))