\log \left(\frac{1}{x} + \frac{\sqrt{1 - x \cdot x}}{x}\right)\log \left(\sqrt{\frac{1}{x} + \frac{\sqrt{1 - x \cdot x}}{x}}\right) + \log \left(\sqrt{\frac{1}{x} + \frac{\sqrt{1 - x \cdot x}}{x}}\right)double f(double x) {
double r980587 = 1.0;
double r980588 = x;
double r980589 = r980587 / r980588;
double r980590 = r980588 * r980588;
double r980591 = r980587 - r980590;
double r980592 = sqrt(r980591);
double r980593 = r980592 / r980588;
double r980594 = r980589 + r980593;
double r980595 = log(r980594);
return r980595;
}
double f(double x) {
double r980596 = 1.0;
double r980597 = x;
double r980598 = r980596 / r980597;
double r980599 = r980597 * r980597;
double r980600 = r980596 - r980599;
double r980601 = sqrt(r980600);
double r980602 = r980601 / r980597;
double r980603 = r980598 + r980602;
double r980604 = sqrt(r980603);
double r980605 = log(r980604);
double r980606 = r980605 + r980605;
return r980606;
}



Bits error versus x
Results
Initial program 0.1
rmApplied add-sqr-sqrt0.1
Applied log-prod0.1
Final simplification0.1
herbie shell --seed 2019133
(FPCore (x)
:name "Hyperbolic arc-(co)secant"
(log (+ (/ 1 x) (/ (sqrt (- 1 (* x x))) x))))