\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r32853 = x;
double r32854 = 1.0;
double r32855 = r32853 + r32854;
double r32856 = r32854 - r32853;
double r32857 = r32855 / r32856;
return r32857;
}
double f(double x) {
double r32858 = x;
double r32859 = 1.0;
double r32860 = r32858 + r32859;
double r32861 = r32859 - r32858;
double r32862 = r32860 / r32861;
return r32862;
}



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