\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 r10494 = -1.0;
double r10495 = 1.0;
double r10496 = /* ERROR: no complex support in C */;
double r10497 = r10496 * r10496;
double r10498 = r10497 * r10496;
double r10499 = r10498 * r10496;
double r10500 = r10499 * r10496;
double r10501 = r10500 * r10496;
double r10502 = 6.0;
double r10503 = 0.0;
double r10504 = /* ERROR: no complex support in C */;
double r10505 = r10504 * r10496;
double r10506 = r10505 * r10496;
double r10507 = r10506 * r10496;
double r10508 = r10507 * r10496;
double r10509 = r10508 * r10496;
double r10510 = r10501 + r10509;
double r10511 = 15.0;
double r10512 = /* ERROR: no complex support in C */;
double r10513 = r10512 * r10496;
double r10514 = r10513 * r10496;
double r10515 = r10514 * r10496;
double r10516 = r10515 * r10496;
double r10517 = r10510 + r10516;
double r10518 = 20.0;
double r10519 = /* ERROR: no complex support in C */;
double r10520 = r10519 * r10496;
double r10521 = r10520 * r10496;
double r10522 = r10521 * r10496;
double r10523 = r10517 + r10522;
double r10524 = r10523 + r10514;
double r10525 = r10524 + r10505;
double r10526 = /* ERROR: no complex support in C */;
double r10527 = r10525 + r10526;
double r10528 = /* ERROR: no complex support in C */;
return r10528;
}
double f() {
double r10529 = -1.0;
double r10530 = 1.0;
double r10531 = /* ERROR: no complex support in C */;
double r10532 = r10531 * r10531;
double r10533 = r10532 * r10531;
double r10534 = r10533 * r10531;
double r10535 = r10534 * r10531;
double r10536 = r10535 * r10531;
double r10537 = 6.0;
double r10538 = 0.0;
double r10539 = /* ERROR: no complex support in C */;
double r10540 = r10539 * r10531;
double r10541 = r10540 * r10531;
double r10542 = r10541 * r10531;
double r10543 = r10542 * r10531;
double r10544 = r10543 * r10531;
double r10545 = r10536 + r10544;
double r10546 = 15.0;
double r10547 = /* ERROR: no complex support in C */;
double r10548 = r10547 * r10531;
double r10549 = r10548 * r10531;
double r10550 = r10549 * r10531;
double r10551 = r10550 * r10531;
double r10552 = r10545 + r10551;
double r10553 = 20.0;
double r10554 = /* ERROR: no complex support in C */;
double r10555 = r10554 * r10531;
double r10556 = r10555 * r10531;
double r10557 = r10556 * r10531;
double r10558 = r10552 + r10557;
double r10559 = r10558 + r10549;
double r10560 = r10559 + r10540;
double r10561 = /* ERROR: no complex support in C */;
double r10562 = r10560 + r10561;
double r10563 = /* ERROR: no complex support in C */;
return r10563;
}
Initial program 0
Final simplification0
herbie shell --seed 2019347
(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))))