-\log \left(\frac{1}{x} - 1\right)-\log \left(\frac{1}{x} - 1\right)double f(double x) {
double r89 = 1.0;
double r90 = x;
double r91 = r89 / r90;
double r92 = r91 - r89;
double r93 = log(r92);
double r94 = -r93;
return r94;
}
double f(double x) {
double r95 = 1.0;
double r96 = x;
double r97 = r95 / r96;
double r98 = r97 - r95;
double r99 = log(r98);
double r100 = -r99;
return r100;
}



Bits error versus x
Results
Initial program 0.0
Final simplification0.0
herbie shell --seed 2020025 +o rules:numerics
(FPCore (x)
:name "neg log"
:precision binary64
(- (log (- (/ 1 x) 1))))