\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 r31414 = -1.0;
double r31415 = 1.0;
double r31416 = /* ERROR: no complex support in C */;
double r31417 = r31416 * r31416;
double r31418 = r31417 * r31416;
double r31419 = r31418 * r31416;
double r31420 = r31419 * r31416;
double r31421 = r31420 * r31416;
double r31422 = 6.0;
double r31423 = 0.0;
double r31424 = /* ERROR: no complex support in C */;
double r31425 = r31424 * r31416;
double r31426 = r31425 * r31416;
double r31427 = r31426 * r31416;
double r31428 = r31427 * r31416;
double r31429 = r31428 * r31416;
double r31430 = r31421 + r31429;
double r31431 = 15.0;
double r31432 = /* ERROR: no complex support in C */;
double r31433 = r31432 * r31416;
double r31434 = r31433 * r31416;
double r31435 = r31434 * r31416;
double r31436 = r31435 * r31416;
double r31437 = r31430 + r31436;
double r31438 = 20.0;
double r31439 = /* ERROR: no complex support in C */;
double r31440 = r31439 * r31416;
double r31441 = r31440 * r31416;
double r31442 = r31441 * r31416;
double r31443 = r31437 + r31442;
double r31444 = r31443 + r31434;
double r31445 = r31444 + r31425;
double r31446 = /* ERROR: no complex support in C */;
double r31447 = r31445 + r31446;
double r31448 = /* ERROR: no complex support in C */;
return r31448;
}
double f() {
double r31449 = -1.0;
double r31450 = 1.0;
double r31451 = /* ERROR: no complex support in C */;
double r31452 = r31451 * r31451;
double r31453 = r31452 * r31451;
double r31454 = r31453 * r31451;
double r31455 = r31454 * r31451;
double r31456 = r31455 * r31451;
double r31457 = 6.0;
double r31458 = 0.0;
double r31459 = /* ERROR: no complex support in C */;
double r31460 = r31459 * r31451;
double r31461 = r31460 * r31451;
double r31462 = r31461 * r31451;
double r31463 = r31462 * r31451;
double r31464 = r31463 * r31451;
double r31465 = r31456 + r31464;
double r31466 = 15.0;
double r31467 = /* ERROR: no complex support in C */;
double r31468 = r31467 * r31451;
double r31469 = r31468 * r31451;
double r31470 = r31469 * r31451;
double r31471 = r31470 * r31451;
double r31472 = r31465 + r31471;
double r31473 = 20.0;
double r31474 = /* ERROR: no complex support in C */;
double r31475 = r31474 * r31451;
double r31476 = r31475 * r31451;
double r31477 = r31476 * r31451;
double r31478 = r31472 + r31477;
double r31479 = r31478 + r31469;
double r31480 = r31479 + r31460;
double r31481 = /* ERROR: no complex support in C */;
double r31482 = r31480 + r31481;
double r31483 = /* ERROR: no complex support in C */;
return r31483;
}
Initial program 0
Final simplification0
herbie shell --seed 2020057
(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))))