\frac{1}{x + 1} - \frac{1}{x - 1}\frac{-1}{x + 1} \cdot \left(\frac{1}{x - 1} \cdot 2\right)double f(double x) {
double r101597 = 1.0;
double r101598 = x;
double r101599 = r101598 + r101597;
double r101600 = r101597 / r101599;
double r101601 = r101598 - r101597;
double r101602 = r101597 / r101601;
double r101603 = r101600 - r101602;
return r101603;
}
double f(double x) {
double r101604 = -1.0;
double r101605 = x;
double r101606 = 1.0;
double r101607 = r101605 + r101606;
double r101608 = r101604 / r101607;
double r101609 = r101605 - r101606;
double r101610 = r101606 / r101609;
double r101611 = 2.0;
double r101612 = r101610 * r101611;
double r101613 = r101608 * r101612;
return r101613;
}



Bits error versus x
Results
Initial program 14.3
rmApplied flip--28.8
Applied associate-/r/28.8
Applied flip-+14.3
Applied associate-/r/14.3
Applied distribute-lft-out--13.6
Taylor expanded around 0 0.4
rmApplied difference-of-squares0.4
Applied *-un-lft-identity0.4
Applied times-frac0.1
Applied associate-*l*0.1
Final simplification0.1
herbie shell --seed 2019208
(FPCore (x)
:name "Asymptote A"
:precision binary64
(- (/ 1 (+ x 1)) (/ 1 (- x 1))))