\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r36516 = x;
double r36517 = 1.0;
double r36518 = r36516 + r36517;
double r36519 = r36517 - r36516;
double r36520 = r36518 / r36519;
return r36520;
}
double f(double x) {
double r36521 = x;
double r36522 = 1.0;
double r36523 = r36521 + r36522;
double r36524 = r36522 - r36521;
double r36525 = r36523 / r36524;
return r36525;
}



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