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



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