\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r40328 = x;
double r40329 = 1.0;
double r40330 = r40328 + r40329;
double r40331 = r40329 - r40328;
double r40332 = r40330 / r40331;
return r40332;
}
double f(double x) {
double r40333 = x;
double r40334 = 1.0;
double r40335 = r40333 + r40334;
double r40336 = r40334 - r40333;
double r40337 = r40335 / r40336;
return r40337;
}



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