\frac{\left(re \cdot im\right)}{\left(im \cdot re\right)}\left(\frac{im}{im}\right) \cdot redouble f(double re, double im) {
double r10122 = re;
double r10123 = im;
double r10124 = r10122 * r10123;
double r10125 = r10123 * r10122;
double r10126 = r10124 + r10125;
return r10126;
}
double f(double re, double im) {
double r10127 = im;
double r10128 = r10127 + r10127;
double r10129 = re;
double r10130 = r10128 * r10129;
return r10130;
}



Bits error versus re



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