\frac{e^{x} - e^{-x}}{e^{x} + e^{-x}}\tanh x
double f(double x) {
double r48268 = x;
double r48269 = exp(r48268);
double r48270 = -r48268;
double r48271 = exp(r48270);
double r48272 = r48269 - r48271;
double r48273 = r48269 + r48271;
double r48274 = r48272 / r48273;
return r48274;
}
double f(double x) {
double r48275 = x;
double r48276 = tanh(r48275);
return r48276;
}



Bits error versus x
Results
Initial program 58.2
rmApplied tanh-undef0.0
Final simplification0.0
herbie shell --seed 2019323 +o rules:numerics
(FPCore (x)
:name "Hyperbolic tangent"
:precision binary64
(/ (- (exp x) (exp (- x))) (+ (exp x) (exp (- x)))))