\frac{2}{e^{x} + e^{-x}}\frac{2}{e^{x} + e^{-x}}double f(double x) {
double r40425 = 2.0;
double r40426 = x;
double r40427 = exp(r40426);
double r40428 = -r40426;
double r40429 = exp(r40428);
double r40430 = r40427 + r40429;
double r40431 = r40425 / r40430;
return r40431;
}
double f(double x) {
double r40432 = 2.0;
double r40433 = x;
double r40434 = exp(r40433);
double r40435 = -r40433;
double r40436 = exp(r40435);
double r40437 = r40434 + r40436;
double r40438 = r40432 / r40437;
return r40438;
}



Bits error versus x
Results
Initial program 0.0
Final simplification0.0
herbie shell --seed 2019303 +o rules:numerics
(FPCore (x)
:name "Hyperbolic secant"
:precision binary64
(/ 2 (+ (exp x) (exp (- x)))))