\frac{\left(re \cdot im\right)}{\left(im \cdot re\right)}re \cdot \left(im + im\right)
double f(double re, double im) {
double r8729 = re;
double r8730 = im;
double r8731 = r8729 * r8730;
double r8732 = r8730 * r8729;
double r8733 = r8731 + r8732;
return r8733;
}
double f(double re, double im) {
double r8734 = re;
double r8735 = im;
double r8736 = r8735 + r8735;
double r8737 = r8734 * r8736;
return r8737;
}



Bits error versus re



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