\frac{x}{x + 1} - \frac{x + 1}{x - 1}\begin{array}{l}
\mathbf{if}\;x \le -1.34941925384725847 \cdot 10^{154} \lor \neg \left(x \le 666253.4914210141\right):\\
\;\;\;\;-\left(1 \cdot \frac{1}{{x}^{2}} + \left(3 \cdot \frac{1}{x} + 3 \cdot \frac{1}{{x}^{3}}\right)\right)\\
\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.3494192538472585e+154) || !(x <= 666253.4914210141))) {
VAR = -((1.0 * (1.0 / pow(x, 2.0))) + ((3.0 * (1.0 / x)) + (3.0 * (1.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.3494192538472585e+154 or 666253.4914210141 < x Initial program 59.6
rmApplied frac-sub62.7
Simplified62.7
Taylor expanded around inf 0.3
if -1.3494192538472585e+154 < x < 666253.4914210141Initial program 11.8
rmApplied frac-sub11.8
Simplified11.8
Taylor expanded around 0 0.1
Final simplification0.2
herbie shell --seed 2020079 +o rules:numerics
(FPCore (x)
:name "Asymptote C"
:precision binary64
(- (/ x (+ x 1)) (/ (+ x 1) (- x 1))))