\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
\left(x.im \cdot x.re + x.im \cdot x.re\right) \cdot x.re + \sqrt[3]{\left(x.re + x.im\right) \cdot \left(\left(x.re - x.im\right) \cdot x.im\right)} \cdot \left(\left(\sqrt[3]{x.re + x.im} \cdot \sqrt[3]{\left(x.re - x.im\right) \cdot x.im}\right) \cdot \sqrt[3]{\left(x.re + x.im\right) \cdot \left(\left(x.re - x.im\right) \cdot x.im\right)}\right)double f(double x_re, double x_im) {
double r9121613 = x_re;
double r9121614 = r9121613 * r9121613;
double r9121615 = x_im;
double r9121616 = r9121615 * r9121615;
double r9121617 = r9121614 - r9121616;
double r9121618 = r9121617 * r9121615;
double r9121619 = r9121613 * r9121615;
double r9121620 = r9121615 * r9121613;
double r9121621 = r9121619 + r9121620;
double r9121622 = r9121621 * r9121613;
double r9121623 = r9121618 + r9121622;
return r9121623;
}
double f(double x_re, double x_im) {
double r9121624 = x_im;
double r9121625 = x_re;
double r9121626 = r9121624 * r9121625;
double r9121627 = r9121626 + r9121626;
double r9121628 = r9121627 * r9121625;
double r9121629 = r9121625 + r9121624;
double r9121630 = r9121625 - r9121624;
double r9121631 = r9121630 * r9121624;
double r9121632 = r9121629 * r9121631;
double r9121633 = cbrt(r9121632);
double r9121634 = cbrt(r9121629);
double r9121635 = cbrt(r9121631);
double r9121636 = r9121634 * r9121635;
double r9121637 = r9121636 * r9121633;
double r9121638 = r9121633 * r9121637;
double r9121639 = r9121628 + r9121638;
return r9121639;
}




Bits error versus x.re




Bits error versus x.im
Results
| Original | 7.1 |
|---|---|
| Target | 0.2 |
| Herbie | 0.7 |
Initial program 7.1
rmApplied difference-of-squares7.1
Applied associate-*l*0.2
rmApplied add-cube-cbrt0.7
rmApplied cbrt-prod0.7
rmApplied add-cbrt-cube0.7
Simplified0.7
Final simplification0.7
herbie shell --seed 2019172
(FPCore (x.re x.im)
:name "math.cube on complex, imaginary part"
:herbie-target
(+ (* (* x.re x.im) (* 2.0 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)))