re \cdot re - im \cdot im
\left(im + re\right) \cdot \left(re - im\right)
double f(double re, double im) {
double r108925 = re;
double r108926 = r108925 * r108925;
double r108927 = im;
double r108928 = r108927 * r108927;
double r108929 = r108926 - r108928;
return r108929;
}
double f(double re, double im) {
double r108930 = im;
double r108931 = re;
double r108932 = r108930 + r108931;
double r108933 = r108931 - r108930;
double r108934 = r108932 * r108933;
return r108934;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.0
rmApplied difference-of-squares0.0
Final simplification0.0
herbie shell --seed 2019154 +o rules:numerics
(FPCore (re im)
:name "math.square on complex, real part"
(- (* re re) (* im im)))