\frac{x + 1.0}{1.0 - x}\frac{1.0 + x}{1.0 - x}double f(double x) {
double r2136009 = x;
double r2136010 = 1.0;
double r2136011 = r2136009 + r2136010;
double r2136012 = r2136010 - r2136009;
double r2136013 = r2136011 / r2136012;
return r2136013;
}
double f(double x) {
double r2136014 = 1.0;
double r2136015 = x;
double r2136016 = r2136014 + r2136015;
double r2136017 = r2136014 - r2136015;
double r2136018 = r2136016 / r2136017;
return r2136018;
}



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