\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r48143 = x;
double r48144 = 1.0;
double r48145 = r48143 + r48144;
double r48146 = r48144 - r48143;
double r48147 = r48145 / r48146;
return r48147;
}
double f(double x) {
double r48148 = x;
double r48149 = 1.0;
double r48150 = r48148 + r48149;
double r48151 = r48149 - r48148;
double r48152 = r48150 / r48151;
return r48152;
}



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)))