\frac{2}{e^{x} + e^{-x}}\sqrt[3]{{\left(\frac{2}{e^{x} + e^{-x}}\right)}^{3}}double f(double x) {
double r53120 = 2.0;
double r53121 = x;
double r53122 = exp(r53121);
double r53123 = -r53121;
double r53124 = exp(r53123);
double r53125 = r53122 + r53124;
double r53126 = r53120 / r53125;
return r53126;
}
double f(double x) {
double r53127 = 2.0;
double r53128 = x;
double r53129 = exp(r53128);
double r53130 = -r53128;
double r53131 = exp(r53130);
double r53132 = r53129 + r53131;
double r53133 = r53127 / r53132;
double r53134 = 3.0;
double r53135 = pow(r53133, r53134);
double r53136 = cbrt(r53135);
return r53136;
}



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