\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(\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 r20543 = -1.0;
double r20544 = 1.0;
double r20545 = /* ERROR: no complex support in C */;
double r20546 = r20545 * r20545;
double r20547 = r20546 * r20545;
double r20548 = r20547 * r20545;
double r20549 = r20548 * r20545;
double r20550 = r20549 * r20545;
double r20551 = 6.0;
double r20552 = 0.0;
double r20553 = /* ERROR: no complex support in C */;
double r20554 = r20553 * r20545;
double r20555 = r20554 * r20545;
double r20556 = r20555 * r20545;
double r20557 = r20556 * r20545;
double r20558 = r20557 * r20545;
double r20559 = r20550 + r20558;
double r20560 = 15.0;
double r20561 = /* ERROR: no complex support in C */;
double r20562 = r20561 * r20545;
double r20563 = r20562 * r20545;
double r20564 = r20563 * r20545;
double r20565 = r20564 * r20545;
double r20566 = r20559 + r20565;
double r20567 = 20.0;
double r20568 = /* ERROR: no complex support in C */;
double r20569 = r20568 * r20545;
double r20570 = r20569 * r20545;
double r20571 = r20570 * r20545;
double r20572 = r20566 + r20571;
double r20573 = r20572 + r20563;
double r20574 = r20573 + r20554;
double r20575 = /* ERROR: no complex support in C */;
double r20576 = r20574 + r20575;
double r20577 = /* ERROR: no complex support in C */;
return r20577;
}
double f() {
double r20578 = -1.0;
double r20579 = 1.0;
double r20580 = /* ERROR: no complex support in C */;
double r20581 = r20580 * r20580;
double r20582 = r20581 * r20580;
double r20583 = r20582 * r20580;
double r20584 = r20583 * r20580;
double r20585 = r20584 * r20580;
double r20586 = 6.0;
double r20587 = 0.0;
double r20588 = /* ERROR: no complex support in C */;
double r20589 = r20588 * r20580;
double r20590 = r20589 * r20580;
double r20591 = r20590 * r20580;
double r20592 = r20591 * r20580;
double r20593 = r20592 * r20580;
double r20594 = r20585 + r20593;
double r20595 = 15.0;
double r20596 = /* ERROR: no complex support in C */;
double r20597 = r20596 * r20580;
double r20598 = r20597 * r20580;
double r20599 = r20598 * r20580;
double r20600 = r20599 * r20580;
double r20601 = r20594 + r20600;
double r20602 = 20.0;
double r20603 = /* ERROR: no complex support in C */;
double r20604 = r20603 * r20580;
double r20605 = r20604 * r20580;
double r20606 = r20605 * r20580;
double r20607 = r20601 + r20606;
double r20608 = r20607 + r20598;
double r20609 = r20608 + r20589;
double r20610 = /* ERROR: no complex support in C */;
double r20611 = r20609 + r20610;
double r20612 = /* ERROR: no complex support in C */;
return r20612;
}
Initial program 0
Final simplification0
herbie shell --seed 2020047
(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))))