\frac{1}{x + 1} - \frac{1}{x - 1}\frac{\frac{1}{x + 1}}{x - 1} \cdot \left(-2\right)double f(double x) {
double r118229 = 1.0;
double r118230 = x;
double r118231 = r118230 + r118229;
double r118232 = r118229 / r118231;
double r118233 = r118230 - r118229;
double r118234 = r118229 / r118233;
double r118235 = r118232 - r118234;
return r118235;
}
double f(double x) {
double r118236 = 1.0;
double r118237 = x;
double r118238 = r118237 + r118236;
double r118239 = r118236 / r118238;
double r118240 = r118237 - r118236;
double r118241 = r118239 / r118240;
double r118242 = 2.0;
double r118243 = -r118242;
double r118244 = r118241 * r118243;
return r118244;
}



Bits error versus x
Results
Initial program 14.4
rmApplied flip--29.1
Applied associate-/r/29.1
Applied flip-+14.4
Applied associate-/r/14.4
Applied distribute-lft-out--13.7
Taylor expanded around 0 0.4
rmApplied difference-of-squares0.4
Applied associate-/r*0.1
Final simplification0.1
herbie shell --seed 2020057 +o rules:numerics
(FPCore (x)
:name "Asymptote A"
:precision binary64
(- (/ 1 (+ x 1)) (/ 1 (- x 1))))