\frac{x}{x + 1} - \frac{x + 1}{x - 1}\begin{array}{l}
\mathbf{if}\;x \le -8835.7085088464537 \lor \neg \left(x \le 11213.051466178713\right):\\
\;\;\;\;-\left(1 \cdot \frac{1}{{x}^{2}} + \left(3 \cdot \frac{1}{x} + 3 \cdot \frac{1}{{x}^{3}}\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{x + 1} - \frac{x + 1}{{x}^{3} - {1}^{3}} \cdot \left(x \cdot x + \left(1 \cdot 1 + x \cdot 1\right)\right)\\
\end{array}double code(double x) {
return ((x / (x + 1.0)) - ((x + 1.0) / (x - 1.0)));
}
double code(double x) {
double VAR;
if (((x <= -8835.708508846454) || !(x <= 11213.051466178713))) {
VAR = -((1.0 * (1.0 / pow(x, 2.0))) + ((3.0 * (1.0 / x)) + (3.0 * (1.0 / pow(x, 3.0)))));
} else {
VAR = ((x / (x + 1.0)) - (((x + 1.0) / (pow(x, 3.0) - pow(1.0, 3.0))) * ((x * x) + ((1.0 * 1.0) + (x * 1.0)))));
}
return VAR;
}



Bits error versus x
Results
if x < -8835.708508846454 or 11213.051466178713 < x Initial program 59.3
rmApplied flip3--61.4
Applied associate-/r/61.4
Taylor expanded around inf 0.3
if -8835.708508846454 < x < 11213.051466178713Initial program 0.1
rmApplied flip3--0.1
Applied associate-/r/0.1
Final simplification0.2
herbie shell --seed 2020092 +o rules:numerics
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1)) (/ (+ x 1) (- x 1))))