\frac{x + 1}{1 - x}\frac{1 + x}{1 - x}double f(double x) {
double r1474479 = x;
double r1474480 = 1.0;
double r1474481 = r1474479 + r1474480;
double r1474482 = r1474480 - r1474479;
double r1474483 = r1474481 / r1474482;
return r1474483;
}
double f(double x) {
double r1474484 = 1.0;
double r1474485 = x;
double r1474486 = r1474484 + r1474485;
double r1474487 = r1474484 - r1474485;
double r1474488 = r1474486 / r1474487;
return r1474488;
}



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