e^{re} \cdot \cos ime^{re} \cdot \cos imdouble f(double re, double im) {
double r70078 = re;
double r70079 = exp(r70078);
double r70080 = im;
double r70081 = cos(r70080);
double r70082 = r70079 * r70081;
return r70082;
}
double f(double re, double im) {
double r70083 = re;
double r70084 = exp(r70083);
double r70085 = im;
double r70086 = cos(r70085);
double r70087 = r70084 * r70086;
return r70087;
}



Bits error versus re



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