\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 r44701 = -1.0;
double r44702 = 1.0;
double r44703 = /* ERROR: no complex support in C */;
double r44704 = r44703 * r44703;
double r44705 = r44704 * r44703;
double r44706 = r44705 * r44703;
double r44707 = r44706 * r44703;
double r44708 = r44707 * r44703;
double r44709 = 6.0;
double r44710 = 0.0;
double r44711 = /* ERROR: no complex support in C */;
double r44712 = r44711 * r44703;
double r44713 = r44712 * r44703;
double r44714 = r44713 * r44703;
double r44715 = r44714 * r44703;
double r44716 = r44715 * r44703;
double r44717 = r44708 + r44716;
double r44718 = 15.0;
double r44719 = /* ERROR: no complex support in C */;
double r44720 = r44719 * r44703;
double r44721 = r44720 * r44703;
double r44722 = r44721 * r44703;
double r44723 = r44722 * r44703;
double r44724 = r44717 + r44723;
double r44725 = 20.0;
double r44726 = /* ERROR: no complex support in C */;
double r44727 = r44726 * r44703;
double r44728 = r44727 * r44703;
double r44729 = r44728 * r44703;
double r44730 = r44724 + r44729;
double r44731 = r44730 + r44721;
double r44732 = r44731 + r44712;
double r44733 = /* ERROR: no complex support in C */;
double r44734 = r44732 + r44733;
double r44735 = /* ERROR: no complex support in C */;
return r44735;
}
double f() {
double r44736 = -1.0;
double r44737 = 1.0;
double r44738 = /* ERROR: no complex support in C */;
double r44739 = r44738 * r44738;
double r44740 = r44739 * r44738;
double r44741 = r44740 * r44738;
double r44742 = r44741 * r44738;
double r44743 = r44742 * r44738;
double r44744 = 6.0;
double r44745 = 0.0;
double r44746 = /* ERROR: no complex support in C */;
double r44747 = r44746 * r44738;
double r44748 = r44747 * r44738;
double r44749 = r44748 * r44738;
double r44750 = r44749 * r44738;
double r44751 = r44750 * r44738;
double r44752 = r44743 + r44751;
double r44753 = 15.0;
double r44754 = /* ERROR: no complex support in C */;
double r44755 = r44754 * r44738;
double r44756 = r44755 * r44738;
double r44757 = r44756 * r44738;
double r44758 = r44757 * r44738;
double r44759 = r44752 + r44758;
double r44760 = 20.0;
double r44761 = /* ERROR: no complex support in C */;
double r44762 = r44761 * r44738;
double r44763 = r44762 * r44738;
double r44764 = r44763 * r44738;
double r44765 = r44759 + r44764;
double r44766 = r44765 + r44756;
double r44767 = r44766 + r44747;
double r44768 = /* ERROR: no complex support in C */;
double r44769 = r44767 + r44768;
double r44770 = /* ERROR: no complex support in C */;
return r44770;
}
Initial program 0
Final simplification0
herbie shell --seed 2020007 +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))))