\frac{1}{x + 1} - \frac{1}{x - 1}\frac{1}{x + 1} \cdot \frac{-2}{x - 1}double f(double x) {
double r4870306 = 1.0;
double r4870307 = x;
double r4870308 = r4870307 + r4870306;
double r4870309 = r4870306 / r4870308;
double r4870310 = r4870307 - r4870306;
double r4870311 = r4870306 / r4870310;
double r4870312 = r4870309 - r4870311;
return r4870312;
}
double f(double x) {
double r4870313 = 1.0;
double r4870314 = x;
double r4870315 = r4870314 + r4870313;
double r4870316 = r4870313 / r4870315;
double r4870317 = -2.0;
double r4870318 = r4870314 - r4870313;
double r4870319 = r4870317 / r4870318;
double r4870320 = r4870316 * r4870319;
return r4870320;
}



Bits error versus x
Results
Initial program 14.3
rmApplied frac-sub13.7
Simplified13.7
Taylor expanded around 0 0.4
rmApplied *-un-lft-identity0.4
Applied times-frac0.1
Final simplification0.1
herbie shell --seed 2019163 +o rules:numerics
(FPCore (x)
:name "Asymptote A"
(- (/ 1 (+ x 1)) (/ 1 (- x 1))))