\frac{x + 1.0}{1.0 - x}\frac{1.0 + x}{1.0 - x}double f(double x) {
double r1283034 = x;
double r1283035 = 1.0;
double r1283036 = r1283034 + r1283035;
double r1283037 = r1283035 - r1283034;
double r1283038 = r1283036 / r1283037;
return r1283038;
}
double f(double x) {
double r1283039 = 1.0;
double r1283040 = x;
double r1283041 = r1283039 + r1283040;
double r1283042 = r1283039 - r1283040;
double r1283043 = r1283041 / r1283042;
return r1283043;
}



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