\frac{x + 1.0}{1.0 - x}\frac{1.0 + x}{1.0 - x}double f(double x) {
double r2523802 = x;
double r2523803 = 1.0;
double r2523804 = r2523802 + r2523803;
double r2523805 = r2523803 - r2523802;
double r2523806 = r2523804 / r2523805;
return r2523806;
}
double f(double x) {
double r2523807 = 1.0;
double r2523808 = x;
double r2523809 = r2523807 + r2523808;
double r2523810 = r2523807 - r2523808;
double r2523811 = r2523809 / r2523810;
return r2523811;
}



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