\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r18454 = x;
double r18455 = 1.0;
double r18456 = r18454 + r18455;
double r18457 = r18455 - r18454;
double r18458 = r18456 / r18457;
return r18458;
}
double f(double x) {
double r18459 = x;
double r18460 = 1.0;
double r18461 = r18459 + r18460;
double r18462 = r18460 - r18459;
double r18463 = r18461 / r18462;
return r18463;
}



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