\frac{1}{x + 1} - \frac{1}{x - 1}\frac{\frac{1}{x + 1}}{x - 1} \cdot \left(-2\right)double f(double x) {
double r147914 = 1.0;
double r147915 = x;
double r147916 = r147915 + r147914;
double r147917 = r147914 / r147916;
double r147918 = r147915 - r147914;
double r147919 = r147914 / r147918;
double r147920 = r147917 - r147919;
return r147920;
}
double f(double x) {
double r147921 = 1.0;
double r147922 = x;
double r147923 = r147922 + r147921;
double r147924 = r147921 / r147923;
double r147925 = r147922 - r147921;
double r147926 = r147924 / r147925;
double r147927 = 2.0;
double r147928 = -r147927;
double r147929 = r147926 * r147928;
return r147929;
}



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