\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r2010715 = x;
double r2010716 = 1.0;
double r2010717 = r2010715 + r2010716;
double r2010718 = r2010716 - r2010715;
double r2010719 = r2010717 / r2010718;
return r2010719;
}
double f(double x) {
double r2010720 = x;
double r2010721 = 1.0;
double r2010722 = r2010720 + r2010721;
double r2010723 = r2010721 - r2010720;
double r2010724 = r2010722 / r2010723;
return r2010724;
}



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