\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 r22440 = -1.0;
double r22441 = 1.0;
double r22442 = /* ERROR: no complex support in C */;
double r22443 = r22442 * r22442;
double r22444 = r22443 * r22442;
double r22445 = r22444 * r22442;
double r22446 = r22445 * r22442;
double r22447 = r22446 * r22442;
double r22448 = 6.0;
double r22449 = 0.0;
double r22450 = /* ERROR: no complex support in C */;
double r22451 = r22450 * r22442;
double r22452 = r22451 * r22442;
double r22453 = r22452 * r22442;
double r22454 = r22453 * r22442;
double r22455 = r22454 * r22442;
double r22456 = r22447 + r22455;
double r22457 = 15.0;
double r22458 = /* ERROR: no complex support in C */;
double r22459 = r22458 * r22442;
double r22460 = r22459 * r22442;
double r22461 = r22460 * r22442;
double r22462 = r22461 * r22442;
double r22463 = r22456 + r22462;
double r22464 = 20.0;
double r22465 = /* ERROR: no complex support in C */;
double r22466 = r22465 * r22442;
double r22467 = r22466 * r22442;
double r22468 = r22467 * r22442;
double r22469 = r22463 + r22468;
double r22470 = r22469 + r22460;
double r22471 = r22470 + r22451;
double r22472 = /* ERROR: no complex support in C */;
double r22473 = r22471 + r22472;
double r22474 = /* ERROR: no complex support in C */;
return r22474;
}
double f() {
double r22475 = -1.0;
double r22476 = 1.0;
double r22477 = /* ERROR: no complex support in C */;
double r22478 = r22477 * r22477;
double r22479 = r22478 * r22477;
double r22480 = r22479 * r22477;
double r22481 = r22480 * r22477;
double r22482 = r22481 * r22477;
double r22483 = 6.0;
double r22484 = 0.0;
double r22485 = /* ERROR: no complex support in C */;
double r22486 = r22485 * r22477;
double r22487 = r22486 * r22477;
double r22488 = r22487 * r22477;
double r22489 = r22488 * r22477;
double r22490 = r22489 * r22477;
double r22491 = r22482 + r22490;
double r22492 = 15.0;
double r22493 = /* ERROR: no complex support in C */;
double r22494 = r22493 * r22477;
double r22495 = r22494 * r22477;
double r22496 = r22495 * r22477;
double r22497 = r22496 * r22477;
double r22498 = r22491 + r22497;
double r22499 = 20.0;
double r22500 = /* ERROR: no complex support in C */;
double r22501 = r22500 * r22477;
double r22502 = r22501 * r22477;
double r22503 = r22502 * r22477;
double r22504 = r22498 + r22503;
double r22505 = r22504 + r22495;
double r22506 = r22505 + r22486;
double r22507 = /* ERROR: no complex support in C */;
double r22508 = r22506 + r22507;
double r22509 = /* ERROR: no complex support in C */;
return r22509;
}
Initial program 0
Final simplification0
herbie shell --seed 2020001 +o rules:numerics
(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))))