\frac{2}{e^{x} + e^{-x}}\frac{2}{e^{x} + e^{-x}}double f(double x) {
double r61789 = 2.0;
double r61790 = x;
double r61791 = exp(r61790);
double r61792 = -r61790;
double r61793 = exp(r61792);
double r61794 = r61791 + r61793;
double r61795 = r61789 / r61794;
return r61795;
}
double f(double x) {
double r61796 = 2.0;
double r61797 = x;
double r61798 = exp(r61797);
double r61799 = -r61797;
double r61800 = exp(r61799);
double r61801 = r61798 + r61800;
double r61802 = r61796 / r61801;
return r61802;
}



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