\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r34424 = x;
double r34425 = 1.0;
double r34426 = r34424 + r34425;
double r34427 = r34425 - r34424;
double r34428 = r34426 / r34427;
return r34428;
}
double f(double x) {
double r34429 = x;
double r34430 = 1.0;
double r34431 = r34429 + r34430;
double r34432 = r34430 - r34429;
double r34433 = r34431 / r34432;
return r34433;
}



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