\frac{\left(re \cdot im\right)}{\left(im \cdot re\right)}im \cdot \left(re + re\right)
double f(double re, double im) {
double r8666 = re;
double r8667 = im;
double r8668 = r8666 * r8667;
double r8669 = r8667 * r8666;
double r8670 = r8668 + r8669;
return r8670;
}
double f(double re, double im) {
double r8671 = im;
double r8672 = re;
double r8673 = r8672 + r8672;
double r8674 = r8671 * r8673;
return r8674;
}



Bits error versus re



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