\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 r25370 = -1.0;
double r25371 = 1.0;
double r25372 = /* ERROR: no complex support in C */;
double r25373 = r25372 * r25372;
double r25374 = r25373 * r25372;
double r25375 = r25374 * r25372;
double r25376 = r25375 * r25372;
double r25377 = r25376 * r25372;
double r25378 = 6.0;
double r25379 = 0.0;
double r25380 = /* ERROR: no complex support in C */;
double r25381 = r25380 * r25372;
double r25382 = r25381 * r25372;
double r25383 = r25382 * r25372;
double r25384 = r25383 * r25372;
double r25385 = r25384 * r25372;
double r25386 = r25377 + r25385;
double r25387 = 15.0;
double r25388 = /* ERROR: no complex support in C */;
double r25389 = r25388 * r25372;
double r25390 = r25389 * r25372;
double r25391 = r25390 * r25372;
double r25392 = r25391 * r25372;
double r25393 = r25386 + r25392;
double r25394 = 20.0;
double r25395 = /* ERROR: no complex support in C */;
double r25396 = r25395 * r25372;
double r25397 = r25396 * r25372;
double r25398 = r25397 * r25372;
double r25399 = r25393 + r25398;
double r25400 = r25399 + r25390;
double r25401 = r25400 + r25381;
double r25402 = /* ERROR: no complex support in C */;
double r25403 = r25401 + r25402;
double r25404 = /* ERROR: no complex support in C */;
return r25404;
}
double f() {
double r25405 = -1.0;
double r25406 = 1.0;
double r25407 = /* ERROR: no complex support in C */;
double r25408 = r25407 * r25407;
double r25409 = r25408 * r25407;
double r25410 = r25409 * r25407;
double r25411 = r25410 * r25407;
double r25412 = r25411 * r25407;
double r25413 = 6.0;
double r25414 = 0.0;
double r25415 = /* ERROR: no complex support in C */;
double r25416 = r25415 * r25407;
double r25417 = r25416 * r25407;
double r25418 = r25417 * r25407;
double r25419 = r25418 * r25407;
double r25420 = r25419 * r25407;
double r25421 = r25412 + r25420;
double r25422 = 15.0;
double r25423 = /* ERROR: no complex support in C */;
double r25424 = r25423 * r25407;
double r25425 = r25424 * r25407;
double r25426 = r25425 * r25407;
double r25427 = r25426 * r25407;
double r25428 = r25421 + r25427;
double r25429 = 20.0;
double r25430 = /* ERROR: no complex support in C */;
double r25431 = r25430 * r25407;
double r25432 = r25431 * r25407;
double r25433 = r25432 * r25407;
double r25434 = r25428 + r25433;
double r25435 = r25434 + r25425;
double r25436 = r25435 + r25416;
double r25437 = /* ERROR: no complex support in C */;
double r25438 = r25436 + r25437;
double r25439 = /* ERROR: no complex support in C */;
return r25439;
}
Initial program 0
Final simplification0
herbie shell --seed 2020039 +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))))