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



Bits error versus x
Results
if x < -12810.725084609585 or 12691.331728809522 < x Initial program 59.2
Taylor expanded around inf 0.3
Simplified0.3
if -12810.725084609585 < x < 12691.331728809522Initial program 0.1
rmApplied div-inv0.1
Applied fma-neg0.1
Final simplification0.2
herbie shell --seed 2020122 +o rules:numerics
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1)) (/ (+ x 1) (- x 1))))