re \cdot im + im \cdot re
re \cdot \left(im + im\right)
(FPCore (re im) :precision binary64 (+ (* re im) (* im re)))
(FPCore (re im) :precision binary64 (* re (+ im im)))
double code(double re, double im) {
return (re * im) + (im * re);
}
double code(double re, double im) {
return re * (im + im);
}



Bits error versus re



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