(FPCore (x) :precision binary64 (/ 2.0 (+ (exp x) (exp (- x)))))
(FPCore (x) :precision binary64 (/ 2.0 (fma (cosh x) 2.0 0.0)))
double code(double x) {
return 2.0 / (exp(x) + exp(-x));
}
double code(double x) {
return 2.0 / fma(cosh(x), 2.0, 0.0);
}
function code(x) return Float64(2.0 / Float64(exp(x) + exp(Float64(-x)))) end
function code(x) return Float64(2.0 / fma(cosh(x), 2.0, 0.0)) end
code[x_] := N[(2.0 / N[(N[Exp[x], $MachinePrecision] + N[Exp[(-x)], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[x_] := N[(2.0 / N[(N[Cosh[x], $MachinePrecision] * 2.0 + 0.0), $MachinePrecision]), $MachinePrecision]
\frac{2}{e^{x} + e^{-x}}
\frac{2}{\mathsf{fma}\left(\cosh x, 2, 0\right)}



Bits error versus x
Initial program 0.0
Applied egg-rr0.5
Applied egg-rr0.0
Final simplification0.0
herbie shell --seed 2022155
(FPCore (x)
:name "Hyperbolic secant"
:precision binary64
(/ 2.0 (+ (exp x) (exp (- x)))))