\frac{2}{e^{x} + e^{-x}}
\sqrt[3]{{\left(\frac{1}{\cosh x}\right)}^{3}}
(FPCore (x) :precision binary64 (/ 2.0 (+ (exp x) (exp (- x)))))
(FPCore (x) :precision binary64 (cbrt (pow (/ 1.0 (cosh x)) 3.0)))
double code(double x) {
return 2.0 / (exp(x) + exp(-x));
}
double code(double x) {
return cbrt(pow((1.0 / cosh(x)), 3.0));
}



Bits error versus x
Results
Initial program 0.0
Applied cosh-undef_binary640.0
Applied add-sqr-sqrt_binary640.5
Applied times-frac_binary640.5
Applied add-cbrt-cube_binary640.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2022067
(FPCore (x)
:name "Hyperbolic secant"
:precision binary64
(/ 2.0 (+ (exp x) (exp (- x)))))