\frac{x + 1}{1 - x}\frac{1 + x}{1 - x}double f(double x) {
double r16794 = x;
double r16795 = 1.0;
double r16796 = r16794 + r16795;
double r16797 = r16795 - r16794;
double r16798 = r16796 / r16797;
return r16798;
}
double f(double x) {
double r16799 = 1.0;
double r16800 = x;
double r16801 = r16799 + r16800;
double r16802 = r16799 - r16800;
double r16803 = r16801 / r16802;
return r16803;
}



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