\frac{x + 1}{1 - x}\frac{1 + x}{1 - x}double f(double x) {
double r1733424 = x;
double r1733425 = 1.0;
double r1733426 = r1733424 + r1733425;
double r1733427 = r1733425 - r1733424;
double r1733428 = r1733426 / r1733427;
return r1733428;
}
double f(double x) {
double r1733429 = 1.0;
double r1733430 = x;
double r1733431 = r1733429 + r1733430;
double r1733432 = r1733429 - r1733430;
double r1733433 = r1733431 / r1733432;
return r1733433;
}



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