\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(4 + 0.0 i\right) \cdot \left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right)\right) + \left(\left(\left(\left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(-2\right) + 0.0 i\right)\right) \cdot \left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right)\right)\right)\right) + \left(\left(\left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right) \cdot \left(5 + 0.0 i\right)\right) \cdot \left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right)\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r2163552 = 1.0;
double r2163553 = -r2163552;
double r2163554 = 2.0;
double r2163555 = r2163553 / r2163554;
double r2163556 = 3.0;
double r2163557 = sqrt(r2163556);
double r2163558 = r2163557 / r2163554;
double r2163559 = /* ERROR: no complex support in C */;
double r2163560 = r2163559 * r2163559;
double r2163561 = r2163560 * r2163559;
double r2163562 = r2163561 * r2163559;
double r2163563 = -r2163554;
double r2163564 = 0.0;
double r2163565 = /* ERROR: no complex support in C */;
double r2163566 = r2163565 * r2163559;
double r2163567 = r2163566 * r2163559;
double r2163568 = r2163567 * r2163559;
double r2163569 = r2163562 + r2163568;
double r2163570 = 5.0;
double r2163571 = /* ERROR: no complex support in C */;
double r2163572 = r2163571 * r2163559;
double r2163573 = r2163572 * r2163559;
double r2163574 = r2163569 + r2163573;
double r2163575 = 4.0;
double r2163576 = /* ERROR: no complex support in C */;
double r2163577 = r2163576 * r2163559;
double r2163578 = r2163574 + r2163577;
double r2163579 = 7.0;
double r2163580 = /* ERROR: no complex support in C */;
double r2163581 = r2163578 + r2163580;
double r2163582 = /* ERROR: no complex support in C */;
return r2163582;
}
double f() {
double r2163583 = 4.0;
double r2163584 = 0.0;
double r2163585 = /* ERROR: no complex support in C */;
double r2163586 = 1.0;
double r2163587 = 2.0;
double r2163588 = r2163586 / r2163587;
double r2163589 = -r2163588;
double r2163590 = 3.0;
double r2163591 = sqrt(r2163590);
double r2163592 = r2163591 / r2163587;
double r2163593 = /* ERROR: no complex support in C */;
double r2163594 = r2163585 * r2163593;
double r2163595 = -r2163587;
double r2163596 = /* ERROR: no complex support in C */;
double r2163597 = r2163593 * r2163596;
double r2163598 = r2163597 * r2163593;
double r2163599 = r2163593 * r2163598;
double r2163600 = r2163593 * r2163593;
double r2163601 = r2163600 * r2163593;
double r2163602 = r2163593 * r2163601;
double r2163603 = r2163599 + r2163602;
double r2163604 = 5.0;
double r2163605 = /* ERROR: no complex support in C */;
double r2163606 = r2163593 * r2163605;
double r2163607 = r2163606 * r2163593;
double r2163608 = r2163603 + r2163607;
double r2163609 = r2163594 + r2163608;
double r2163610 = 7.0;
double r2163611 = /* ERROR: no complex support in C */;
double r2163612 = r2163609 + r2163611;
double r2163613 = /* ERROR: no complex support in C */;
return r2163613;
}
Initial program 0
Final simplification0
herbie shell --seed 2019200
(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))))