\log \left(x + \sqrt{x \cdot x - 1}\right)\log \left(x + \left(\sqrt[3]{\sqrt{x + \sqrt{1}} \cdot \sqrt{x - \sqrt{1}}} \cdot \sqrt[3]{\sqrt{x + \sqrt{1}} \cdot \sqrt{x - \sqrt{1}}}\right) \cdot \sqrt[3]{\sqrt{x + \sqrt{1}} \cdot \sqrt{x - \sqrt{1}}}\right)double code(double x) {
return ((double) log(((double) (x + ((double) sqrt(((double) (((double) (x * x)) - 1.0))))))));
}
double code(double x) {
return ((double) log(((double) (x + ((double) (((double) (((double) cbrt(((double) (((double) sqrt(((double) (x + ((double) sqrt(1.0)))))) * ((double) sqrt(((double) (x - ((double) sqrt(1.0)))))))))) * ((double) cbrt(((double) (((double) sqrt(((double) (x + ((double) sqrt(1.0)))))) * ((double) sqrt(((double) (x - ((double) sqrt(1.0)))))))))))) * ((double) cbrt(((double) (((double) sqrt(((double) (x + ((double) sqrt(1.0)))))) * ((double) sqrt(((double) (x - ((double) sqrt(1.0))))))))))))))));
}



Bits error versus x
Results
Initial program 31.3
rmApplied add-sqr-sqrt31.3
Applied difference-of-squares31.3
Applied sqrt-prod0.1
rmApplied add-cube-cbrt0.1
Final simplification0.1
herbie shell --seed 2020161
(FPCore (x)
:name "Hyperbolic arc-cosine"
:precision binary64
(log (+ x (sqrt (- (* x x) 1.0)))))