\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 r33701 = -1.0;
double r33702 = 1.0;
double r33703 = /* ERROR: no complex support in C */;
double r33704 = r33703 * r33703;
double r33705 = r33704 * r33703;
double r33706 = r33705 * r33703;
double r33707 = r33706 * r33703;
double r33708 = r33707 * r33703;
double r33709 = 6.0;
double r33710 = 0.0;
double r33711 = /* ERROR: no complex support in C */;
double r33712 = r33711 * r33703;
double r33713 = r33712 * r33703;
double r33714 = r33713 * r33703;
double r33715 = r33714 * r33703;
double r33716 = r33715 * r33703;
double r33717 = r33708 + r33716;
double r33718 = 15.0;
double r33719 = /* ERROR: no complex support in C */;
double r33720 = r33719 * r33703;
double r33721 = r33720 * r33703;
double r33722 = r33721 * r33703;
double r33723 = r33722 * r33703;
double r33724 = r33717 + r33723;
double r33725 = 20.0;
double r33726 = /* ERROR: no complex support in C */;
double r33727 = r33726 * r33703;
double r33728 = r33727 * r33703;
double r33729 = r33728 * r33703;
double r33730 = r33724 + r33729;
double r33731 = r33730 + r33721;
double r33732 = r33731 + r33712;
double r33733 = /* ERROR: no complex support in C */;
double r33734 = r33732 + r33733;
double r33735 = /* ERROR: no complex support in C */;
return r33735;
}
double f() {
double r33736 = -1.0;
double r33737 = 1.0;
double r33738 = /* ERROR: no complex support in C */;
double r33739 = r33738 * r33738;
double r33740 = r33739 * r33738;
double r33741 = r33740 * r33738;
double r33742 = r33741 * r33738;
double r33743 = r33742 * r33738;
double r33744 = 6.0;
double r33745 = 0.0;
double r33746 = /* ERROR: no complex support in C */;
double r33747 = r33746 * r33738;
double r33748 = r33747 * r33738;
double r33749 = r33748 * r33738;
double r33750 = r33749 * r33738;
double r33751 = r33750 * r33738;
double r33752 = r33743 + r33751;
double r33753 = 15.0;
double r33754 = /* ERROR: no complex support in C */;
double r33755 = r33754 * r33738;
double r33756 = r33755 * r33738;
double r33757 = r33756 * r33738;
double r33758 = r33757 * r33738;
double r33759 = r33752 + r33758;
double r33760 = 20.0;
double r33761 = /* ERROR: no complex support in C */;
double r33762 = r33761 * r33738;
double r33763 = r33762 * r33738;
double r33764 = r33763 * r33738;
double r33765 = r33759 + r33764;
double r33766 = r33765 + r33756;
double r33767 = r33766 + r33747;
double r33768 = /* ERROR: no complex support in C */;
double r33769 = r33767 + r33768;
double r33770 = /* ERROR: no complex support in C */;
return r33770;
}
Initial program 0
Final simplification0
herbie shell --seed 2020042
(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))))