\frac{e^{x} - e^{-x}}{e^{x} + e^{-x}}\tanh x
double f(double x) {
double r50356 = x;
double r50357 = exp(r50356);
double r50358 = -r50356;
double r50359 = exp(r50358);
double r50360 = r50357 - r50359;
double r50361 = r50357 + r50359;
double r50362 = r50360 / r50361;
return r50362;
}
double f(double x) {
double r50363 = x;
double r50364 = tanh(r50363);
return r50364;
}



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