\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 248.47326712178204:\\
\;\;\;\;\frac{i \cdot i}{\left(\left(2 \cdot i + \sqrt{1}\right) \cdot \left(2 \cdot i - \sqrt{1}\right)\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 r124516 = i;
double r124517 = r124516 * r124516;
double r124518 = r124517 * r124517;
double r124519 = 2.0;
double r124520 = r124519 * r124516;
double r124521 = r124520 * r124520;
double r124522 = r124518 / r124521;
double r124523 = 1.0;
double r124524 = r124521 - r124523;
double r124525 = r124522 / r124524;
return r124525;
}
double f(double i) {
double r124526 = i;
double r124527 = 248.47326712178204;
bool r124528 = r124526 <= r124527;
double r124529 = r124526 * r124526;
double r124530 = 2.0;
double r124531 = r124530 * r124526;
double r124532 = 1.0;
double r124533 = sqrt(r124532);
double r124534 = r124531 + r124533;
double r124535 = r124531 - r124533;
double r124536 = r124534 * r124535;
double r124537 = r124530 * r124530;
double r124538 = r124536 * r124537;
double r124539 = r124529 / r124538;
double r124540 = 0.00390625;
double r124541 = 1.0;
double r124542 = 4.0;
double r124543 = pow(r124526, r124542);
double r124544 = r124541 / r124543;
double r124545 = r124540 * r124544;
double r124546 = 0.015625;
double r124547 = 2.0;
double r124548 = pow(r124526, r124547);
double r124549 = r124541 / r124548;
double r124550 = r124546 * r124549;
double r124551 = 0.0625;
double r124552 = r124550 + r124551;
double r124553 = r124545 + r124552;
double r124554 = r124528 ? r124539 : r124553;
return r124554;
}



Bits error versus i
Results
if i < 248.47326712178204Initial program 45.0
Simplified0.0
rmApplied add-sqr-sqrt0.0
Applied difference-of-squares0.0
if 248.47326712178204 < i Initial program 48.5
Simplified32.8
Taylor expanded around inf 0.0
Final simplification0.0
herbie shell --seed 2020062
(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)))