\frac{1}{x + 1} - \frac{1}{x - 1}\frac{\frac{1}{x + 1} \cdot \left(-2\right)}{x - 1}double f(double x) {
double r113794 = 1.0;
double r113795 = x;
double r113796 = r113795 + r113794;
double r113797 = r113794 / r113796;
double r113798 = r113795 - r113794;
double r113799 = r113794 / r113798;
double r113800 = r113797 - r113799;
return r113800;
}
double f(double x) {
double r113801 = 1.0;
double r113802 = x;
double r113803 = r113802 + r113801;
double r113804 = r113801 / r113803;
double r113805 = 2.0;
double r113806 = -r113805;
double r113807 = r113804 * r113806;
double r113808 = r113802 - r113801;
double r113809 = r113807 / r113808;
return r113809;
}



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