\frac{x + 1.0}{1.0 - x}\frac{1.0 + x}{1.0 - x}double f(double x) {
double r1188133 = x;
double r1188134 = 1.0;
double r1188135 = r1188133 + r1188134;
double r1188136 = r1188134 - r1188133;
double r1188137 = r1188135 / r1188136;
return r1188137;
}
double f(double x) {
double r1188138 = 1.0;
double r1188139 = x;
double r1188140 = r1188138 + r1188139;
double r1188141 = r1188138 - r1188139;
double r1188142 = r1188140 / r1188141;
return r1188142;
}



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