\frac{\left(re \cdot im\right)}{\left(im \cdot re\right)}\left(im + im\right) \cdot re
double f(double re, double im) {
double r8556 = re;
double r8557 = im;
double r8558 = r8556 * r8557;
double r8559 = r8557 * r8556;
double r8560 = r8558 + r8559;
return r8560;
}
double f(double re, double im) {
double r8561 = im;
double r8562 = r8561 + r8561;
double r8563 = re;
double r8564 = r8562 * r8563;
return r8564;
}



Bits error versus re



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