\frac{2}{e^{x} + e^{-x}}\sqrt[3]{\frac{8}{\left(e^{-x} + e^{x}\right) \cdot \left(\left(e^{-x} + e^{x}\right) \cdot \left(e^{-x} + e^{x}\right)\right)}}double f(double x) {
double r2572516 = 2.0;
double r2572517 = x;
double r2572518 = exp(r2572517);
double r2572519 = -r2572517;
double r2572520 = exp(r2572519);
double r2572521 = r2572518 + r2572520;
double r2572522 = r2572516 / r2572521;
return r2572522;
}
double f(double x) {
double r2572523 = 8.0;
double r2572524 = x;
double r2572525 = -r2572524;
double r2572526 = exp(r2572525);
double r2572527 = exp(r2572524);
double r2572528 = r2572526 + r2572527;
double r2572529 = r2572528 * r2572528;
double r2572530 = r2572528 * r2572529;
double r2572531 = r2572523 / r2572530;
double r2572532 = cbrt(r2572531);
return r2572532;
}



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