\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r39372 = x;
double r39373 = 1.0;
double r39374 = r39372 + r39373;
double r39375 = r39373 - r39372;
double r39376 = r39374 / r39375;
return r39376;
}
double f(double x) {
double r39377 = x;
double r39378 = 1.0;
double r39379 = r39377 + r39378;
double r39380 = r39378 - r39377;
double r39381 = r39379 / r39380;
return r39381;
}



Bits error versus x
Results
Initial program 0.0
Final simplification0.0
herbie shell --seed 2019323
(FPCore (x)
:name "Prelude:atanh from fay-base-0.20.0.1"
:precision binary64
(/ (+ x 1) (- 1 x)))