\log \left(x + \sqrt{x \cdot x - 1}\right)\log \left(x + \sqrt{x + \sqrt{1}} \cdot \sqrt{x - \sqrt{1}}\right)double f(double x) {
double r37789 = x;
double r37790 = r37789 * r37789;
double r37791 = 1.0;
double r37792 = r37790 - r37791;
double r37793 = sqrt(r37792);
double r37794 = r37789 + r37793;
double r37795 = log(r37794);
return r37795;
}
double f(double x) {
double r37796 = x;
double r37797 = 1.0;
double r37798 = sqrt(r37797);
double r37799 = r37796 + r37798;
double r37800 = sqrt(r37799);
double r37801 = r37796 - r37798;
double r37802 = sqrt(r37801);
double r37803 = r37800 * r37802;
double r37804 = r37796 + r37803;
double r37805 = log(r37804);
return r37805;
}



Bits error versus x
Results
Initial program 32.0
rmApplied add-sqr-sqrt32.0
Applied difference-of-squares32.0
Applied sqrt-prod0.1
Final simplification0.1
herbie shell --seed 2020002
(FPCore (x)
:name "Hyperbolic arc-cosine"
:precision binary64
(log (+ x (sqrt (- (* x x) 1)))))