\frac{2}{e^{x} + e^{-x}}\frac{2}{e^{\log \left(e^{x} + e^{-x}\right)}}double f(double x) {
double r4773300 = 2.0;
double r4773301 = x;
double r4773302 = exp(r4773301);
double r4773303 = -r4773301;
double r4773304 = exp(r4773303);
double r4773305 = r4773302 + r4773304;
double r4773306 = r4773300 / r4773305;
return r4773306;
}
double f(double x) {
double r4773307 = 2.0;
double r4773308 = x;
double r4773309 = exp(r4773308);
double r4773310 = -r4773308;
double r4773311 = exp(r4773310);
double r4773312 = r4773309 + r4773311;
double r4773313 = log(r4773312);
double r4773314 = exp(r4773313);
double r4773315 = r4773307 / r4773314;
return r4773315;
}



Bits error versus x
Results
Initial program 0.0
rmApplied add-exp-log0.0
Final simplification0.0
herbie shell --seed 2019121
(FPCore (x)
:name "Hyperbolic secant"
(/ 2 (+ (exp x) (exp (- x)))))