\left(x.re \cdot x.re - x.im \cdot x.im\right) \cdot x.re - \left(x.re \cdot x.im + x.im \cdot x.re\right) \cdot x.im
\left(\left(x.re - x.im\right) \cdot x.re\right) \cdot \left(x.im + x.re\right) - \left(x.re \cdot x.im + x.re \cdot x.im\right) \cdot x.im
double f(double x_re, double x_im) {
double r6281057 = x_re;
double r6281058 = r6281057 * r6281057;
double r6281059 = x_im;
double r6281060 = r6281059 * r6281059;
double r6281061 = r6281058 - r6281060;
double r6281062 = r6281061 * r6281057;
double r6281063 = r6281057 * r6281059;
double r6281064 = r6281059 * r6281057;
double r6281065 = r6281063 + r6281064;
double r6281066 = r6281065 * r6281059;
double r6281067 = r6281062 - r6281066;
return r6281067;
}
double f(double x_re, double x_im) {
double r6281068 = x_re;
double r6281069 = x_im;
double r6281070 = r6281068 - r6281069;
double r6281071 = r6281070 * r6281068;
double r6281072 = r6281069 + r6281068;
double r6281073 = r6281071 * r6281072;
double r6281074 = r6281068 * r6281069;
double r6281075 = r6281074 + r6281074;
double r6281076 = r6281075 * r6281069;
double r6281077 = r6281073 - r6281076;
return r6281077;
}




Bits error versus x.re




Bits error versus x.im
Results
| Original | 6.6 |
|---|---|
| Target | 0.3 |
| Herbie | 0.3 |
Initial program 6.6
rmApplied difference-of-squares6.6
Applied associate-*l*0.3
Final simplification0.3
herbie shell --seed 2019152
(FPCore (x.re x.im)
:name "math.cube on complex, real part"
:herbie-target
(+ (* (* x.re x.re) (- x.re x.im)) (* (* x.re x.im) (- x.re (* 3 x.im))))
(- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)))