\frac{1}{x + 1} - \frac{1}{x - 1}\frac{\frac{2}{1 + x}}{1 - x}double f(double x) {
double r4945491 = 1.0;
double r4945492 = x;
double r4945493 = r4945492 + r4945491;
double r4945494 = r4945491 / r4945493;
double r4945495 = r4945492 - r4945491;
double r4945496 = r4945491 / r4945495;
double r4945497 = r4945494 - r4945496;
return r4945497;
}
double f(double x) {
double r4945498 = 2.0;
double r4945499 = 1.0;
double r4945500 = x;
double r4945501 = r4945499 + r4945500;
double r4945502 = r4945498 / r4945501;
double r4945503 = r4945499 - r4945500;
double r4945504 = r4945502 / r4945503;
return r4945504;
}



Bits error versus x
Results
Initial program 13.9
rmApplied frac-sub13.3
Simplified13.3
Simplified13.3
rmApplied frac-2neg13.3
Simplified0.4
Simplified0.4
rmApplied *-un-lft-identity0.4
Applied difference-of-squares0.4
Applied associate-/r*0.1
Final simplification0.1
herbie shell --seed 2019146
(FPCore (x)
:name "Asymptote A"
(- (/ 1 (+ x 1)) (/ 1 (- x 1))))