\frac{x}{x + 1} - \frac{x + 1}{x - 1}\begin{array}{l}
\mathbf{if}\;\frac{x}{x + 1} - \frac{x + 1}{x - 1} \le 1.4514945 \cdot 10^{-11}:\\
\;\;\;\;\frac{-1}{{x}^{2}} - \mathsf{fma}\left(3, \frac{1}{{x}^{3}}, \frac{3}{x}\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{x + 1} - \frac{1}{\frac{x - 1}{x + 1}}\\
\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 ((((double) (((double) (x / ((double) (x + 1.0)))) - ((double) (((double) (x + 1.0)) / ((double) (x - 1.0)))))) <= 1.4514944801646834e-11)) {
VAR = ((double) (((double) (((double) -(1.0)) / ((double) pow(x, 2.0)))) - ((double) fma(3.0, ((double) (1.0 / ((double) pow(x, 3.0)))), ((double) (3.0 / x))))));
} else {
VAR = ((double) (((double) (x / ((double) (x + 1.0)))) - ((double) (1.0 / ((double) (((double) (x - 1.0)) / ((double) (x + 1.0))))))));
}
return VAR;
}



Bits error versus x
Results
if (- (/ x (+ x 1.0)) (/ (+ x 1.0) (- x 1.0))) < 1.4514944801646834e-11Initial program 59.4
Taylor expanded around inf 0.6
Simplified0.6
Taylor expanded around 0 0.6
Simplified0.3
if 1.4514944801646834e-11 < (- (/ x (+ x 1.0)) (/ (+ x 1.0) (- x 1.0))) Initial program 0.3
rmApplied clear-num0.3
Final simplification0.3
herbie shell --seed 2020123 +o rules:numerics
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1)) (/ (+ x 1) (- x 1))))