\left(x.re \cdot x.re - x.im \cdot x.im\right) \cdot x.im + \left(x.re \cdot x.im + x.im \cdot x.re\right) \cdot x.re
\mathsf{fma}\left(x.im + x.re, \left(x.re - x.im\right) \cdot x.im, \left(x.re \cdot x.im + x.re \cdot x.im\right) \cdot x.re\right)double f(double x_re, double x_im) {
double r6062581 = x_re;
double r6062582 = r6062581 * r6062581;
double r6062583 = x_im;
double r6062584 = r6062583 * r6062583;
double r6062585 = r6062582 - r6062584;
double r6062586 = r6062585 * r6062583;
double r6062587 = r6062581 * r6062583;
double r6062588 = r6062583 * r6062581;
double r6062589 = r6062587 + r6062588;
double r6062590 = r6062589 * r6062581;
double r6062591 = r6062586 + r6062590;
return r6062591;
}
double f(double x_re, double x_im) {
double r6062592 = x_im;
double r6062593 = x_re;
double r6062594 = r6062592 + r6062593;
double r6062595 = r6062593 - r6062592;
double r6062596 = r6062595 * r6062592;
double r6062597 = r6062593 * r6062592;
double r6062598 = r6062597 + r6062597;
double r6062599 = r6062598 * r6062593;
double r6062600 = fma(r6062594, r6062596, r6062599);
return r6062600;
}




Bits error versus x.re




Bits error versus x.im
| Original | 6.8 |
|---|---|
| Target | 0.2 |
| Herbie | 0.2 |
Initial program 6.8
rmApplied difference-of-squares6.8
Applied associate-*l*0.2
rmApplied fma-def0.2
Final simplification0.2
herbie shell --seed 2019134 +o rules:numerics
(FPCore (x.re x.im)
:name "math.cube on complex, imaginary part"
:herbie-target
(+ (* (* x.re x.im) (* 2 x.re)) (* (* x.im (- x.re x.im)) (+ x.re x.im)))
(+ (* (- (* x.re x.re) (* x.im x.im)) x.im) (* (+ (* x.re x.im) (* x.im x.re)) x.re)))