\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 r43731 = -1.0;
double r43732 = 1.0;
double r43733 = /* ERROR: no complex support in C */;
double r43734 = r43733 * r43733;
double r43735 = r43734 * r43733;
double r43736 = r43735 * r43733;
double r43737 = r43736 * r43733;
double r43738 = r43737 * r43733;
double r43739 = 6.0;
double r43740 = 0.0;
double r43741 = /* ERROR: no complex support in C */;
double r43742 = r43741 * r43733;
double r43743 = r43742 * r43733;
double r43744 = r43743 * r43733;
double r43745 = r43744 * r43733;
double r43746 = r43745 * r43733;
double r43747 = r43738 + r43746;
double r43748 = 15.0;
double r43749 = /* ERROR: no complex support in C */;
double r43750 = r43749 * r43733;
double r43751 = r43750 * r43733;
double r43752 = r43751 * r43733;
double r43753 = r43752 * r43733;
double r43754 = r43747 + r43753;
double r43755 = 20.0;
double r43756 = /* ERROR: no complex support in C */;
double r43757 = r43756 * r43733;
double r43758 = r43757 * r43733;
double r43759 = r43758 * r43733;
double r43760 = r43754 + r43759;
double r43761 = r43760 + r43751;
double r43762 = r43761 + r43742;
double r43763 = /* ERROR: no complex support in C */;
double r43764 = r43762 + r43763;
double r43765 = /* ERROR: no complex support in C */;
return r43765;
}
double f() {
double r43766 = -1.0;
double r43767 = 1.0;
double r43768 = /* ERROR: no complex support in C */;
double r43769 = r43768 * r43768;
double r43770 = r43769 * r43768;
double r43771 = r43770 * r43768;
double r43772 = r43771 * r43768;
double r43773 = r43772 * r43768;
double r43774 = 6.0;
double r43775 = 0.0;
double r43776 = /* ERROR: no complex support in C */;
double r43777 = r43776 * r43768;
double r43778 = r43777 * r43768;
double r43779 = r43778 * r43768;
double r43780 = r43779 * r43768;
double r43781 = r43780 * r43768;
double r43782 = r43773 + r43781;
double r43783 = 15.0;
double r43784 = /* ERROR: no complex support in C */;
double r43785 = r43784 * r43768;
double r43786 = r43785 * r43768;
double r43787 = r43786 * r43768;
double r43788 = r43787 * r43768;
double r43789 = r43782 + r43788;
double r43790 = 20.0;
double r43791 = /* ERROR: no complex support in C */;
double r43792 = r43791 * r43768;
double r43793 = r43792 * r43768;
double r43794 = r43793 * r43768;
double r43795 = r43789 + r43794;
double r43796 = r43795 + r43786;
double r43797 = r43796 + r43777;
double r43798 = /* ERROR: no complex support in C */;
double r43799 = r43797 + r43798;
double r43800 = /* ERROR: no complex support in C */;
return r43800;
}
Initial program 0
Final simplification0
herbie shell --seed 2019235 +o rules:numerics
(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))))