\Im(\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))
\Im(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(6 + 0.0 i\right)\right)\right) + \left(1 + 0.0 i\right)\right) + \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(20 + 0.0 i\right)\right)\right) + \left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\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))
double f() {
double r21589 = -1.0;
double r21590 = 1.0;
double r21591 = /* ERROR: no complex support in C */;
double r21592 = r21591 * r21591;
double r21593 = r21592 * r21591;
double r21594 = r21593 * r21591;
double r21595 = r21594 * r21591;
double r21596 = r21595 * r21591;
double r21597 = 6.0;
double r21598 = 0.0;
double r21599 = /* ERROR: no complex support in C */;
double r21600 = r21599 * r21591;
double r21601 = r21600 * r21591;
double r21602 = r21601 * r21591;
double r21603 = r21602 * r21591;
double r21604 = r21603 * r21591;
double r21605 = r21596 + r21604;
double r21606 = 15.0;
double r21607 = /* ERROR: no complex support in C */;
double r21608 = r21607 * r21591;
double r21609 = r21608 * r21591;
double r21610 = r21609 * r21591;
double r21611 = r21610 * r21591;
double r21612 = r21605 + r21611;
double r21613 = 20.0;
double r21614 = /* ERROR: no complex support in C */;
double r21615 = r21614 * r21591;
double r21616 = r21615 * r21591;
double r21617 = r21616 * r21591;
double r21618 = r21612 + r21617;
double r21619 = r21618 + r21609;
double r21620 = r21619 + r21600;
double r21621 = /* ERROR: no complex support in C */;
double r21622 = r21620 + r21621;
double r21623 = /* ERROR: no complex support in C */;
return r21623;
}
double f() {
double r21624 = -1.0;
double r21625 = 1.0;
double r21626 = /* ERROR: no complex support in C */;
double r21627 = 15.0;
double r21628 = 0.0;
double r21629 = /* ERROR: no complex support in C */;
double r21630 = r21629 * r21626;
double r21631 = 6.0;
double r21632 = /* ERROR: no complex support in C */;
double r21633 = r21630 + r21632;
double r21634 = r21626 * r21633;
double r21635 = /* ERROR: no complex support in C */;
double r21636 = r21634 + r21635;
double r21637 = r21626 * r21626;
double r21638 = 20.0;
double r21639 = /* ERROR: no complex support in C */;
double r21640 = r21630 + r21639;
double r21641 = r21626 * r21640;
double r21642 = r21637 * r21626;
double r21643 = r21626 + r21632;
double r21644 = r21642 * r21643;
double r21645 = r21641 + r21644;
double r21646 = r21637 * r21645;
double r21647 = r21636 + r21646;
double r21648 = /* ERROR: no complex support in C */;
return r21648;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019235
(FPCore ()
:name "3.9.1 imaginary part (p56)"
:precision binary64
(im (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))