\frac{2}{e^{x} + e^{-x}}\frac{-2}{\left(-e^{x}\right) + \frac{-1}{e^{x}}}double f(double x) {
double r882220 = 2.0;
double r882221 = x;
double r882222 = exp(r882221);
double r882223 = -r882221;
double r882224 = exp(r882223);
double r882225 = r882222 + r882224;
double r882226 = r882220 / r882225;
return r882226;
}
double f(double x) {
double r882227 = -2.0;
double r882228 = x;
double r882229 = exp(r882228);
double r882230 = -r882229;
double r882231 = -1.0;
double r882232 = r882231 / r882229;
double r882233 = r882230 + r882232;
double r882234 = r882227 / r882233;
return r882234;
}



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