\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 r17423 = -1.0;
double r17424 = 1.0;
double r17425 = /* ERROR: no complex support in C */;
double r17426 = r17425 * r17425;
double r17427 = r17426 * r17425;
double r17428 = r17427 * r17425;
double r17429 = r17428 * r17425;
double r17430 = r17429 * r17425;
double r17431 = 6.0;
double r17432 = 0.0;
double r17433 = /* ERROR: no complex support in C */;
double r17434 = r17433 * r17425;
double r17435 = r17434 * r17425;
double r17436 = r17435 * r17425;
double r17437 = r17436 * r17425;
double r17438 = r17437 * r17425;
double r17439 = r17430 + r17438;
double r17440 = 15.0;
double r17441 = /* ERROR: no complex support in C */;
double r17442 = r17441 * r17425;
double r17443 = r17442 * r17425;
double r17444 = r17443 * r17425;
double r17445 = r17444 * r17425;
double r17446 = r17439 + r17445;
double r17447 = 20.0;
double r17448 = /* ERROR: no complex support in C */;
double r17449 = r17448 * r17425;
double r17450 = r17449 * r17425;
double r17451 = r17450 * r17425;
double r17452 = r17446 + r17451;
double r17453 = r17452 + r17443;
double r17454 = r17453 + r17434;
double r17455 = /* ERROR: no complex support in C */;
double r17456 = r17454 + r17455;
double r17457 = /* ERROR: no complex support in C */;
return r17457;
}
double f() {
double r17458 = -1.0;
double r17459 = 1.0;
double r17460 = /* ERROR: no complex support in C */;
double r17461 = r17460 * r17460;
double r17462 = r17461 * r17460;
double r17463 = r17462 * r17460;
double r17464 = r17463 * r17460;
double r17465 = r17464 * r17460;
double r17466 = 6.0;
double r17467 = 0.0;
double r17468 = /* ERROR: no complex support in C */;
double r17469 = r17468 * r17460;
double r17470 = r17469 * r17460;
double r17471 = r17470 * r17460;
double r17472 = r17471 * r17460;
double r17473 = r17472 * r17460;
double r17474 = r17465 + r17473;
double r17475 = 15.0;
double r17476 = /* ERROR: no complex support in C */;
double r17477 = r17476 * r17460;
double r17478 = r17477 * r17460;
double r17479 = r17478 * r17460;
double r17480 = r17479 * r17460;
double r17481 = r17474 + r17480;
double r17482 = 20.0;
double r17483 = /* ERROR: no complex support in C */;
double r17484 = r17483 * r17460;
double r17485 = r17484 * r17460;
double r17486 = r17485 * r17460;
double r17487 = r17481 + r17486;
double r17488 = r17487 + r17478;
double r17489 = r17488 + r17469;
double r17490 = /* ERROR: no complex support in C */;
double r17491 = r17489 + r17490;
double r17492 = /* ERROR: no complex support in C */;
return r17492;
}
Initial program 0
Final simplification0
herbie shell --seed 2020046 +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))))