\frac{1}{x + 1} - \frac{1}{x - 1}\frac{\frac{-2}{1 + x}}{x - 1}(FPCore (x) :precision binary64 (- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))
(FPCore (x) :precision binary64 (/ (/ -2.0 (+ 1.0 x)) (- x 1.0)))
double code(double x) {
return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
}
double code(double x) {
return (-2.0 / (1.0 + x)) / (x - 1.0);
}



Bits error versus x
Results
Initial program 14.9
rmApplied flip--_binary64_209929.5
Applied associate-/r/_binary64_207029.5
Applied flip-+_binary64_209814.9
Applied associate-/r/_binary64_207014.9
Applied distribute-lft-out--_binary64_207614.3
Simplified0.4
rmApplied difference-of-squares_binary64_20930.4
Applied associate-/r*_binary64_20680.1
Simplified0.1
rmApplied associate-*l/_binary64_20670.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2020298
(FPCore (x)
:name "Asymptote A"
:precision binary64
(- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))