\frac{2}{e^{x} + e^{-x}}\sqrt[3]{\frac{\frac{8}{e^{x} + \frac{1}{e^{x}}}}{\left(e^{x} + \frac{1}{e^{x}}\right) \cdot \left(e^{x} + \frac{1}{e^{x}}\right)}}double f(double x) {
double r2729139 = 2.0;
double r2729140 = x;
double r2729141 = exp(r2729140);
double r2729142 = -r2729140;
double r2729143 = exp(r2729142);
double r2729144 = r2729141 + r2729143;
double r2729145 = r2729139 / r2729144;
return r2729145;
}
double f(double x) {
double r2729146 = 8.0;
double r2729147 = x;
double r2729148 = exp(r2729147);
double r2729149 = 1.0;
double r2729150 = r2729149 / r2729148;
double r2729151 = r2729148 + r2729150;
double r2729152 = r2729146 / r2729151;
double r2729153 = r2729151 * r2729151;
double r2729154 = r2729152 / r2729153;
double r2729155 = cbrt(r2729154);
return r2729155;
}



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