\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r33445 = x;
double r33446 = 1.0;
double r33447 = r33445 + r33446;
double r33448 = r33446 - r33445;
double r33449 = r33447 / r33448;
return r33449;
}
double f(double x) {
double r33450 = x;
double r33451 = 1.0;
double r33452 = r33450 + r33451;
double r33453 = r33451 - r33450;
double r33454 = r33452 / r33453;
return r33454;
}



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