\frac{\left(\frac{\left(\left(i \cdot i\right) \cdot \left(i \cdot i\right)\right)}{\left(\left(\left(2\right) \cdot i\right) \cdot \left(\left(2\right) \cdot i\right)\right)}\right)}{\left(\left(\left(\left(2\right) \cdot i\right) \cdot \left(\left(2\right) \cdot i\right)\right) - \left(1.0\right)\right)}\frac{\frac{i}{2}}{i \cdot 2 + 1.0} \cdot \frac{\frac{i}{2}}{i \cdot 2 - 1.0}double f(double i) {
double r3298637 = i;
double r3298638 = r3298637 * r3298637;
double r3298639 = r3298638 * r3298638;
double r3298640 = 2.0;
double r3298641 = /* ERROR: no posit support in C */;
double r3298642 = r3298641 * r3298637;
double r3298643 = r3298642 * r3298642;
double r3298644 = r3298639 / r3298643;
double r3298645 = 1.0;
double r3298646 = /* ERROR: no posit support in C */;
double r3298647 = r3298643 - r3298646;
double r3298648 = r3298644 / r3298647;
return r3298648;
}
double f(double i) {
double r3298649 = i;
double r3298650 = 2.0;
double r3298651 = r3298649 / r3298650;
double r3298652 = r3298649 * r3298650;
double r3298653 = 1.0;
double r3298654 = r3298652 + r3298653;
double r3298655 = r3298651 / r3298654;
double r3298656 = r3298652 - r3298653;
double r3298657 = r3298651 / r3298656;
double r3298658 = r3298655 * r3298657;
return r3298658;
}



Bits error versus i
Initial program 2.4
Simplified1.2
rmApplied associate-*r/1.1
rmApplied /p16-rgt-identity-expand1.1
Applied associate-/l/1.1
Simplified1.1
rmApplied associate-/r*0.8
rmApplied p16-*-un-lft-identity0.8
Applied difference-of-squares0.8
Applied p16-times-frac0.8
Applied p16-times-frac0.4
Final simplification0.4
herbie shell --seed 2019162 +o rules:numerics
(FPCore (i)
:name "Octave 3.8, jcobi/4, as called"
:pre (and (>.p16 i (real->posit16 0)))
(/.p16 (/.p16 (*.p16 (*.p16 i i) (*.p16 i i)) (*.p16 (*.p16 (real->posit16 2) i) (*.p16 (real->posit16 2) i))) (-.p16 (*.p16 (*.p16 (real->posit16 2) i) (*.p16 (real->posit16 2) i)) (real->posit16 1.0))))