\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(-1 + 1 i\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(20 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(15 + 0.0 i\right)\right)\right) + \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(-1 + 1 i\right) + \left(6 + 0.0 i\right)\right)\right)\right)\right)\right)\right) + \left(\left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(1 + 0.0 i\right)\right)\right))
double f() {
double r16617 = -1.0;
double r16618 = 1.0;
double r16619 = /* ERROR: no complex support in C */;
double r16620 = r16619 * r16619;
double r16621 = r16620 * r16619;
double r16622 = r16621 * r16619;
double r16623 = r16622 * r16619;
double r16624 = r16623 * r16619;
double r16625 = 6.0;
double r16626 = 0.0;
double r16627 = /* ERROR: no complex support in C */;
double r16628 = r16627 * r16619;
double r16629 = r16628 * r16619;
double r16630 = r16629 * r16619;
double r16631 = r16630 * r16619;
double r16632 = r16631 * r16619;
double r16633 = r16624 + r16632;
double r16634 = 15.0;
double r16635 = /* ERROR: no complex support in C */;
double r16636 = r16635 * r16619;
double r16637 = r16636 * r16619;
double r16638 = r16637 * r16619;
double r16639 = r16638 * r16619;
double r16640 = r16633 + r16639;
double r16641 = 20.0;
double r16642 = /* ERROR: no complex support in C */;
double r16643 = r16642 * r16619;
double r16644 = r16643 * r16619;
double r16645 = r16644 * r16619;
double r16646 = r16640 + r16645;
double r16647 = r16646 + r16637;
double r16648 = r16647 + r16628;
double r16649 = /* ERROR: no complex support in C */;
double r16650 = r16648 + r16649;
double r16651 = /* ERROR: no complex support in C */;
return r16651;
}
double f() {
double r16652 = -1.0;
double r16653 = 1.0;
double r16654 = /* ERROR: no complex support in C */;
double r16655 = 20.0;
double r16656 = 0.0;
double r16657 = /* ERROR: no complex support in C */;
double r16658 = r16657 * r16654;
double r16659 = 15.0;
double r16660 = /* ERROR: no complex support in C */;
double r16661 = r16658 + r16660;
double r16662 = r16654 * r16661;
double r16663 = r16654 * r16654;
double r16664 = r16660 * r16654;
double r16665 = 6.0;
double r16666 = /* ERROR: no complex support in C */;
double r16667 = r16654 + r16666;
double r16668 = r16663 * r16667;
double r16669 = r16664 + r16668;
double r16670 = r16663 * r16669;
double r16671 = r16662 + r16670;
double r16672 = r16654 * r16671;
double r16673 = r16666 * r16654;
double r16674 = /* ERROR: no complex support in C */;
double r16675 = r16673 + r16674;
double r16676 = r16672 + r16675;
double r16677 = /* ERROR: no complex support in C */;
return r16677;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2020043
(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))))