\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 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 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 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(7 + 0 i\right)\right))\Im(\left(\left(\frac{11}{2} + \left(\frac{\sqrt{3}}{-2} + \left(-\sqrt{3}\right)\right) i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{-2} i\right) + \left(5 + \sqrt{3} \cdot 2 i\right)\right))double f() {
double r1603618 = 1.0;
double r1603619 = -r1603618;
double r1603620 = 2.0;
double r1603621 = r1603619 / r1603620;
double r1603622 = 3.0;
double r1603623 = sqrt(r1603622);
double r1603624 = r1603623 / r1603620;
double r1603625 = /* ERROR: no complex support in C */;
double r1603626 = r1603625 * r1603625;
double r1603627 = r1603626 * r1603625;
double r1603628 = r1603627 * r1603625;
double r1603629 = -r1603620;
double r1603630 = 0.0;
double r1603631 = /* ERROR: no complex support in C */;
double r1603632 = r1603631 * r1603625;
double r1603633 = r1603632 * r1603625;
double r1603634 = r1603633 * r1603625;
double r1603635 = r1603628 + r1603634;
double r1603636 = 5.0;
double r1603637 = /* ERROR: no complex support in C */;
double r1603638 = r1603637 * r1603625;
double r1603639 = r1603638 * r1603625;
double r1603640 = r1603635 + r1603639;
double r1603641 = 4.0;
double r1603642 = /* ERROR: no complex support in C */;
double r1603643 = r1603642 * r1603625;
double r1603644 = r1603640 + r1603643;
double r1603645 = 7.0;
double r1603646 = /* ERROR: no complex support in C */;
double r1603647 = r1603644 + r1603646;
double r1603648 = /* ERROR: no complex support in C */;
return r1603648;
}
double f() {
double r1603649 = 5.5;
double r1603650 = 3.0;
double r1603651 = sqrt(r1603650);
double r1603652 = -2.0;
double r1603653 = r1603651 / r1603652;
double r1603654 = -r1603651;
double r1603655 = r1603653 + r1603654;
double r1603656 = /* ERROR: no complex support in C */;
double r1603657 = -0.5;
double r1603658 = /* ERROR: no complex support in C */;
double r1603659 = r1603656 * r1603658;
double r1603660 = 5.0;
double r1603661 = 2.0;
double r1603662 = r1603651 * r1603661;
double r1603663 = /* ERROR: no complex support in C */;
double r1603664 = r1603659 + r1603663;
double r1603665 = /* ERROR: no complex support in C */;
return r1603665;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019144 +o rules:numerics
(FPCore ()
:name "3.9.2 imaginary part (p56)"
(im (+.c (+.c (+.c (+.c (*.c (*.c (*.c (complex (/ (- 1) 2) (/ (sqrt 3) 2)) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (*.c (*.c (*.c (complex (- 2) 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (*.c (*.c (complex 5 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (*.c (complex 4 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (complex 7 0))))