\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 r2054819 = 2.0;
double r2054820 = x;
double r2054821 = exp(r2054820);
double r2054822 = -r2054820;
double r2054823 = exp(r2054822);
double r2054824 = r2054821 + r2054823;
double r2054825 = r2054819 / r2054824;
return r2054825;
}
double f(double x) {
double r2054826 = 2.0;
double r2054827 = x;
double r2054828 = exp(r2054827);
double r2054829 = -r2054827;
double r2054830 = exp(r2054829);
double r2054831 = r2054828 + r2054830;
double r2054832 = r2054826 / r2054831;
double r2054833 = r2054832 * r2054832;
double r2054834 = r2054833 * r2054832;
double r2054835 = cbrt(r2054834);
return r2054835;
}



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 2019164 +o rules:numerics
(FPCore (x)
:name "Hyperbolic secant"
(/ 2 (+ (exp x) (exp (- x)))))