\Re(\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))
\Re(\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 r25456 = -1.0;
double r25457 = 1.0;
double r25458 = /* ERROR: no complex support in C */;
double r25459 = r25458 * r25458;
double r25460 = r25459 * r25458;
double r25461 = r25460 * r25458;
double r25462 = r25461 * r25458;
double r25463 = r25462 * r25458;
double r25464 = 6.0;
double r25465 = 0.0;
double r25466 = /* ERROR: no complex support in C */;
double r25467 = r25466 * r25458;
double r25468 = r25467 * r25458;
double r25469 = r25468 * r25458;
double r25470 = r25469 * r25458;
double r25471 = r25470 * r25458;
double r25472 = r25463 + r25471;
double r25473 = 15.0;
double r25474 = /* ERROR: no complex support in C */;
double r25475 = r25474 * r25458;
double r25476 = r25475 * r25458;
double r25477 = r25476 * r25458;
double r25478 = r25477 * r25458;
double r25479 = r25472 + r25478;
double r25480 = 20.0;
double r25481 = /* ERROR: no complex support in C */;
double r25482 = r25481 * r25458;
double r25483 = r25482 * r25458;
double r25484 = r25483 * r25458;
double r25485 = r25479 + r25484;
double r25486 = r25485 + r25476;
double r25487 = r25486 + r25467;
double r25488 = /* ERROR: no complex support in C */;
double r25489 = r25487 + r25488;
double r25490 = /* ERROR: no complex support in C */;
return r25490;
}
double f() {
double r25491 = -1.0;
double r25492 = 1.0;
double r25493 = /* ERROR: no complex support in C */;
double r25494 = r25493 * r25493;
double r25495 = r25494 * r25493;
double r25496 = r25495 * r25493;
double r25497 = r25496 * r25493;
double r25498 = r25497 * r25493;
double r25499 = 6.0;
double r25500 = 0.0;
double r25501 = /* ERROR: no complex support in C */;
double r25502 = r25501 * r25493;
double r25503 = r25502 * r25493;
double r25504 = r25503 * r25493;
double r25505 = r25504 * r25493;
double r25506 = r25505 * r25493;
double r25507 = r25498 + r25506;
double r25508 = 15.0;
double r25509 = /* ERROR: no complex support in C */;
double r25510 = r25509 * r25493;
double r25511 = r25510 * r25493;
double r25512 = r25511 * r25493;
double r25513 = r25512 * r25493;
double r25514 = r25507 + r25513;
double r25515 = 20.0;
double r25516 = /* ERROR: no complex support in C */;
double r25517 = r25516 * r25493;
double r25518 = r25517 * r25493;
double r25519 = r25518 * r25493;
double r25520 = r25514 + r25519;
double r25521 = r25520 + r25511;
double r25522 = r25521 + r25502;
double r25523 = /* ERROR: no complex support in C */;
double r25524 = r25522 + r25523;
double r25525 = /* ERROR: no complex support in C */;
return r25525;
}
Initial program 0
Final simplification0
herbie shell --seed 2020060
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))