\frac{e^{x} - e^{-x}}{e^{x} + e^{-x}}
\frac{0.016666666666666666 \cdot {x}^{5} + \left(0.0003968253968253968 \cdot {x}^{7} + \left(0.3333333333333333 \cdot {x}^{3} + x \cdot 2\right)\right)}{e^{x} + e^{-x}}
(FPCore (x) :precision binary64 (/ (- (exp x) (exp (- x))) (+ (exp x) (exp (- x)))))
(FPCore (x)
:precision binary64
(/
(+
(* 0.016666666666666666 (pow x 5.0))
(+
(* 0.0003968253968253968 (pow x 7.0))
(+ (* 0.3333333333333333 (pow x 3.0)) (* x 2.0))))
(+ (exp x) (exp (- x)))))double code(double x) {
return (exp(x) - exp(-x)) / (exp(x) + exp(-x));
}
double code(double x) {
return ((0.016666666666666666 * pow(x, 5.0)) + ((0.0003968253968253968 * pow(x, 7.0)) + ((0.3333333333333333 * pow(x, 3.0)) + (x * 2.0)))) / (exp(x) + exp(-x));
}



Bits error versus x
Results
Initial program 58.3
Taylor expanded in x around 0 1.4
Final simplification1.4
herbie shell --seed 2022129
(FPCore (x)
:name "Hyperbolic tangent"
:precision binary64
(/ (- (exp x) (exp (- x))) (+ (exp x) (exp (- x)))))