\frac{1}{x + 1} - \frac{1}{x - 1}\frac{\frac{1}{x + 1}}{x - 1} \cdot \log \left(\frac{e^{-1}}{e^{1}}\right)double f(double x) {
double r133650 = 1.0;
double r133651 = x;
double r133652 = r133651 + r133650;
double r133653 = r133650 / r133652;
double r133654 = r133651 - r133650;
double r133655 = r133650 / r133654;
double r133656 = r133653 - r133655;
return r133656;
}
double f(double x) {
double r133657 = 1.0;
double r133658 = x;
double r133659 = r133658 + r133657;
double r133660 = r133657 / r133659;
double r133661 = r133658 - r133657;
double r133662 = r133660 / r133661;
double r133663 = -r133657;
double r133664 = exp(r133663);
double r133665 = exp(r133657);
double r133666 = r133664 / r133665;
double r133667 = log(r133666);
double r133668 = r133662 * r133667;
return r133668;
}



Bits error versus x
Results
Initial program 14.4
rmApplied flip--28.5
Applied associate-/r/28.5
Applied flip-+14.5
Applied associate-/r/14.4
Applied distribute-lft-out--13.9
rmApplied add-log-exp13.9
Applied add-log-exp31.1
Applied sum-log31.1
Applied add-log-exp31.1
Applied add-log-exp31.1
Applied diff-log31.1
Applied diff-log31.1
Simplified0.3
rmApplied difference-of-squares0.3
Applied associate-/r*0.1
Final simplification0.1
herbie shell --seed 2019350 +o rules:numerics
(FPCore (x)
:name "Asymptote A"
:precision binary64
(- (/ 1 (+ x 1)) (/ 1 (- x 1))))