\frac{x + 1}{1 - x}\frac{x + 1}{1 - x}double f(double x) {
double r26355 = x;
double r26356 = 1.0;
double r26357 = r26355 + r26356;
double r26358 = r26356 - r26355;
double r26359 = r26357 / r26358;
return r26359;
}
double f(double x) {
double r26360 = x;
double r26361 = 1.0;
double r26362 = r26360 + r26361;
double r26363 = r26361 - r26360;
double r26364 = r26362 / r26363;
return r26364;
}



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