\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r23212 = x;
double r23213 = 1.0;
double r23214 = r23212 + r23213;
double r23215 = r23213 - r23212;
double r23216 = r23214 / r23215;
return r23216;
}
double f(double x) {
double r23217 = x;
double r23218 = 1.0;
double r23219 = r23217 + r23218;
double r23220 = r23218 - r23217;
double r23221 = r23219 / r23220;
return r23221;
}



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