\frac{e^{x} - e^{-x}}{e^{x} + e^{-x}}\tanh x
double f(double x) {
double r62736 = x;
double r62737 = exp(r62736);
double r62738 = -r62736;
double r62739 = exp(r62738);
double r62740 = r62737 - r62739;
double r62741 = r62737 + r62739;
double r62742 = r62740 / r62741;
return r62742;
}
double f(double x) {
double r62743 = x;
double r62744 = tanh(r62743);
return r62744;
}



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