\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 r103258 = 1.0;
double r103259 = x;
double r103260 = r103258 / r103259;
double r103261 = r103259 * r103259;
double r103262 = r103258 - r103261;
double r103263 = sqrt(r103262);
double r103264 = r103263 / r103259;
double r103265 = r103260 + r103264;
double r103266 = log(r103265);
return r103266;
}
double f(double x) {
double r103267 = 1.0;
double r103268 = x;
double r103269 = r103267 / r103268;
double r103270 = r103268 * r103268;
double r103271 = r103267 - r103270;
double r103272 = sqrt(r103271);
double r103273 = r103272 / r103268;
double r103274 = r103269 + r103273;
double r103275 = sqrt(r103274);
double r103276 = log(r103275);
double r103277 = r103276 + r103276;
return r103277;
}



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