\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 r30709 = -1.0;
double r30710 = 1.0;
double r30711 = /* ERROR: no complex support in C */;
double r30712 = r30711 * r30711;
double r30713 = r30712 * r30711;
double r30714 = r30713 * r30711;
double r30715 = r30714 * r30711;
double r30716 = r30715 * r30711;
double r30717 = 6.0;
double r30718 = 0.0;
double r30719 = /* ERROR: no complex support in C */;
double r30720 = r30719 * r30711;
double r30721 = r30720 * r30711;
double r30722 = r30721 * r30711;
double r30723 = r30722 * r30711;
double r30724 = r30723 * r30711;
double r30725 = r30716 + r30724;
double r30726 = 15.0;
double r30727 = /* ERROR: no complex support in C */;
double r30728 = r30727 * r30711;
double r30729 = r30728 * r30711;
double r30730 = r30729 * r30711;
double r30731 = r30730 * r30711;
double r30732 = r30725 + r30731;
double r30733 = 20.0;
double r30734 = /* ERROR: no complex support in C */;
double r30735 = r30734 * r30711;
double r30736 = r30735 * r30711;
double r30737 = r30736 * r30711;
double r30738 = r30732 + r30737;
double r30739 = r30738 + r30729;
double r30740 = r30739 + r30720;
double r30741 = /* ERROR: no complex support in C */;
double r30742 = r30740 + r30741;
double r30743 = /* ERROR: no complex support in C */;
return r30743;
}
double f() {
double r30744 = -1.0;
double r30745 = 1.0;
double r30746 = /* ERROR: no complex support in C */;
double r30747 = r30746 * r30746;
double r30748 = r30747 * r30746;
double r30749 = r30748 * r30746;
double r30750 = r30749 * r30746;
double r30751 = r30750 * r30746;
double r30752 = 6.0;
double r30753 = 0.0;
double r30754 = /* ERROR: no complex support in C */;
double r30755 = r30754 * r30746;
double r30756 = r30755 * r30746;
double r30757 = r30756 * r30746;
double r30758 = r30757 * r30746;
double r30759 = r30758 * r30746;
double r30760 = r30751 + r30759;
double r30761 = 15.0;
double r30762 = /* ERROR: no complex support in C */;
double r30763 = r30762 * r30746;
double r30764 = r30763 * r30746;
double r30765 = r30764 * r30746;
double r30766 = r30765 * r30746;
double r30767 = r30760 + r30766;
double r30768 = 20.0;
double r30769 = /* ERROR: no complex support in C */;
double r30770 = r30769 * r30746;
double r30771 = r30770 * r30746;
double r30772 = r30771 * r30746;
double r30773 = r30767 + r30772;
double r30774 = r30773 + r30764;
double r30775 = r30774 + r30755;
double r30776 = /* ERROR: no complex support in C */;
double r30777 = r30775 + r30776;
double r30778 = /* ERROR: no complex support in C */;
return r30778;
}
Initial program 0
Final simplification0
herbie shell --seed 2020018 +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))))