\frac{x}{x + 1} - \frac{x + 1}{x - 1}\begin{array}{l}
\mathbf{if}\;x \le -19229.5092823207051 \lor \neg \left(x \le 63442066.521938488\right):\\
\;\;\;\;\left(\log \left(e^{\frac{-1}{{x}^{2}}}\right) - \frac{3}{x}\right) - \frac{3}{{x}^{3}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x}{x + 1} - \frac{{x}^{3} + {1}^{3}}{\left(1 \cdot \left(1 - x\right) + {x}^{2}\right) \cdot \left(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 <= -19229.509282320705) || !(x <= 63442066.52193849))) {
VAR = ((double) (((double) (((double) log(((double) exp(((double) (((double) -(1.0)) / ((double) pow(x, 2.0)))))))) - ((double) (3.0 / x)))) - ((double) (3.0 / ((double) pow(x, 3.0))))));
} else {
VAR = ((double) (((double) (x / ((double) (x + 1.0)))) - ((double) (((double) (((double) pow(x, 3.0)) + ((double) pow(1.0, 3.0)))) / ((double) (((double) (((double) (1.0 * ((double) (1.0 - x)))) + ((double) pow(x, 2.0)))) * ((double) (x - 1.0))))))));
}
return VAR;
}



Bits error versus x
Results
if x < -19229.509282320705 or 63442066.52193849 < x Initial program 59.7
Taylor expanded around inf 0.3
Simplified0.0
rmApplied add-log-exp0.3
if -19229.509282320705 < x < 63442066.52193849Initial program 0.2
rmApplied flip3-+0.2
Applied associate-/l/0.2
Simplified0.2
Final simplification0.3
herbie shell --seed 2020123
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1)) (/ (+ x 1) (- x 1))))