\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 r33713 = -1.0;
double r33714 = 1.0;
double r33715 = /* ERROR: no complex support in C */;
double r33716 = r33715 * r33715;
double r33717 = r33716 * r33715;
double r33718 = r33717 * r33715;
double r33719 = r33718 * r33715;
double r33720 = r33719 * r33715;
double r33721 = 6.0;
double r33722 = 0.0;
double r33723 = /* ERROR: no complex support in C */;
double r33724 = r33723 * r33715;
double r33725 = r33724 * r33715;
double r33726 = r33725 * r33715;
double r33727 = r33726 * r33715;
double r33728 = r33727 * r33715;
double r33729 = r33720 + r33728;
double r33730 = 15.0;
double r33731 = /* ERROR: no complex support in C */;
double r33732 = r33731 * r33715;
double r33733 = r33732 * r33715;
double r33734 = r33733 * r33715;
double r33735 = r33734 * r33715;
double r33736 = r33729 + r33735;
double r33737 = 20.0;
double r33738 = /* ERROR: no complex support in C */;
double r33739 = r33738 * r33715;
double r33740 = r33739 * r33715;
double r33741 = r33740 * r33715;
double r33742 = r33736 + r33741;
double r33743 = r33742 + r33733;
double r33744 = r33743 + r33724;
double r33745 = /* ERROR: no complex support in C */;
double r33746 = r33744 + r33745;
double r33747 = /* ERROR: no complex support in C */;
return r33747;
}
double f() {
double r33748 = -1.0;
double r33749 = 1.0;
double r33750 = /* ERROR: no complex support in C */;
double r33751 = r33750 * r33750;
double r33752 = r33751 * r33750;
double r33753 = r33752 * r33750;
double r33754 = r33753 * r33750;
double r33755 = r33754 * r33750;
double r33756 = 6.0;
double r33757 = 0.0;
double r33758 = /* ERROR: no complex support in C */;
double r33759 = r33758 * r33750;
double r33760 = r33759 * r33750;
double r33761 = r33760 * r33750;
double r33762 = r33761 * r33750;
double r33763 = r33762 * r33750;
double r33764 = r33755 + r33763;
double r33765 = 15.0;
double r33766 = /* ERROR: no complex support in C */;
double r33767 = r33766 * r33750;
double r33768 = r33767 * r33750;
double r33769 = r33768 * r33750;
double r33770 = r33769 * r33750;
double r33771 = r33764 + r33770;
double r33772 = 20.0;
double r33773 = /* ERROR: no complex support in C */;
double r33774 = r33773 * r33750;
double r33775 = r33774 * r33750;
double r33776 = r33775 * r33750;
double r33777 = r33771 + r33776;
double r33778 = r33777 + r33768;
double r33779 = r33778 + r33759;
double r33780 = /* ERROR: no complex support in C */;
double r33781 = r33779 + r33780;
double r33782 = /* ERROR: no complex support in C */;
return r33782;
}
Initial program 0
Final simplification0
herbie shell --seed 2020001 +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))))