\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 r23729 = -1.0;
double r23730 = 1.0;
double r23731 = /* ERROR: no complex support in C */;
double r23732 = r23731 * r23731;
double r23733 = r23732 * r23731;
double r23734 = r23733 * r23731;
double r23735 = r23734 * r23731;
double r23736 = r23735 * r23731;
double r23737 = 6.0;
double r23738 = 0.0;
double r23739 = /* ERROR: no complex support in C */;
double r23740 = r23739 * r23731;
double r23741 = r23740 * r23731;
double r23742 = r23741 * r23731;
double r23743 = r23742 * r23731;
double r23744 = r23743 * r23731;
double r23745 = r23736 + r23744;
double r23746 = 15.0;
double r23747 = /* ERROR: no complex support in C */;
double r23748 = r23747 * r23731;
double r23749 = r23748 * r23731;
double r23750 = r23749 * r23731;
double r23751 = r23750 * r23731;
double r23752 = r23745 + r23751;
double r23753 = 20.0;
double r23754 = /* ERROR: no complex support in C */;
double r23755 = r23754 * r23731;
double r23756 = r23755 * r23731;
double r23757 = r23756 * r23731;
double r23758 = r23752 + r23757;
double r23759 = r23758 + r23749;
double r23760 = r23759 + r23740;
double r23761 = /* ERROR: no complex support in C */;
double r23762 = r23760 + r23761;
double r23763 = /* ERROR: no complex support in C */;
return r23763;
}
double f() {
double r23764 = -1.0;
double r23765 = 1.0;
double r23766 = /* ERROR: no complex support in C */;
double r23767 = r23766 * r23766;
double r23768 = r23767 * r23766;
double r23769 = r23768 * r23766;
double r23770 = r23769 * r23766;
double r23771 = r23770 * r23766;
double r23772 = 6.0;
double r23773 = 0.0;
double r23774 = /* ERROR: no complex support in C */;
double r23775 = r23774 * r23766;
double r23776 = r23775 * r23766;
double r23777 = r23776 * r23766;
double r23778 = r23777 * r23766;
double r23779 = r23778 * r23766;
double r23780 = r23771 + r23779;
double r23781 = 15.0;
double r23782 = /* ERROR: no complex support in C */;
double r23783 = r23782 * r23766;
double r23784 = r23783 * r23766;
double r23785 = r23784 * r23766;
double r23786 = r23785 * r23766;
double r23787 = r23780 + r23786;
double r23788 = 20.0;
double r23789 = /* ERROR: no complex support in C */;
double r23790 = r23789 * r23766;
double r23791 = r23790 * r23766;
double r23792 = r23791 * r23766;
double r23793 = r23787 + r23792;
double r23794 = r23793 + r23784;
double r23795 = r23794 + r23775;
double r23796 = /* ERROR: no complex support in C */;
double r23797 = r23795 + r23796;
double r23798 = /* ERROR: no complex support in C */;
return r23798;
}
Initial program 0
Final simplification0
herbie shell --seed 2020047
(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))))