\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r32801 = x;
double r32802 = 1.0;
double r32803 = r32801 + r32802;
double r32804 = r32802 - r32801;
double r32805 = r32803 / r32804;
return r32805;
}
double f(double x) {
double r32806 = x;
double r32807 = 1.0;
double r32808 = r32806 + r32807;
double r32809 = r32807 - r32806;
double r32810 = r32808 / r32809;
return r32810;
}



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