\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 r19670 = -1.0;
double r19671 = 1.0;
double r19672 = /* ERROR: no complex support in C */;
double r19673 = r19672 * r19672;
double r19674 = r19673 * r19672;
double r19675 = r19674 * r19672;
double r19676 = r19675 * r19672;
double r19677 = r19676 * r19672;
double r19678 = 6.0;
double r19679 = 0.0;
double r19680 = /* ERROR: no complex support in C */;
double r19681 = r19680 * r19672;
double r19682 = r19681 * r19672;
double r19683 = r19682 * r19672;
double r19684 = r19683 * r19672;
double r19685 = r19684 * r19672;
double r19686 = r19677 + r19685;
double r19687 = 15.0;
double r19688 = /* ERROR: no complex support in C */;
double r19689 = r19688 * r19672;
double r19690 = r19689 * r19672;
double r19691 = r19690 * r19672;
double r19692 = r19691 * r19672;
double r19693 = r19686 + r19692;
double r19694 = 20.0;
double r19695 = /* ERROR: no complex support in C */;
double r19696 = r19695 * r19672;
double r19697 = r19696 * r19672;
double r19698 = r19697 * r19672;
double r19699 = r19693 + r19698;
double r19700 = r19699 + r19690;
double r19701 = r19700 + r19681;
double r19702 = /* ERROR: no complex support in C */;
double r19703 = r19701 + r19702;
double r19704 = /* ERROR: no complex support in C */;
return r19704;
}
double f() {
double r19705 = -1.0;
double r19706 = 1.0;
double r19707 = /* ERROR: no complex support in C */;
double r19708 = r19707 * r19707;
double r19709 = r19708 * r19707;
double r19710 = r19709 * r19707;
double r19711 = r19710 * r19707;
double r19712 = r19711 * r19707;
double r19713 = 6.0;
double r19714 = 0.0;
double r19715 = /* ERROR: no complex support in C */;
double r19716 = r19715 * r19707;
double r19717 = r19716 * r19707;
double r19718 = r19717 * r19707;
double r19719 = r19718 * r19707;
double r19720 = r19719 * r19707;
double r19721 = r19712 + r19720;
double r19722 = 15.0;
double r19723 = /* ERROR: no complex support in C */;
double r19724 = r19723 * r19707;
double r19725 = r19724 * r19707;
double r19726 = r19725 * r19707;
double r19727 = r19726 * r19707;
double r19728 = r19721 + r19727;
double r19729 = 20.0;
double r19730 = /* ERROR: no complex support in C */;
double r19731 = r19730 * r19707;
double r19732 = r19731 * r19707;
double r19733 = r19732 * r19707;
double r19734 = r19728 + r19733;
double r19735 = r19734 + r19725;
double r19736 = r19735 + r19716;
double r19737 = /* ERROR: no complex support in C */;
double r19738 = r19736 + r19737;
double r19739 = /* ERROR: no complex support in C */;
return r19739;
}
Initial program 0
Final simplification0
herbie shell --seed 2019347 +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))))