\left(0.5 \cdot \cos re\right) \cdot \left(e^{-im} + e^{im}\right)\cos re \cdot \left(\sqrt{0.5} \cdot \frac{\sqrt{0.5}}{e^{im}} + 0.5 \cdot e^{im}\right)double f(double re, double im) {
double r1252509 = 0.5;
double r1252510 = re;
double r1252511 = cos(r1252510);
double r1252512 = r1252509 * r1252511;
double r1252513 = im;
double r1252514 = -r1252513;
double r1252515 = exp(r1252514);
double r1252516 = exp(r1252513);
double r1252517 = r1252515 + r1252516;
double r1252518 = r1252512 * r1252517;
return r1252518;
}
double f(double re, double im) {
double r1252519 = re;
double r1252520 = cos(r1252519);
double r1252521 = 0.5;
double r1252522 = sqrt(r1252521);
double r1252523 = im;
double r1252524 = exp(r1252523);
double r1252525 = r1252522 / r1252524;
double r1252526 = r1252522 * r1252525;
double r1252527 = r1252521 * r1252524;
double r1252528 = r1252526 + r1252527;
double r1252529 = r1252520 * r1252528;
return r1252529;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.0
Simplified0.0
rmApplied *-un-lft-identity0.0
Applied add-sqr-sqrt0.0
Applied times-frac0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2019154
(FPCore (re im)
:name "math.cos on complex, real part"
(* (* 0.5 (cos re)) (+ (exp (- im)) (exp im))))