\frac{x}{x + 1} - \frac{x + 1}{x - 1}\begin{array}{l}
\mathbf{if}\;x \leq -2.660453270019914 \cdot 10^{+88}:\\
\;\;\;\;\frac{-3}{x}\\
\mathbf{elif}\;x \leq 171369.6908751599:\\
\;\;\;\;\frac{\frac{-1}{x} - 3}{\frac{x \cdot x + -1}{x}}\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{-3}{x} - {x}^{-2}\right) - \frac{3}{{x}^{3}}\\
\end{array}(FPCore (x) :precision binary64 (- (/ x (+ x 1.0)) (/ (+ x 1.0) (- x 1.0))))
(FPCore (x)
:precision binary64
(if (<= x -2.660453270019914e+88)
(/ -3.0 x)
(if (<= x 171369.6908751599)
(/ (- (/ -1.0 x) 3.0) (/ (+ (* x x) -1.0) x))
(- (- (/ -3.0 x) (pow x -2.0)) (/ 3.0 (pow x 3.0))))))double code(double x) {
return (x / (x + 1.0)) - ((x + 1.0) / (x - 1.0));
}
double code(double x) {
double tmp;
if (x <= -2.660453270019914e+88) {
tmp = -3.0 / x;
} else if (x <= 171369.6908751599) {
tmp = ((-1.0 / x) - 3.0) / (((x * x) + -1.0) / x);
} else {
tmp = ((-3.0 / x) - pow(x, -2.0)) - (3.0 / pow(x, 3.0));
}
return tmp;
}



Bits error versus x
Results
if x < -2.660453270019914e88Initial program 60.1
Taylor expanded around inf 0
if -2.660453270019914e88 < x < 171369.690875159897Initial program 7.3
rmApplied clear-num_binary64_38287.3
Simplified7.3
rmApplied frac-sub_binary64_38387.0
Simplified7.0
Simplified7.0
Taylor expanded around 0 0.0
if 171369.690875159897 < x Initial program 59.7
Taylor expanded around inf 0.3
Simplified0.0
rmApplied pow2_binary64_39100.0
Applied pow-flip_binary64_39030.0
Final simplification0.0
herbie shell --seed 2021019
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1.0)) (/ (+ x 1.0) (- x 1.0))))