\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r47975 = x;
double r47976 = 1.0;
double r47977 = r47975 + r47976;
double r47978 = r47976 - r47975;
double r47979 = r47977 / r47978;
return r47979;
}
double f(double x) {
double r47980 = x;
double r47981 = 1.0;
double r47982 = r47980 + r47981;
double r47983 = r47981 - r47980;
double r47984 = r47982 / r47983;
return r47984;
}



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