\frac{2}{e^{x} + e^{-x}}\frac{-2}{\frac{-1}{e^{x}} - e^{x}}double f(double x) {
double r1171477 = 2.0;
double r1171478 = x;
double r1171479 = exp(r1171478);
double r1171480 = -r1171478;
double r1171481 = exp(r1171480);
double r1171482 = r1171479 + r1171481;
double r1171483 = r1171477 / r1171482;
return r1171483;
}
double f(double x) {
double r1171484 = -2.0;
double r1171485 = -1.0;
double r1171486 = x;
double r1171487 = exp(r1171486);
double r1171488 = r1171485 / r1171487;
double r1171489 = r1171488 - r1171487;
double r1171490 = r1171484 / r1171489;
return r1171490;
}



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