\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 r17468 = -1.0;
double r17469 = 1.0;
double r17470 = /* ERROR: no complex support in C */;
double r17471 = r17470 * r17470;
double r17472 = r17471 * r17470;
double r17473 = r17472 * r17470;
double r17474 = r17473 * r17470;
double r17475 = r17474 * r17470;
double r17476 = 6.0;
double r17477 = 0.0;
double r17478 = /* ERROR: no complex support in C */;
double r17479 = r17478 * r17470;
double r17480 = r17479 * r17470;
double r17481 = r17480 * r17470;
double r17482 = r17481 * r17470;
double r17483 = r17482 * r17470;
double r17484 = r17475 + r17483;
double r17485 = 15.0;
double r17486 = /* ERROR: no complex support in C */;
double r17487 = r17486 * r17470;
double r17488 = r17487 * r17470;
double r17489 = r17488 * r17470;
double r17490 = r17489 * r17470;
double r17491 = r17484 + r17490;
double r17492 = 20.0;
double r17493 = /* ERROR: no complex support in C */;
double r17494 = r17493 * r17470;
double r17495 = r17494 * r17470;
double r17496 = r17495 * r17470;
double r17497 = r17491 + r17496;
double r17498 = r17497 + r17488;
double r17499 = r17498 + r17479;
double r17500 = /* ERROR: no complex support in C */;
double r17501 = r17499 + r17500;
double r17502 = /* ERROR: no complex support in C */;
return r17502;
}
double f() {
double r17503 = -1.0;
double r17504 = 1.0;
double r17505 = /* ERROR: no complex support in C */;
double r17506 = r17505 * r17505;
double r17507 = r17506 * r17505;
double r17508 = r17507 * r17505;
double r17509 = r17508 * r17505;
double r17510 = r17509 * r17505;
double r17511 = 6.0;
double r17512 = 0.0;
double r17513 = /* ERROR: no complex support in C */;
double r17514 = r17513 * r17505;
double r17515 = r17514 * r17505;
double r17516 = r17515 * r17505;
double r17517 = r17516 * r17505;
double r17518 = r17517 * r17505;
double r17519 = r17510 + r17518;
double r17520 = 15.0;
double r17521 = /* ERROR: no complex support in C */;
double r17522 = r17521 * r17505;
double r17523 = r17522 * r17505;
double r17524 = r17523 * r17505;
double r17525 = r17524 * r17505;
double r17526 = r17519 + r17525;
double r17527 = 20.0;
double r17528 = /* ERROR: no complex support in C */;
double r17529 = r17528 * r17505;
double r17530 = r17529 * r17505;
double r17531 = r17530 * r17505;
double r17532 = r17526 + r17531;
double r17533 = r17532 + r17523;
double r17534 = r17533 + r17514;
double r17535 = /* ERROR: no complex support in C */;
double r17536 = r17534 + r17535;
double r17537 = /* ERROR: no complex support in C */;
return r17537;
}
Initial program 0
Final simplification0
herbie shell --seed 2020036
(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))))