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



Bits error versus x
Results
Initial program 0.0
rmApplied add-cbrt-cube_binary640.1
Applied add-cbrt-cube_binary640.1
Applied cbrt-undiv_binary640.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2020219
(FPCore (x)
:name "Hyperbolic secant"
:precision binary64
(/ 2.0 (+ (exp x) (exp (- x)))))