e^{re} \cdot \cos ime^{re} \cdot \cos imdouble f(double re, double im) {
double r51775 = re;
double r51776 = exp(r51775);
double r51777 = im;
double r51778 = cos(r51777);
double r51779 = r51776 * r51778;
return r51779;
}
double f(double re, double im) {
double r51780 = re;
double r51781 = exp(r51780);
double r51782 = im;
double r51783 = cos(r51782);
double r51784 = r51781 * r51783;
return r51784;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.0
Final simplification0.0
herbie shell --seed 2019323
(FPCore (re im)
:name "math.exp on complex, real part"
:precision binary64
(* (exp re) (cos im)))