\frac{2}{e^{x} + e^{-x}}\sqrt[3]{{\left(\frac{2}{e^{x} + e^{-x}}\right)}^{3}}double f(double x) {
double r35423 = 2.0;
double r35424 = x;
double r35425 = exp(r35424);
double r35426 = -r35424;
double r35427 = exp(r35426);
double r35428 = r35425 + r35427;
double r35429 = r35423 / r35428;
return r35429;
}
double f(double x) {
double r35430 = 2.0;
double r35431 = x;
double r35432 = exp(r35431);
double r35433 = -r35431;
double r35434 = exp(r35433);
double r35435 = r35432 + r35434;
double r35436 = r35430 / r35435;
double r35437 = 3.0;
double r35438 = pow(r35436, r35437);
double r35439 = cbrt(r35438);
return r35439;
}



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