\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 r71066 = x;
double r71067 = r71066 * r71066;
double r71068 = 1.0;
double r71069 = r71067 - r71068;
double r71070 = sqrt(r71069);
double r71071 = r71066 + r71070;
double r71072 = log(r71071);
return r71072;
}
double f(double x) {
double r71073 = x;
double r71074 = 1.0;
double r71075 = sqrt(r71074);
double r71076 = r71073 + r71075;
double r71077 = sqrt(r71076);
double r71078 = r71073 - r71075;
double r71079 = sqrt(r71078);
double r71080 = r71077 * r71079;
double r71081 = r71073 + r71080;
double r71082 = log(r71081);
return r71082;
}



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 2019362
(FPCore (x)
:name "Hyperbolic arc-cosine"
:precision binary64
(log (+ x (sqrt (- (* x x) 1)))))