\frac{\left(re \cdot im\right)}{\left(im \cdot re\right)}im \cdot \left(re + re\right)
double f(double re, double im) {
double r8813 = re;
double r8814 = im;
double r8815 = r8813 * r8814;
double r8816 = r8814 * r8813;
double r8817 = r8815 + r8816;
return r8817;
}
double f(double re, double im) {
double r8818 = im;
double r8819 = re;
double r8820 = r8819 + r8819;
double r8821 = r8818 * r8820;
return r8821;
}



Bits error versus re



Bits error versus im
Initial program 0.1
Simplified0.1
rmApplied distribute-lft-out0.1
Final simplification0.1
herbie shell --seed 2019120
(FPCore (re im)
:name "math.square on complex, imaginary part"
(+.p16 (*.p16 re im) (*.p16 im re)))