\log \left(x + \sqrt{x \cdot x - 1}\right)\log \left(x + \sqrt{\sqrt{x} - 1} \cdot \left(\sqrt{1 + x} \cdot \sqrt{1 + \sqrt{x}}\right)\right)double f(double x) {
double r9262602 = x;
double r9262603 = r9262602 * r9262602;
double r9262604 = 1.0;
double r9262605 = r9262603 - r9262604;
double r9262606 = sqrt(r9262605);
double r9262607 = r9262602 + r9262606;
double r9262608 = log(r9262607);
return r9262608;
}
double f(double x) {
double r9262609 = x;
double r9262610 = sqrt(r9262609);
double r9262611 = 1.0;
double r9262612 = r9262610 - r9262611;
double r9262613 = sqrt(r9262612);
double r9262614 = r9262611 + r9262609;
double r9262615 = sqrt(r9262614);
double r9262616 = r9262611 + r9262610;
double r9262617 = sqrt(r9262616);
double r9262618 = r9262615 * r9262617;
double r9262619 = r9262613 * r9262618;
double r9262620 = r9262609 + r9262619;
double r9262621 = log(r9262620);
return r9262621;
}



Bits error versus x
Results
Initial program 31.4
rmApplied *-un-lft-identity31.4
Applied difference-of-squares31.4
Applied sqrt-prod0.0
rmApplied *-un-lft-identity0.0
Applied add-sqr-sqrt0.0
Applied difference-of-squares0.0
Applied sqrt-prod0.0
Applied associate-*r*0.0
Final simplification0.0
herbie shell --seed 2019119
(FPCore (x)
:name "Hyperbolic arc-cosine"
(log (+ x (sqrt (- (* x x) 1)))))