\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(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(4 + 0.0 i\right) + \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(5 + 0.0 i\right) + \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(-\left(\frac{1}{2} + 2\right)\right) + \left(\frac{\sqrt{3}}{2} + 0.0\right) i\right)\right)\right)\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r20663 = 1.0;
double r20664 = -r20663;
double r20665 = 2.0;
double r20666 = r20664 / r20665;
double r20667 = 3.0;
double r20668 = sqrt(r20667);
double r20669 = r20668 / r20665;
double r20670 = /* ERROR: no complex support in C */;
double r20671 = r20670 * r20670;
double r20672 = r20671 * r20670;
double r20673 = r20672 * r20670;
double r20674 = -r20665;
double r20675 = 0.0;
double r20676 = /* ERROR: no complex support in C */;
double r20677 = r20676 * r20670;
double r20678 = r20677 * r20670;
double r20679 = r20678 * r20670;
double r20680 = r20673 + r20679;
double r20681 = 5.0;
double r20682 = /* ERROR: no complex support in C */;
double r20683 = r20682 * r20670;
double r20684 = r20683 * r20670;
double r20685 = r20680 + r20684;
double r20686 = 4.0;
double r20687 = /* ERROR: no complex support in C */;
double r20688 = r20687 * r20670;
double r20689 = r20685 + r20688;
double r20690 = 7.0;
double r20691 = /* ERROR: no complex support in C */;
double r20692 = r20689 + r20691;
double r20693 = /* ERROR: no complex support in C */;
return r20693;
}
double f() {
double r20694 = 1.0;
double r20695 = -r20694;
double r20696 = 2.0;
double r20697 = r20695 / r20696;
double r20698 = 3.0;
double r20699 = sqrt(r20698);
double r20700 = r20699 / r20696;
double r20701 = /* ERROR: no complex support in C */;
double r20702 = 4.0;
double r20703 = 0.0;
double r20704 = /* ERROR: no complex support in C */;
double r20705 = 5.0;
double r20706 = /* ERROR: no complex support in C */;
double r20707 = r20694 / r20696;
double r20708 = r20707 + r20696;
double r20709 = -r20708;
double r20710 = r20700 + r20703;
double r20711 = /* ERROR: no complex support in C */;
double r20712 = r20701 * r20711;
double r20713 = r20706 + r20712;
double r20714 = r20701 * r20713;
double r20715 = r20704 + r20714;
double r20716 = r20701 * r20715;
double r20717 = 7.0;
double r20718 = /* ERROR: no complex support in C */;
double r20719 = r20716 + r20718;
double r20720 = /* ERROR: no complex support in C */;
return r20720;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019325
(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))))