\log \left(x + \sqrt{x \cdot x - 1}\right)\log \left(x + \left(\sqrt{x + \sqrt{1}} \cdot \left(\sqrt[3]{\sqrt{x - \sqrt{1}}} \cdot \sqrt[3]{\sqrt{x - \sqrt{1}}}\right)\right) \cdot \sqrt[3]{\sqrt{x - \sqrt{1}}}\right)double f(double x) {
double r2798255 = x;
double r2798256 = r2798255 * r2798255;
double r2798257 = 1.0;
double r2798258 = r2798256 - r2798257;
double r2798259 = sqrt(r2798258);
double r2798260 = r2798255 + r2798259;
double r2798261 = log(r2798260);
return r2798261;
}
double f(double x) {
double r2798262 = x;
double r2798263 = 1.0;
double r2798264 = sqrt(r2798263);
double r2798265 = r2798262 + r2798264;
double r2798266 = sqrt(r2798265);
double r2798267 = r2798262 - r2798264;
double r2798268 = sqrt(r2798267);
double r2798269 = cbrt(r2798268);
double r2798270 = r2798269 * r2798269;
double r2798271 = r2798266 * r2798270;
double r2798272 = r2798271 * r2798269;
double r2798273 = r2798262 + r2798272;
double r2798274 = log(r2798273);
return r2798274;
}



Bits error versus x
Results
Initial program 31.6
rmApplied add-sqr-sqrt31.6
Applied difference-of-squares31.6
Applied sqrt-prod0.0
rmApplied add-cube-cbrt0.1
Applied associate-*r*0.1
Final simplification0.1
herbie shell --seed 2019172
(FPCore (x)
:name "Hyperbolic arc-cosine"
(log (+ x (sqrt (- (* x x) 1.0)))))