\frac{2}{e^{x} + e^{-x}}\sqrt[3]{\left(\frac{2}{e^{x} + e^{-x}} \cdot \frac{2}{e^{x} + e^{-x}}\right) \cdot \frac{2}{e^{x} + e^{-x}}}double f(double x) {
double r2788864 = 2.0;
double r2788865 = x;
double r2788866 = exp(r2788865);
double r2788867 = -r2788865;
double r2788868 = exp(r2788867);
double r2788869 = r2788866 + r2788868;
double r2788870 = r2788864 / r2788869;
return r2788870;
}
double f(double x) {
double r2788871 = 2.0;
double r2788872 = x;
double r2788873 = exp(r2788872);
double r2788874 = -r2788872;
double r2788875 = exp(r2788874);
double r2788876 = r2788873 + r2788875;
double r2788877 = r2788871 / r2788876;
double r2788878 = r2788877 * r2788877;
double r2788879 = r2788878 * r2788877;
double r2788880 = cbrt(r2788879);
return r2788880;
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-sqr-sqrt0.8
Applied associate-/r*0.5
rmApplied add-cbrt-cube0.1
Simplified0.1
Final simplification0.1
herbie shell --seed 2019138
(FPCore (x)
:name "Hyperbolic secant"
(/ 2 (+ (exp x) (exp (- x)))))