\left(0.5 \cdot \cos re\right) \cdot \left(e^{-im} + e^{im}\right)\frac{0.5 \cdot \cos re}{e^{im}} + \left(0.5 \cdot \cos re\right) \cdot e^{im}double f(double re, double im) {
double r34807 = 0.5;
double r34808 = re;
double r34809 = cos(r34808);
double r34810 = r34807 * r34809;
double r34811 = im;
double r34812 = -r34811;
double r34813 = exp(r34812);
double r34814 = exp(r34811);
double r34815 = r34813 + r34814;
double r34816 = r34810 * r34815;
return r34816;
}
double f(double re, double im) {
double r34817 = 0.5;
double r34818 = re;
double r34819 = cos(r34818);
double r34820 = r34817 * r34819;
double r34821 = im;
double r34822 = exp(r34821);
double r34823 = r34820 / r34822;
double r34824 = r34820 * r34822;
double r34825 = r34823 + r34824;
return r34825;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.0
rmApplied distribute-lft-in0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2020024
(FPCore (re im)
:name "math.cos on complex, real part"
:precision binary64
(* (* 0.5 (cos re)) (+ (exp (- im)) (exp im))))