\frac{1}{x + 1} - \frac{1}{x - 1}-\frac{\frac{1}{x + 1}}{x - 1} \cdot 2double f(double x) {
double r5740008 = 1.0;
double r5740009 = x;
double r5740010 = r5740009 + r5740008;
double r5740011 = r5740008 / r5740010;
double r5740012 = r5740009 - r5740008;
double r5740013 = r5740008 / r5740012;
double r5740014 = r5740011 - r5740013;
return r5740014;
}
double f(double x) {
double r5740015 = 1.0;
double r5740016 = x;
double r5740017 = r5740016 + r5740015;
double r5740018 = r5740015 / r5740017;
double r5740019 = r5740016 - r5740015;
double r5740020 = r5740018 / r5740019;
double r5740021 = 2.0;
double r5740022 = r5740020 * r5740021;
double r5740023 = -r5740022;
return r5740023;
}



Bits error versus x
Results
Initial program 14.7
rmApplied flip--29.2
Applied associate-/r/29.2
Applied flip-+14.7
Applied associate-/r/14.7
Applied distribute-lft-out--14.1
Taylor expanded around 0 0.4
rmApplied difference-of-squares0.4
Applied associate-/r*0.1
Final simplification0.1
herbie shell --seed 2019168
(FPCore (x)
:name "Asymptote A"
(- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))