-\log \left(\frac{1}{x} - 1\right)-\log \left(\frac{1}{x} - 1\right)double f(double x) {
double r8978 = 1.0;
double r8979 = x;
double r8980 = r8978 / r8979;
double r8981 = r8980 - r8978;
double r8982 = log(r8981);
double r8983 = -r8982;
return r8983;
}
double f(double x) {
double r8984 = 1.0;
double r8985 = x;
double r8986 = r8984 / r8985;
double r8987 = r8986 - r8984;
double r8988 = log(r8987);
double r8989 = -r8988;
return r8989;
}



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