-\log \left(\frac{1}{x} - 1\right)-\left(\log \left(\sqrt{\frac{1}{x} - 1}\right) + \log \left(\sqrt{\sqrt{\frac{1}{x}} + \sqrt{1}} \cdot \sqrt{\sqrt{\frac{1}{x}} - \sqrt{1}}\right)\right)double f(double x) {
double r22598 = 1.0;
double r22599 = x;
double r22600 = r22598 / r22599;
double r22601 = r22600 - r22598;
double r22602 = log(r22601);
double r22603 = -r22602;
return r22603;
}
double f(double x) {
double r22604 = 1.0;
double r22605 = x;
double r22606 = r22604 / r22605;
double r22607 = r22606 - r22604;
double r22608 = sqrt(r22607);
double r22609 = log(r22608);
double r22610 = sqrt(r22606);
double r22611 = sqrt(r22604);
double r22612 = r22610 + r22611;
double r22613 = sqrt(r22612);
double r22614 = r22610 - r22611;
double r22615 = sqrt(r22614);
double r22616 = r22613 * r22615;
double r22617 = log(r22616);
double r22618 = r22609 + r22617;
double r22619 = -r22618;
return r22619;
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-sqr-sqrt0.0
Applied log-prod0.0
rmApplied add-sqr-sqrt0.0
Applied add-sqr-sqrt0.0
Applied difference-of-squares0.0
Applied sqrt-prod0.1
Final simplification0.1
herbie shell --seed 2019303 +o rules:numerics
(FPCore (x)
:name "neg log"
:precision binary64
(- (log (- (/ 1 x) 1))))