\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 r32555 = 0.5;
double r32556 = re;
double r32557 = cos(r32556);
double r32558 = r32555 * r32557;
double r32559 = im;
double r32560 = -r32559;
double r32561 = exp(r32560);
double r32562 = exp(r32559);
double r32563 = r32561 + r32562;
double r32564 = r32558 * r32563;
return r32564;
}
double f(double re, double im) {
double r32565 = 0.5;
double r32566 = re;
double r32567 = cos(r32566);
double r32568 = r32565 * r32567;
double r32569 = im;
double r32570 = exp(r32569);
double r32571 = r32568 / r32570;
double r32572 = r32568 * r32570;
double r32573 = r32571 + r32572;
return r32573;
}



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