\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r39977 = x;
double r39978 = 1.0;
double r39979 = r39977 + r39978;
double r39980 = r39978 - r39977;
double r39981 = r39979 / r39980;
return r39981;
}
double f(double x) {
double r39982 = x;
double r39983 = 1.0;
double r39984 = r39982 + r39983;
double r39985 = r39983 - r39982;
double r39986 = r39984 / r39985;
return r39986;
}



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