\Im(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) + \left(\left(\left(\left(\left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(20 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
\Im(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) + \left(\left(\left(\left(\left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(20 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
double f() {
double r27714 = -1.0;
double r27715 = 1.0;
double r27716 = /* ERROR: no complex support in C */;
double r27717 = r27716 * r27716;
double r27718 = r27717 * r27716;
double r27719 = r27718 * r27716;
double r27720 = r27719 * r27716;
double r27721 = r27720 * r27716;
double r27722 = 6.0;
double r27723 = 0.0;
double r27724 = /* ERROR: no complex support in C */;
double r27725 = r27724 * r27716;
double r27726 = r27725 * r27716;
double r27727 = r27726 * r27716;
double r27728 = r27727 * r27716;
double r27729 = r27728 * r27716;
double r27730 = r27721 + r27729;
double r27731 = 15.0;
double r27732 = /* ERROR: no complex support in C */;
double r27733 = r27732 * r27716;
double r27734 = r27733 * r27716;
double r27735 = r27734 * r27716;
double r27736 = r27735 * r27716;
double r27737 = r27730 + r27736;
double r27738 = 20.0;
double r27739 = /* ERROR: no complex support in C */;
double r27740 = r27739 * r27716;
double r27741 = r27740 * r27716;
double r27742 = r27741 * r27716;
double r27743 = r27737 + r27742;
double r27744 = r27743 + r27734;
double r27745 = r27744 + r27725;
double r27746 = /* ERROR: no complex support in C */;
double r27747 = r27745 + r27746;
double r27748 = /* ERROR: no complex support in C */;
return r27748;
}
double f() {
double r27749 = -1.0;
double r27750 = 1.0;
double r27751 = /* ERROR: no complex support in C */;
double r27752 = r27751 * r27751;
double r27753 = r27752 * r27751;
double r27754 = r27753 * r27751;
double r27755 = r27754 * r27751;
double r27756 = r27755 * r27751;
double r27757 = 6.0;
double r27758 = 0.0;
double r27759 = /* ERROR: no complex support in C */;
double r27760 = r27759 * r27751;
double r27761 = r27760 * r27751;
double r27762 = r27761 * r27751;
double r27763 = r27762 * r27751;
double r27764 = r27763 * r27751;
double r27765 = r27756 + r27764;
double r27766 = 15.0;
double r27767 = /* ERROR: no complex support in C */;
double r27768 = r27767 * r27751;
double r27769 = r27768 * r27751;
double r27770 = r27769 * r27751;
double r27771 = r27770 * r27751;
double r27772 = r27765 + r27771;
double r27773 = 20.0;
double r27774 = /* ERROR: no complex support in C */;
double r27775 = r27774 * r27751;
double r27776 = r27775 * r27751;
double r27777 = r27776 * r27751;
double r27778 = r27772 + r27777;
double r27779 = r27778 + r27769;
double r27780 = r27779 + r27760;
double r27781 = /* ERROR: no complex support in C */;
double r27782 = r27780 + r27781;
double r27783 = /* ERROR: no complex support in C */;
return r27783;
}
Initial program 0
Final simplification0
herbie shell --seed 2020046
(FPCore ()
:name "3.9.1 imaginary part (p56)"
:precision binary64
(im (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (* (* (* (* (* (complex 6 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (complex 20 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1))) (* (complex 6 0.0) (complex -1 1))) (complex 1 0.0))))