\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r31421 = x;
double r31422 = 1.0;
double r31423 = r31421 + r31422;
double r31424 = r31422 - r31421;
double r31425 = r31423 / r31424;
return r31425;
}
double f(double x) {
double r31426 = x;
double r31427 = 1.0;
double r31428 = r31426 + r31427;
double r31429 = r31427 - r31426;
double r31430 = r31428 / r31429;
return r31430;
}



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