\frac{1}{x - 1} + \frac{x}{x + 1}\log \left(e^{\frac{1}{x - 1} + \frac{x}{x + 1}}\right)double f(double x) {
double r3316351 = 1.0;
double r3316352 = x;
double r3316353 = r3316352 - r3316351;
double r3316354 = r3316351 / r3316353;
double r3316355 = r3316352 + r3316351;
double r3316356 = r3316352 / r3316355;
double r3316357 = r3316354 + r3316356;
return r3316357;
}
double f(double x) {
double r3316358 = 1.0;
double r3316359 = x;
double r3316360 = r3316359 - r3316358;
double r3316361 = r3316358 / r3316360;
double r3316362 = r3316359 + r3316358;
double r3316363 = r3316359 / r3316362;
double r3316364 = r3316361 + r3316363;
double r3316365 = exp(r3316364);
double r3316366 = log(r3316365);
return r3316366;
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-log-exp0.0
Final simplification0.0
herbie shell --seed 2019132 +o rules:numerics
(FPCore (x)
:name "Asymptote B"
(+ (/ 1 (- x 1)) (/ x (+ x 1))))