(FPCore (x) :precision binary64 (exp (- (- 1.0 (* x x)))))
(FPCore (x) :precision binary64 (* (exp -1.0) (fma x x 1.0)))
double code(double x) {
return exp(-(1.0 - (x * x)));
}
double code(double x) {
return exp(-1.0) * fma(x, x, 1.0);
}
function code(x) return exp(Float64(-Float64(1.0 - Float64(x * x)))) end
function code(x) return Float64(exp(-1.0) * fma(x, x, 1.0)) end
code[x_] := N[Exp[(-N[(1.0 - N[(x * x), $MachinePrecision]), $MachinePrecision])], $MachinePrecision]
code[x_] := N[(N[Exp[-1.0], $MachinePrecision] * N[(x * x + 1.0), $MachinePrecision]), $MachinePrecision]
e^{-\left(1 - x \cdot x\right)}
e^{-1} \cdot \mathsf{fma}\left(x, x, 1\right)



Bits error versus x
Initial program 0.0
Simplified0.0
Taylor expanded in x around 0 0.5
Simplified0.5
Final simplification0.5
herbie shell --seed 2022159
(FPCore (x)
:name "exp neg sub"
:precision binary64
(exp (- (- 1.0 (* x x)))))