\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r36175 = x;
double r36176 = 1.0;
double r36177 = r36175 + r36176;
double r36178 = r36176 - r36175;
double r36179 = r36177 / r36178;
return r36179;
}
double f(double x) {
double r36180 = x;
double r36181 = 1.0;
double r36182 = r36180 + r36181;
double r36183 = r36181 - r36180;
double r36184 = r36182 / r36183;
return r36184;
}



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