\log \left(\frac{1}{x} + \frac{\sqrt{1 - x \cdot x}}{x}\right)\log \left(\frac{1}{x} + \frac{\sqrt{\sqrt{1} + x}}{\sqrt{x}} \cdot \frac{\sqrt{\sqrt{1} - x}}{\sqrt{x}}\right)double code(double x) {
return log(((1.0 / x) + (sqrt((1.0 - (x * x))) / x)));
}
double code(double x) {
return log(((1.0 / x) + ((sqrt((sqrt(1.0) + x)) / sqrt(x)) * (sqrt((sqrt(1.0) - x)) / sqrt(x)))));
}



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