re \cdot im + im \cdot re
re \cdot \left(im + im\right)
double f(double re, double im) {
double r180884 = re;
double r180885 = im;
double r180886 = r180884 * r180885;
double r180887 = r180885 * r180884;
double r180888 = r180886 + r180887;
return r180888;
}
double f(double re, double im) {
double r180889 = re;
double r180890 = im;
double r180891 = r180890 + r180890;
double r180892 = r180889 * r180891;
return r180892;
}



Bits error versus re



Bits error versus im
Results
Initial program 0.0
Simplified0.0
rmApplied distribute-rgt-out0
Final simplification0
herbie shell --seed 2019200
(FPCore (re im)
:name "math.square on complex, imaginary part"
(+ (* re im) (* im re)))