double f(double x) {
double r2765844 = 1.0;
double r2765845 = x;
double r2765846 = r2765845 + r2765844;
double r2765847 = r2765844 / r2765846;
double r2765848 = 2.0;
double r2765849 = r2765848 / r2765845;
double r2765850 = r2765847 - r2765849;
double r2765851 = r2765845 - r2765844;
double r2765852 = r2765844 / r2765851;
double r2765853 = r2765850 + r2765852;
return r2765853;
}
double f(double x) {
double r2765854 = 1.0;
double r2765855 = x;
double r2765856 = r2765855 + r2765854;
double r2765857 = r2765854 / r2765856;
double r2765858 = 2.0;
double r2765859 = r2765858 / r2765855;
double r2765860 = r2765855 - r2765854;
double r2765861 = r2765854 / r2765860;
double r2765862 = r2765859 - r2765861;
double r2765863 = r2765857 - r2765862;
return r2765863;
}
\left(\frac{1}{x + 1} - \frac{2}{x}\right) + \frac{1}{x - 1}\frac{1}{x + 1} - \left(\frac{2}{x} - \frac{1}{x - 1}\right)


Bits error versus x
Initial program 1.0
rmApplied associate-+l-1.0
Final simplification1.0
herbie shell --seed 2019101 +o rules:numerics
(FPCore (x)
:name "3frac (problem 3.3.3)"
(+.p16 (-.p16 (/.p16 (real->posit16 1) (+.p16 x (real->posit16 1))) (/.p16 (real->posit16 2) x)) (/.p16 (real->posit16 1) (-.p16 x (real->posit16 1)))))