\log \left(x + \sqrt{x \cdot x - 1}\right)\log \left(\left(\sqrt{\sqrt{x + \sqrt{1}}} \cdot \sqrt{x - \sqrt{1}}\right) \cdot \sqrt{\sqrt{x + \sqrt{1}}} + x\right)double f(double x) {
double r73415 = x;
double r73416 = r73415 * r73415;
double r73417 = 1.0;
double r73418 = r73416 - r73417;
double r73419 = sqrt(r73418);
double r73420 = r73415 + r73419;
double r73421 = log(r73420);
return r73421;
}
double f(double x) {
double r73422 = x;
double r73423 = 1.0;
double r73424 = sqrt(r73423);
double r73425 = r73422 + r73424;
double r73426 = sqrt(r73425);
double r73427 = sqrt(r73426);
double r73428 = r73422 - r73424;
double r73429 = sqrt(r73428);
double r73430 = r73427 * r73429;
double r73431 = r73430 * r73427;
double r73432 = r73431 + r73422;
double r73433 = log(r73432);
return r73433;
}



Bits error versus x
Results
Initial program 32.1
rmApplied add-sqr-sqrt32.1
Applied difference-of-squares32.1
Applied sqrt-prod0.0
Simplified0.0
rmApplied add-sqr-sqrt0.0
Applied sqrt-prod0.1
Applied associate-*l*0.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2019195
(FPCore (x)
:name "Hyperbolic arc-cosine"
(log (+ x (sqrt (- (* x x) 1.0)))))