\Re(\left(\left(\left(\left(\left(\left(\left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(\left(\left(\left(\left(-2\right) + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(\left(5 + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(4 + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(7 + 0.0 i\right)\right))\Re(\left(\left(\left(\left(\left(\left(5 + 0.0 i\right) + \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\frac{-1}{2} - 2\right) + \left(\frac{\sqrt{3}}{2} + 0.0\right) i\right)\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(4 + 0.0 i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r32638 = 1.0;
double r32639 = -r32638;
double r32640 = 2.0;
double r32641 = r32639 / r32640;
double r32642 = 3.0;
double r32643 = sqrt(r32642);
double r32644 = r32643 / r32640;
double r32645 = /* ERROR: no complex support in C */;
double r32646 = r32645 * r32645;
double r32647 = r32646 * r32645;
double r32648 = r32647 * r32645;
double r32649 = -r32640;
double r32650 = 0.0;
double r32651 = /* ERROR: no complex support in C */;
double r32652 = r32651 * r32645;
double r32653 = r32652 * r32645;
double r32654 = r32653 * r32645;
double r32655 = r32648 + r32654;
double r32656 = 5.0;
double r32657 = /* ERROR: no complex support in C */;
double r32658 = r32657 * r32645;
double r32659 = r32658 * r32645;
double r32660 = r32655 + r32659;
double r32661 = 4.0;
double r32662 = /* ERROR: no complex support in C */;
double r32663 = r32662 * r32645;
double r32664 = r32660 + r32663;
double r32665 = 7.0;
double r32666 = /* ERROR: no complex support in C */;
double r32667 = r32664 + r32666;
double r32668 = /* ERROR: no complex support in C */;
return r32668;
}
double f() {
double r32669 = 5.0;
double r32670 = 0.0;
double r32671 = /* ERROR: no complex support in C */;
double r32672 = 1.0;
double r32673 = -r32672;
double r32674 = 2.0;
double r32675 = r32673 / r32674;
double r32676 = 3.0;
double r32677 = sqrt(r32676);
double r32678 = r32677 / r32674;
double r32679 = /* ERROR: no complex support in C */;
double r32680 = r32675 - r32674;
double r32681 = r32678 + r32670;
double r32682 = /* ERROR: no complex support in C */;
double r32683 = r32679 * r32682;
double r32684 = r32671 + r32683;
double r32685 = r32684 * r32679;
double r32686 = 4.0;
double r32687 = /* ERROR: no complex support in C */;
double r32688 = r32685 + r32687;
double r32689 = r32688 * r32679;
double r32690 = 7.0;
double r32691 = /* ERROR: no complex support in C */;
double r32692 = r32689 + r32691;
double r32693 = /* ERROR: no complex support in C */;
return r32693;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2020042
(FPCore ()
:name "3.9.2 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (* (* (* (complex (/ (- 1) 2) (/ (sqrt 3) 2)) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (* (* (* (complex (- 2) 0.0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (* (* (complex 5 0.0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (* (complex 4 0.0) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (complex 7 0.0))))