\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 r24556 = -1.0;
double r24557 = 1.0;
double r24558 = /* ERROR: no complex support in C */;
double r24559 = r24558 * r24558;
double r24560 = r24559 * r24558;
double r24561 = r24560 * r24558;
double r24562 = r24561 * r24558;
double r24563 = r24562 * r24558;
double r24564 = 6.0;
double r24565 = 0.0;
double r24566 = /* ERROR: no complex support in C */;
double r24567 = r24566 * r24558;
double r24568 = r24567 * r24558;
double r24569 = r24568 * r24558;
double r24570 = r24569 * r24558;
double r24571 = r24570 * r24558;
double r24572 = r24563 + r24571;
double r24573 = 15.0;
double r24574 = /* ERROR: no complex support in C */;
double r24575 = r24574 * r24558;
double r24576 = r24575 * r24558;
double r24577 = r24576 * r24558;
double r24578 = r24577 * r24558;
double r24579 = r24572 + r24578;
double r24580 = 20.0;
double r24581 = /* ERROR: no complex support in C */;
double r24582 = r24581 * r24558;
double r24583 = r24582 * r24558;
double r24584 = r24583 * r24558;
double r24585 = r24579 + r24584;
double r24586 = r24585 + r24576;
double r24587 = r24586 + r24567;
double r24588 = /* ERROR: no complex support in C */;
double r24589 = r24587 + r24588;
double r24590 = /* ERROR: no complex support in C */;
return r24590;
}
double f() {
double r24591 = -1.0;
double r24592 = 1.0;
double r24593 = /* ERROR: no complex support in C */;
double r24594 = r24593 * r24593;
double r24595 = r24594 * r24593;
double r24596 = r24595 * r24593;
double r24597 = r24596 * r24593;
double r24598 = r24597 * r24593;
double r24599 = 6.0;
double r24600 = 0.0;
double r24601 = /* ERROR: no complex support in C */;
double r24602 = r24601 * r24593;
double r24603 = r24602 * r24593;
double r24604 = r24603 * r24593;
double r24605 = r24604 * r24593;
double r24606 = r24605 * r24593;
double r24607 = r24598 + r24606;
double r24608 = 15.0;
double r24609 = /* ERROR: no complex support in C */;
double r24610 = r24609 * r24593;
double r24611 = r24610 * r24593;
double r24612 = r24611 * r24593;
double r24613 = r24612 * r24593;
double r24614 = r24607 + r24613;
double r24615 = 20.0;
double r24616 = /* ERROR: no complex support in C */;
double r24617 = r24616 * r24593;
double r24618 = r24617 * r24593;
double r24619 = r24618 * r24593;
double r24620 = r24614 + r24619;
double r24621 = r24620 + r24611;
double r24622 = r24621 + r24602;
double r24623 = /* ERROR: no complex support in C */;
double r24624 = r24622 + r24623;
double r24625 = /* ERROR: no complex support in C */;
return r24625;
}
Initial program 0
Final simplification0
herbie shell --seed 2019352
(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))))