\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 r314 = 0.5;
double r315 = re;
double r316 = cos(r315);
double r317 = r314 * r316;
double r318 = im;
double r319 = -r318;
double r320 = exp(r319);
double r321 = exp(r318);
double r322 = r320 + r321;
double r323 = r317 * r322;
return r323;
}
double f(double re, double im) {
double r324 = 0.5;
double r325 = re;
double r326 = cos(r325);
double r327 = r324 * r326;
double r328 = im;
double r329 = exp(r328);
double r330 = r327 / r329;
double r331 = r327 * r329;
double r332 = r330 + r331;
return r332;
}



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 2020025 +o rules:numerics
(FPCore (re im)
:name "math.cos on complex, real part"
:precision binary64
(* (* 0.5 (cos re)) (+ (exp (- im)) (exp im))))