\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r27804 = x;
double r27805 = 1.0;
double r27806 = r27804 + r27805;
double r27807 = r27805 - r27804;
double r27808 = r27806 / r27807;
return r27808;
}
double f(double x) {
double r27809 = x;
double r27810 = 1.0;
double r27811 = r27809 + r27810;
double r27812 = r27810 - r27809;
double r27813 = r27811 / r27812;
return r27813;
}



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