\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 r25406 = -1.0;
double r25407 = 1.0;
double r25408 = /* ERROR: no complex support in C */;
double r25409 = r25408 * r25408;
double r25410 = r25409 * r25408;
double r25411 = r25410 * r25408;
double r25412 = r25411 * r25408;
double r25413 = r25412 * r25408;
double r25414 = 6.0;
double r25415 = 0.0;
double r25416 = /* ERROR: no complex support in C */;
double r25417 = r25416 * r25408;
double r25418 = r25417 * r25408;
double r25419 = r25418 * r25408;
double r25420 = r25419 * r25408;
double r25421 = r25420 * r25408;
double r25422 = r25413 + r25421;
double r25423 = 15.0;
double r25424 = /* ERROR: no complex support in C */;
double r25425 = r25424 * r25408;
double r25426 = r25425 * r25408;
double r25427 = r25426 * r25408;
double r25428 = r25427 * r25408;
double r25429 = r25422 + r25428;
double r25430 = 20.0;
double r25431 = /* ERROR: no complex support in C */;
double r25432 = r25431 * r25408;
double r25433 = r25432 * r25408;
double r25434 = r25433 * r25408;
double r25435 = r25429 + r25434;
double r25436 = r25435 + r25426;
double r25437 = r25436 + r25417;
double r25438 = /* ERROR: no complex support in C */;
double r25439 = r25437 + r25438;
double r25440 = /* ERROR: no complex support in C */;
return r25440;
}
double f() {
double r25441 = -1.0;
double r25442 = 1.0;
double r25443 = /* ERROR: no complex support in C */;
double r25444 = r25443 * r25443;
double r25445 = r25444 * r25443;
double r25446 = r25445 * r25443;
double r25447 = r25446 * r25443;
double r25448 = r25447 * r25443;
double r25449 = 6.0;
double r25450 = 0.0;
double r25451 = /* ERROR: no complex support in C */;
double r25452 = r25451 * r25443;
double r25453 = r25452 * r25443;
double r25454 = r25453 * r25443;
double r25455 = r25454 * r25443;
double r25456 = r25455 * r25443;
double r25457 = r25448 + r25456;
double r25458 = 15.0;
double r25459 = /* ERROR: no complex support in C */;
double r25460 = r25459 * r25443;
double r25461 = r25460 * r25443;
double r25462 = r25461 * r25443;
double r25463 = r25462 * r25443;
double r25464 = r25457 + r25463;
double r25465 = 20.0;
double r25466 = /* ERROR: no complex support in C */;
double r25467 = r25466 * r25443;
double r25468 = r25467 * r25443;
double r25469 = r25468 * r25443;
double r25470 = r25464 + r25469;
double r25471 = r25470 + r25461;
double r25472 = r25471 + r25452;
double r25473 = /* ERROR: no complex support in C */;
double r25474 = r25472 + r25473;
double r25475 = /* ERROR: no complex support in C */;
return r25475;
}
Initial program 0
Final simplification0
herbie shell --seed 2019346
(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))))