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



Bits error versus x
Results
if x < -1.2832315103805337e+38 or 316433.0155308468 < x Initial program 59.8
Taylor expanded around inf 0.3
Simplified0.0
if -1.2832315103805337e+38 < x < 316433.0155308468Initial program 2.8
rmApplied frac-sub2.8
Simplified2.8
Taylor expanded around 0 0.0
Final simplification0.0
herbie shell --seed 2020078
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1)) (/ (+ x 1) (- x 1))))