\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 r1692608 = 1.0;
double r1692609 = x;
double r1692610 = r1692609 - r1692608;
double r1692611 = r1692608 / r1692610;
double r1692612 = r1692609 + r1692608;
double r1692613 = r1692609 / r1692612;
double r1692614 = r1692611 + r1692613;
return r1692614;
}
double f(double x) {
double r1692615 = 1.0;
double r1692616 = x;
double r1692617 = r1692616 - r1692615;
double r1692618 = r1692615 / r1692617;
double r1692619 = r1692616 + r1692615;
double r1692620 = r1692616 / r1692619;
double r1692621 = r1692618 + r1692620;
double r1692622 = exp(r1692621);
double r1692623 = log(r1692622);
return r1692623;
}



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