re \cdot im + im \cdot re
im \cdot \left(re + re\right)
double f(double re, double im) {
double r8310 = re;
double r8311 = im;
double r8312 = r8310 * r8311;
double r8313 = r8311 * r8310;
double r8314 = r8312 + r8313;
return r8314;
}
double f(double re, double im) {
double r8315 = im;
double r8316 = re;
double r8317 = r8316 + r8316;
double r8318 = r8315 * r8317;
return r8318;
}



Bits error versus re



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