\left(0.5 \cdot \cos re\right) \cdot \left(e^{-im} + e^{im}\right)e^{\log 0.5 - im} \cdot \cos re + \cos re \cdot \left(0.5 \cdot e^{im}\right)double f(double re, double im) {
double r918110 = 0.5;
double r918111 = re;
double r918112 = cos(r918111);
double r918113 = r918110 * r918112;
double r918114 = im;
double r918115 = -r918114;
double r918116 = exp(r918115);
double r918117 = exp(r918114);
double r918118 = r918116 + r918117;
double r918119 = r918113 * r918118;
return r918119;
}
double f(double re, double im) {
double r918120 = 0.5;
double r918121 = log(r918120);
double r918122 = im;
double r918123 = r918121 - r918122;
double r918124 = exp(r918123);
double r918125 = re;
double r918126 = cos(r918125);
double r918127 = r918124 * r918126;
double r918128 = exp(r918122);
double r918129 = r918120 * r918128;
double r918130 = r918126 * r918129;
double r918131 = r918127 + r918130;
return r918131;
}



Bits error versus re



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