\frac{1}{x + 1} - \frac{1}{x - 1}\frac{\log \left(e^{-2}\right)}{-1 + x \cdot x}(FPCore (x) :precision binary64 (- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))
(FPCore (x) :precision binary64 (/ (log (exp -2.0)) (+ -1.0 (* x x))))
double code(double x) {
return (1.0 / (x + 1.0)) - (1.0 / (x - 1.0));
}
double code(double x) {
return log(exp(-2.0)) / (-1.0 + (x * x));
}



Bits error versus x
Results
Initial program 14.1
rmApplied frac-sub_binary64_315613.6
Simplified13.5
Simplified13.5
rmApplied add-log-exp_binary64_318631.4
Applied add-log-exp_binary64_318631.4
Applied diff-log_binary64_323931.4
Applied add-log-exp_binary64_318631.4
Applied sum-log_binary64_323831.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2021007
(FPCore (x)
:name "Asymptote A"
:precision binary64
(- (/ 1.0 (+ x 1.0)) (/ 1.0 (- x 1.0))))