\frac{2}{e^{x} + e^{-x}}\sqrt[3]{\frac{1}{\left(e^{-1 \cdot x} + e^{x}\right) \cdot \left(e^{-1 \cdot x} + e^{x}\right)} \cdot \frac{{2}^{3}}{e^{-1 \cdot x} + e^{x}}}double f(double x) {
double r50846 = 2.0;
double r50847 = x;
double r50848 = exp(r50847);
double r50849 = -r50847;
double r50850 = exp(r50849);
double r50851 = r50848 + r50850;
double r50852 = r50846 / r50851;
return r50852;
}
double f(double x) {
double r50853 = 1.0;
double r50854 = -1.0;
double r50855 = x;
double r50856 = r50854 * r50855;
double r50857 = exp(r50856);
double r50858 = exp(r50855);
double r50859 = r50857 + r50858;
double r50860 = r50859 * r50859;
double r50861 = r50853 / r50860;
double r50862 = 2.0;
double r50863 = 3.0;
double r50864 = pow(r50862, r50863);
double r50865 = r50864 / r50859;
double r50866 = r50861 * r50865;
double r50867 = cbrt(r50866);
return r50867;
}



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
rmApplied add-cube-cbrt1.3
Applied *-un-lft-identity1.3
Applied times-frac1.3
Applied unpow-prod-down1.3
Simplified0.6
Simplified0.1
Final simplification0.1
herbie shell --seed 2020020 +o rules:numerics
(FPCore (x)
:name "Hyperbolic secant"
:precision binary64
(/ 2 (+ (exp x) (exp (- x)))))