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



Bits error versus x
Results
Initial program 0.0
rmApplied add-log-exp_binary64_148163.4
Applied add-log-exp_binary64_148163.4
Applied sum-log_binary64_153363.5
Simplified63.5
rmApplied *-un-lft-identity_binary64_144263.5
Applied unpow-prod-down_binary64_152163.5
Applied log-prod_binary64_152863.5
Simplified63.5
Simplified0.0
Final simplification0.0
herbie shell --seed 2020298
(FPCore (x)
:name "Hyperbolic arc-(co)secant"
:precision binary64
(log (+ (/ 1.0 x) (/ (sqrt (- 1.0 (* x x))) x))))