\Im(\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))\Im(\left(\left(\left(\left(\left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \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)\right) + \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\left(-2\right) + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\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(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(4 + 0.0 i\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r2474778 = 1.0;
double r2474779 = -r2474778;
double r2474780 = 2.0;
double r2474781 = r2474779 / r2474780;
double r2474782 = 3.0;
double r2474783 = sqrt(r2474782);
double r2474784 = r2474783 / r2474780;
double r2474785 = /* ERROR: no complex support in C */;
double r2474786 = r2474785 * r2474785;
double r2474787 = r2474786 * r2474785;
double r2474788 = r2474787 * r2474785;
double r2474789 = -r2474780;
double r2474790 = 0.0;
double r2474791 = /* ERROR: no complex support in C */;
double r2474792 = r2474791 * r2474785;
double r2474793 = r2474792 * r2474785;
double r2474794 = r2474793 * r2474785;
double r2474795 = r2474788 + r2474794;
double r2474796 = 5.0;
double r2474797 = /* ERROR: no complex support in C */;
double r2474798 = r2474797 * r2474785;
double r2474799 = r2474798 * r2474785;
double r2474800 = r2474795 + r2474799;
double r2474801 = 4.0;
double r2474802 = /* ERROR: no complex support in C */;
double r2474803 = r2474802 * r2474785;
double r2474804 = r2474800 + r2474803;
double r2474805 = 7.0;
double r2474806 = /* ERROR: no complex support in C */;
double r2474807 = r2474804 + r2474806;
double r2474808 = /* ERROR: no complex support in C */;
return r2474808;
}
double f() {
double r2474809 = 1.0;
double r2474810 = -r2474809;
double r2474811 = 2.0;
double r2474812 = r2474810 / r2474811;
double r2474813 = 3.0;
double r2474814 = sqrt(r2474813);
double r2474815 = r2474814 / r2474811;
double r2474816 = /* ERROR: no complex support in C */;
double r2474817 = r2474816 * r2474816;
double r2474818 = r2474817 * r2474816;
double r2474819 = r2474816 * r2474818;
double r2474820 = -r2474811;
double r2474821 = 0.0;
double r2474822 = /* ERROR: no complex support in C */;
double r2474823 = r2474822 * r2474816;
double r2474824 = r2474816 * r2474823;
double r2474825 = r2474816 * r2474824;
double r2474826 = r2474819 + r2474825;
double r2474827 = 5.0;
double r2474828 = /* ERROR: no complex support in C */;
double r2474829 = r2474828 * r2474816;
double r2474830 = r2474829 * r2474816;
double r2474831 = r2474826 + r2474830;
double r2474832 = 4.0;
double r2474833 = /* ERROR: no complex support in C */;
double r2474834 = r2474816 * r2474833;
double r2474835 = r2474831 + r2474834;
double r2474836 = 7.0;
double r2474837 = /* ERROR: no complex support in C */;
double r2474838 = r2474835 + r2474837;
double r2474839 = /* ERROR: no complex support in C */;
return r2474839;
}
Initial program 0
Final simplification0
herbie shell --seed 2019174
(FPCore ()
:name "3.9.2 imaginary part (p56)"
(im (+ (+ (+ (+ (* (* (* (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (* (* (* (complex (- 2.0) 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (* (* (complex 5.0 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (* (complex 4.0 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (complex 7.0 0.0))))