e^{re} \cdot \cos ime^{re} \cdot \cos imdouble f(double re, double im) {
double r95341 = re;
double r95342 = exp(r95341);
double r95343 = im;
double r95344 = cos(r95343);
double r95345 = r95342 * r95344;
return r95345;
}
double f(double re, double im) {
double r95346 = re;
double r95347 = exp(r95346);
double r95348 = im;
double r95349 = cos(r95348);
double r95350 = r95347 * r95349;
return r95350;
}



Bits error versus re



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