\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 r23696 = -1.0;
double r23697 = 1.0;
double r23698 = /* ERROR: no complex support in C */;
double r23699 = r23698 * r23698;
double r23700 = r23699 * r23698;
double r23701 = r23700 * r23698;
double r23702 = r23701 * r23698;
double r23703 = r23702 * r23698;
double r23704 = 6.0;
double r23705 = 0.0;
double r23706 = /* ERROR: no complex support in C */;
double r23707 = r23706 * r23698;
double r23708 = r23707 * r23698;
double r23709 = r23708 * r23698;
double r23710 = r23709 * r23698;
double r23711 = r23710 * r23698;
double r23712 = r23703 + r23711;
double r23713 = 15.0;
double r23714 = /* ERROR: no complex support in C */;
double r23715 = r23714 * r23698;
double r23716 = r23715 * r23698;
double r23717 = r23716 * r23698;
double r23718 = r23717 * r23698;
double r23719 = r23712 + r23718;
double r23720 = 20.0;
double r23721 = /* ERROR: no complex support in C */;
double r23722 = r23721 * r23698;
double r23723 = r23722 * r23698;
double r23724 = r23723 * r23698;
double r23725 = r23719 + r23724;
double r23726 = r23725 + r23716;
double r23727 = r23726 + r23707;
double r23728 = /* ERROR: no complex support in C */;
double r23729 = r23727 + r23728;
double r23730 = /* ERROR: no complex support in C */;
return r23730;
}
double f() {
double r23731 = -1.0;
double r23732 = 1.0;
double r23733 = /* ERROR: no complex support in C */;
double r23734 = r23733 * r23733;
double r23735 = r23734 * r23733;
double r23736 = r23735 * r23733;
double r23737 = r23736 * r23733;
double r23738 = r23737 * r23733;
double r23739 = 6.0;
double r23740 = 0.0;
double r23741 = /* ERROR: no complex support in C */;
double r23742 = r23741 * r23733;
double r23743 = r23742 * r23733;
double r23744 = r23743 * r23733;
double r23745 = r23744 * r23733;
double r23746 = r23745 * r23733;
double r23747 = r23738 + r23746;
double r23748 = 15.0;
double r23749 = /* ERROR: no complex support in C */;
double r23750 = r23749 * r23733;
double r23751 = r23750 * r23733;
double r23752 = r23751 * r23733;
double r23753 = r23752 * r23733;
double r23754 = r23747 + r23753;
double r23755 = 20.0;
double r23756 = /* ERROR: no complex support in C */;
double r23757 = r23756 * r23733;
double r23758 = r23757 * r23733;
double r23759 = r23758 * r23733;
double r23760 = r23754 + r23759;
double r23761 = r23760 + r23751;
double r23762 = r23761 + r23742;
double r23763 = /* ERROR: no complex support in C */;
double r23764 = r23762 + r23763;
double r23765 = /* ERROR: no complex support in C */;
return r23765;
}
Initial program 0
Final simplification0
herbie shell --seed 2020039
(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))))