\frac{e^{x} - e^{-x}}{e^{x} + e^{-x}}\tanh x
double f(double x) {
double r3465727 = x;
double r3465728 = exp(r3465727);
double r3465729 = -r3465727;
double r3465730 = exp(r3465729);
double r3465731 = r3465728 - r3465730;
double r3465732 = r3465728 + r3465730;
double r3465733 = r3465731 / r3465732;
return r3465733;
}
double f(double x) {
double r3465734 = x;
double r3465735 = tanh(r3465734);
return r3465735;
}



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