\Re(\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))
\Re(\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 r18728 = -1.0;
double r18729 = 1.0;
double r18730 = /* ERROR: no complex support in C */;
double r18731 = r18730 * r18730;
double r18732 = r18731 * r18730;
double r18733 = r18732 * r18730;
double r18734 = r18733 * r18730;
double r18735 = r18734 * r18730;
double r18736 = 6.0;
double r18737 = 0.0;
double r18738 = /* ERROR: no complex support in C */;
double r18739 = r18738 * r18730;
double r18740 = r18739 * r18730;
double r18741 = r18740 * r18730;
double r18742 = r18741 * r18730;
double r18743 = r18742 * r18730;
double r18744 = r18735 + r18743;
double r18745 = 15.0;
double r18746 = /* ERROR: no complex support in C */;
double r18747 = r18746 * r18730;
double r18748 = r18747 * r18730;
double r18749 = r18748 * r18730;
double r18750 = r18749 * r18730;
double r18751 = r18744 + r18750;
double r18752 = 20.0;
double r18753 = /* ERROR: no complex support in C */;
double r18754 = r18753 * r18730;
double r18755 = r18754 * r18730;
double r18756 = r18755 * r18730;
double r18757 = r18751 + r18756;
double r18758 = r18757 + r18748;
double r18759 = r18758 + r18739;
double r18760 = /* ERROR: no complex support in C */;
double r18761 = r18759 + r18760;
double r18762 = /* ERROR: no complex support in C */;
return r18762;
}
double f() {
double r18763 = -1.0;
double r18764 = 1.0;
double r18765 = /* ERROR: no complex support in C */;
double r18766 = r18765 * r18765;
double r18767 = r18766 * r18765;
double r18768 = r18767 * r18765;
double r18769 = r18768 * r18765;
double r18770 = r18769 * r18765;
double r18771 = 6.0;
double r18772 = 0.0;
double r18773 = /* ERROR: no complex support in C */;
double r18774 = r18773 * r18765;
double r18775 = r18774 * r18765;
double r18776 = r18775 * r18765;
double r18777 = r18776 * r18765;
double r18778 = r18777 * r18765;
double r18779 = r18770 + r18778;
double r18780 = 15.0;
double r18781 = /* ERROR: no complex support in C */;
double r18782 = r18781 * r18765;
double r18783 = r18782 * r18765;
double r18784 = r18783 * r18765;
double r18785 = r18784 * r18765;
double r18786 = r18779 + r18785;
double r18787 = 20.0;
double r18788 = /* ERROR: no complex support in C */;
double r18789 = r18788 * r18765;
double r18790 = r18789 * r18765;
double r18791 = r18790 * r18765;
double r18792 = r18786 + r18791;
double r18793 = r18792 + r18783;
double r18794 = r18793 + r18774;
double r18795 = /* ERROR: no complex support in C */;
double r18796 = r18794 + r18795;
double r18797 = /* ERROR: no complex support in C */;
return r18797;
}
Initial program 0
Final simplification0
herbie shell --seed 2020025 +o rules:numerics
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))