\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 r19447 = -1.0;
double r19448 = 1.0;
double r19449 = /* ERROR: no complex support in C */;
double r19450 = r19449 * r19449;
double r19451 = r19450 * r19449;
double r19452 = r19451 * r19449;
double r19453 = r19452 * r19449;
double r19454 = r19453 * r19449;
double r19455 = 6.0;
double r19456 = 0.0;
double r19457 = /* ERROR: no complex support in C */;
double r19458 = r19457 * r19449;
double r19459 = r19458 * r19449;
double r19460 = r19459 * r19449;
double r19461 = r19460 * r19449;
double r19462 = r19461 * r19449;
double r19463 = r19454 + r19462;
double r19464 = 15.0;
double r19465 = /* ERROR: no complex support in C */;
double r19466 = r19465 * r19449;
double r19467 = r19466 * r19449;
double r19468 = r19467 * r19449;
double r19469 = r19468 * r19449;
double r19470 = r19463 + r19469;
double r19471 = 20.0;
double r19472 = /* ERROR: no complex support in C */;
double r19473 = r19472 * r19449;
double r19474 = r19473 * r19449;
double r19475 = r19474 * r19449;
double r19476 = r19470 + r19475;
double r19477 = r19476 + r19467;
double r19478 = r19477 + r19458;
double r19479 = /* ERROR: no complex support in C */;
double r19480 = r19478 + r19479;
double r19481 = /* ERROR: no complex support in C */;
return r19481;
}
double f() {
double r19482 = -1.0;
double r19483 = 1.0;
double r19484 = /* ERROR: no complex support in C */;
double r19485 = r19484 * r19484;
double r19486 = r19485 * r19484;
double r19487 = r19486 * r19484;
double r19488 = r19487 * r19484;
double r19489 = r19488 * r19484;
double r19490 = 6.0;
double r19491 = 0.0;
double r19492 = /* ERROR: no complex support in C */;
double r19493 = r19492 * r19484;
double r19494 = r19493 * r19484;
double r19495 = r19494 * r19484;
double r19496 = r19495 * r19484;
double r19497 = r19496 * r19484;
double r19498 = r19489 + r19497;
double r19499 = 15.0;
double r19500 = /* ERROR: no complex support in C */;
double r19501 = r19500 * r19484;
double r19502 = r19501 * r19484;
double r19503 = r19502 * r19484;
double r19504 = r19503 * r19484;
double r19505 = r19498 + r19504;
double r19506 = 20.0;
double r19507 = /* ERROR: no complex support in C */;
double r19508 = r19507 * r19484;
double r19509 = r19508 * r19484;
double r19510 = r19509 * r19484;
double r19511 = r19505 + r19510;
double r19512 = r19511 + r19502;
double r19513 = r19512 + r19493;
double r19514 = /* ERROR: no complex support in C */;
double r19515 = r19513 + r19514;
double r19516 = /* ERROR: no complex support in C */;
return r19516;
}
Initial program 0
Final simplification0
herbie shell --seed 2019304
(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))))