\frac{e^{x} - e^{-x}}{e^{x} + e^{-x}}\tanh x
double f(double x) {
double r37533 = x;
double r37534 = exp(r37533);
double r37535 = -r37533;
double r37536 = exp(r37535);
double r37537 = r37534 - r37536;
double r37538 = r37534 + r37536;
double r37539 = r37537 / r37538;
return r37539;
}
double f(double x) {
double r37540 = x;
double r37541 = tanh(r37540);
return r37541;
}



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