\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 r17677 = -1.0;
double r17678 = 1.0;
double r17679 = /* ERROR: no complex support in C */;
double r17680 = r17679 * r17679;
double r17681 = r17680 * r17679;
double r17682 = r17681 * r17679;
double r17683 = r17682 * r17679;
double r17684 = r17683 * r17679;
double r17685 = 6.0;
double r17686 = 0.0;
double r17687 = /* ERROR: no complex support in C */;
double r17688 = r17687 * r17679;
double r17689 = r17688 * r17679;
double r17690 = r17689 * r17679;
double r17691 = r17690 * r17679;
double r17692 = r17691 * r17679;
double r17693 = r17684 + r17692;
double r17694 = 15.0;
double r17695 = /* ERROR: no complex support in C */;
double r17696 = r17695 * r17679;
double r17697 = r17696 * r17679;
double r17698 = r17697 * r17679;
double r17699 = r17698 * r17679;
double r17700 = r17693 + r17699;
double r17701 = 20.0;
double r17702 = /* ERROR: no complex support in C */;
double r17703 = r17702 * r17679;
double r17704 = r17703 * r17679;
double r17705 = r17704 * r17679;
double r17706 = r17700 + r17705;
double r17707 = r17706 + r17697;
double r17708 = r17707 + r17688;
double r17709 = /* ERROR: no complex support in C */;
double r17710 = r17708 + r17709;
double r17711 = /* ERROR: no complex support in C */;
return r17711;
}
double f() {
double r17712 = -1.0;
double r17713 = 1.0;
double r17714 = /* ERROR: no complex support in C */;
double r17715 = r17714 * r17714;
double r17716 = r17715 * r17714;
double r17717 = r17716 * r17714;
double r17718 = r17717 * r17714;
double r17719 = r17718 * r17714;
double r17720 = 6.0;
double r17721 = 0.0;
double r17722 = /* ERROR: no complex support in C */;
double r17723 = r17722 * r17714;
double r17724 = r17723 * r17714;
double r17725 = r17724 * r17714;
double r17726 = r17725 * r17714;
double r17727 = r17726 * r17714;
double r17728 = r17719 + r17727;
double r17729 = 15.0;
double r17730 = /* ERROR: no complex support in C */;
double r17731 = r17730 * r17714;
double r17732 = r17731 * r17714;
double r17733 = r17732 * r17714;
double r17734 = r17733 * r17714;
double r17735 = r17728 + r17734;
double r17736 = 20.0;
double r17737 = /* ERROR: no complex support in C */;
double r17738 = r17737 * r17714;
double r17739 = r17738 * r17714;
double r17740 = r17739 * r17714;
double r17741 = r17735 + r17740;
double r17742 = r17741 + r17732;
double r17743 = r17742 + r17723;
double r17744 = /* ERROR: no complex support in C */;
double r17745 = r17743 + r17744;
double r17746 = /* ERROR: no complex support in C */;
return r17746;
}
Initial program 0
Final simplification0
herbie shell --seed 2020042
(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))))