\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 r21411 = -1.0;
double r21412 = 1.0;
double r21413 = /* ERROR: no complex support in C */;
double r21414 = r21413 * r21413;
double r21415 = r21414 * r21413;
double r21416 = r21415 * r21413;
double r21417 = r21416 * r21413;
double r21418 = r21417 * r21413;
double r21419 = 6.0;
double r21420 = 0.0;
double r21421 = /* ERROR: no complex support in C */;
double r21422 = r21421 * r21413;
double r21423 = r21422 * r21413;
double r21424 = r21423 * r21413;
double r21425 = r21424 * r21413;
double r21426 = r21425 * r21413;
double r21427 = r21418 + r21426;
double r21428 = 15.0;
double r21429 = /* ERROR: no complex support in C */;
double r21430 = r21429 * r21413;
double r21431 = r21430 * r21413;
double r21432 = r21431 * r21413;
double r21433 = r21432 * r21413;
double r21434 = r21427 + r21433;
double r21435 = 20.0;
double r21436 = /* ERROR: no complex support in C */;
double r21437 = r21436 * r21413;
double r21438 = r21437 * r21413;
double r21439 = r21438 * r21413;
double r21440 = r21434 + r21439;
double r21441 = r21440 + r21431;
double r21442 = r21441 + r21422;
double r21443 = /* ERROR: no complex support in C */;
double r21444 = r21442 + r21443;
double r21445 = /* ERROR: no complex support in C */;
return r21445;
}
double f() {
double r21446 = -1.0;
double r21447 = 1.0;
double r21448 = /* ERROR: no complex support in C */;
double r21449 = r21448 * r21448;
double r21450 = r21449 * r21448;
double r21451 = r21450 * r21448;
double r21452 = r21451 * r21448;
double r21453 = r21452 * r21448;
double r21454 = 6.0;
double r21455 = 0.0;
double r21456 = /* ERROR: no complex support in C */;
double r21457 = r21456 * r21448;
double r21458 = r21457 * r21448;
double r21459 = r21458 * r21448;
double r21460 = r21459 * r21448;
double r21461 = r21460 * r21448;
double r21462 = r21453 + r21461;
double r21463 = 15.0;
double r21464 = /* ERROR: no complex support in C */;
double r21465 = r21464 * r21448;
double r21466 = r21465 * r21448;
double r21467 = r21466 * r21448;
double r21468 = r21467 * r21448;
double r21469 = r21462 + r21468;
double r21470 = 20.0;
double r21471 = /* ERROR: no complex support in C */;
double r21472 = r21471 * r21448;
double r21473 = r21472 * r21448;
double r21474 = r21473 * r21448;
double r21475 = r21469 + r21474;
double r21476 = r21475 + r21466;
double r21477 = r21476 + r21457;
double r21478 = /* ERROR: no complex support in C */;
double r21479 = r21477 + r21478;
double r21480 = /* ERROR: no complex support in C */;
return r21480;
}
Initial program 0
Final simplification0
herbie shell --seed 2020027 +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))))