re \cdot im + im \cdot re
re \cdot im + re \cdot im
double f(double re, double im) {
double r8410 = re;
double r8411 = im;
double r8412 = r8410 * r8411;
double r8413 = r8411 * r8410;
double r8414 = r8412 + r8413;
return r8414;
}
double f(double re, double im) {
double r8415 = re;
double r8416 = im;
double r8417 = r8415 * r8416;
double r8418 = r8417 + r8417;
return r8418;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2019151
(FPCore (re im)
:name "math.square on complex, imaginary part"
(+ (* re im) (* im re)))