\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r57802 = x;
double r57803 = 1.0;
double r57804 = r57802 + r57803;
double r57805 = r57803 - r57802;
double r57806 = r57804 / r57805;
return r57806;
}
double f(double x) {
double r57807 = x;
double r57808 = 1.0;
double r57809 = r57807 + r57808;
double r57810 = r57808 - r57807;
double r57811 = r57809 / r57810;
return r57811;
}



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