e^{-\left(1 - x \cdot x\right)}\sqrt{{\left(e^{-x}\right)}^{\left(1 - x\right)} \cdot {\left(e^{-1}\right)}^{\left(1 - x\right)}} \cdot \sqrt{{\left(e^{-x}\right)}^{\left(1 - x\right)} \cdot {\left(e^{-1}\right)}^{\left(1 - x\right)}}double f(double x) {
double r6199625 = 1.0;
double r6199626 = x;
double r6199627 = r6199626 * r6199626;
double r6199628 = r6199625 - r6199627;
double r6199629 = -r6199628;
double r6199630 = exp(r6199629);
return r6199630;
}
double f(double x) {
double r6199631 = x;
double r6199632 = -r6199631;
double r6199633 = exp(r6199632);
double r6199634 = 1.0;
double r6199635 = r6199634 - r6199631;
double r6199636 = pow(r6199633, r6199635);
double r6199637 = -1.0;
double r6199638 = exp(r6199637);
double r6199639 = pow(r6199638, r6199635);
double r6199640 = r6199636 * r6199639;
double r6199641 = sqrt(r6199640);
double r6199642 = r6199641 * r6199641;
return r6199642;
}



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
Simplified0.0
rmApplied sub-neg0.0
Applied exp-sum0.0
Applied unpow-prod-down0.0
rmApplied add-sqr-sqrt0.0
Final simplification0.0
herbie shell --seed 2019125
(FPCore (x)
:name "exp neg sub"
(exp (- (- 1 (* x x)))))