\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)}\left(\frac{\left(\frac{i}{\left(2\right)}\right)}{\left(\frac{\left(i \cdot \left(2\right)\right)}{\left(1.0\right)}\right)}\right) \cdot \left(\frac{\left(\frac{i}{\left(2\right)}\right)}{\left(\left(i \cdot \left(2\right)\right) - \left(1.0\right)\right)}\right)double f(double i) {
double r3172059 = i;
double r3172060 = r3172059 * r3172059;
double r3172061 = r3172060 * r3172060;
double r3172062 = 2.0;
double r3172063 = /* ERROR: no posit support in C */;
double r3172064 = r3172063 * r3172059;
double r3172065 = r3172064 * r3172064;
double r3172066 = r3172061 / r3172065;
double r3172067 = 1.0;
double r3172068 = /* ERROR: no posit support in C */;
double r3172069 = r3172065 - r3172068;
double r3172070 = r3172066 / r3172069;
return r3172070;
}
double f(double i) {
double r3172071 = i;
double r3172072 = 2.0;
double r3172073 = /* ERROR: no posit support in C */;
double r3172074 = r3172071 / r3172073;
double r3172075 = r3172071 * r3172073;
double r3172076 = 1.0;
double r3172077 = /* ERROR: no posit support in C */;
double r3172078 = r3172075 + r3172077;
double r3172079 = r3172074 / r3172078;
double r3172080 = r3172075 - r3172077;
double r3172081 = r3172074 / r3172080;
double r3172082 = r3172079 * r3172081;
return r3172082;
}



Bits error versus i
Initial program 2.4
Simplified1.2
rmApplied associate-*r/1.1
rmApplied associate-/r*0.9
rmApplied associate-/r*0.8
Simplified0.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 2019168 +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))))