\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r30179 = x;
double r30180 = 1.0;
double r30181 = r30179 + r30180;
double r30182 = r30180 - r30179;
double r30183 = r30181 / r30182;
return r30183;
}
double f(double x) {
double r30184 = x;
double r30185 = 1.0;
double r30186 = r30184 + r30185;
double r30187 = r30185 - r30184;
double r30188 = r30186 / r30187;
return r30188;
}



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