\frac{x}{x + 1} - \frac{x + 1}{x - 1}\begin{array}{l}
\mathbf{if}\;x \le -11900.9438942127981 \lor \neg \left(x \le 12597.7792764620808\right):\\
\;\;\;\;\left(\frac{-1}{{x}^{2}} - \frac{3}{x}\right) - \frac{3}{{x}^{3}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x \cdot \left(x - 1\right) - \left(x + 1\right) \cdot \left(x + 1\right)}{x \cdot x - 1 \cdot 1}\\
\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 <= -11900.943894212798) || !(x <= 12597.77927646208))) {
VAR = (((-1.0 / pow(x, 2.0)) - (3.0 / x)) - (3.0 / pow(x, 3.0)));
} else {
VAR = (((x * (x - 1.0)) - ((x + 1.0) * (x + 1.0))) / ((x * x) - (1.0 * 1.0)));
}
return VAR;
}



Bits error versus x
Results
if x < -11900.943894212798 or 12597.77927646208 < x Initial program 59.2
Taylor expanded around inf 0.4
Simplified0.0
if -11900.943894212798 < x < 12597.77927646208Initial program 0.1
rmApplied frac-sub0.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2020103
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1)) (/ (+ x 1) (- x 1))))