\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 r8070486 = x_re;
double r8070487 = r8070486 * r8070486;
double r8070488 = x_im;
double r8070489 = r8070488 * r8070488;
double r8070490 = r8070487 - r8070489;
double r8070491 = r8070490 * r8070486;
double r8070492 = r8070486 * r8070488;
double r8070493 = r8070488 * r8070486;
double r8070494 = r8070492 + r8070493;
double r8070495 = r8070494 * r8070488;
double r8070496 = r8070491 - r8070495;
return r8070496;
}
double f(double x_re, double x_im) {
double r8070497 = x_re;
double r8070498 = x_im;
double r8070499 = r8070497 - r8070498;
double r8070500 = r8070499 * r8070497;
double r8070501 = r8070498 + r8070497;
double r8070502 = r8070500 * r8070501;
double r8070503 = r8070497 * r8070498;
double r8070504 = r8070503 + r8070503;
double r8070505 = r8070504 * r8070498;
double r8070506 = r8070502 - r8070505;
return r8070506;
}




Bits error versus x.re




Bits error versus x.im
Results
| Original | 7.5 |
|---|---|
| Target | 0.2 |
| Herbie | 0.2 |
Initial program 7.5
rmApplied difference-of-squares7.5
Applied associate-*l*0.2
Final simplification0.2
herbie shell --seed 2019171
(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.0 x.im))))
(- (* (- (* x.re x.re) (* x.im x.im)) x.re) (* (+ (* x.re x.im) (* x.im x.re)) x.im)))