e^{-\left(1 - x \cdot x\right)}\left(\left(e^{-x} \cdot {\left(e^{-x}\right)}^{\left(-x\right)}\right) \cdot {\left(\frac{1}{\sqrt{e}}\right)}^{\left(1 - x\right)}\right) \cdot {\left(\frac{1}{\sqrt{e}}\right)}^{\left(1 - x\right)}double f(double x) {
double r10937911 = 1.0;
double r10937912 = x;
double r10937913 = r10937912 * r10937912;
double r10937914 = r10937911 - r10937913;
double r10937915 = -r10937914;
double r10937916 = exp(r10937915);
return r10937916;
}
double f(double x) {
double r10937917 = x;
double r10937918 = -r10937917;
double r10937919 = exp(r10937918);
double r10937920 = pow(r10937919, r10937918);
double r10937921 = r10937919 * r10937920;
double r10937922 = 1.0;
double r10937923 = exp(1.0);
double r10937924 = sqrt(r10937923);
double r10937925 = r10937922 / r10937924;
double r10937926 = r10937922 - r10937917;
double r10937927 = pow(r10937925, r10937926);
double r10937928 = r10937921 * r10937927;
double r10937929 = r10937928 * r10937927;
return r10937929;
}



Bits error versus x
Results
Initial program 0.0
rmApplied *-un-lft-identity0.0
Applied difference-of-squares0.0
Applied distribute-lft-neg-in0.0
Applied exp-prod0.0
rmApplied distribute-neg-in0.0
Applied exp-sum0.0
Applied unpow-prod-down0.0
Simplified0.0
rmApplied add-sqr-sqrt1.0
Applied *-un-lft-identity1.0
Applied times-frac0.0
Applied unpow-prod-down0.0
Applied associate-*l*0.0
rmApplied sub-neg0.0
Applied unpow-prod-up0.0
Final simplification0.0
herbie shell --seed 2019120
(FPCore (x)
:name "exp neg sub"
(exp (- (- 1 (* x x)))))