-\log \left(\frac{1}{x} - 1\right)-\log \left(\frac{1}{x} - 1\right)double f(double x) {
double r140581 = 1.0;
double r140582 = x;
double r140583 = r140581 / r140582;
double r140584 = r140583 - r140581;
double r140585 = log(r140584);
double r140586 = -r140585;
return r140586;
}
double f(double x) {
double r140587 = 1.0;
double r140588 = x;
double r140589 = r140587 / r140588;
double r140590 = r140589 - r140587;
double r140591 = log(r140590);
double r140592 = -r140591;
return r140592;
}



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