\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 r19358 = -1.0;
double r19359 = 1.0;
double r19360 = /* ERROR: no complex support in C */;
double r19361 = r19360 * r19360;
double r19362 = r19361 * r19360;
double r19363 = r19362 * r19360;
double r19364 = r19363 * r19360;
double r19365 = r19364 * r19360;
double r19366 = 6.0;
double r19367 = 0.0;
double r19368 = /* ERROR: no complex support in C */;
double r19369 = r19368 * r19360;
double r19370 = r19369 * r19360;
double r19371 = r19370 * r19360;
double r19372 = r19371 * r19360;
double r19373 = r19372 * r19360;
double r19374 = r19365 + r19373;
double r19375 = 15.0;
double r19376 = /* ERROR: no complex support in C */;
double r19377 = r19376 * r19360;
double r19378 = r19377 * r19360;
double r19379 = r19378 * r19360;
double r19380 = r19379 * r19360;
double r19381 = r19374 + r19380;
double r19382 = 20.0;
double r19383 = /* ERROR: no complex support in C */;
double r19384 = r19383 * r19360;
double r19385 = r19384 * r19360;
double r19386 = r19385 * r19360;
double r19387 = r19381 + r19386;
double r19388 = r19387 + r19378;
double r19389 = r19388 + r19369;
double r19390 = /* ERROR: no complex support in C */;
double r19391 = r19389 + r19390;
double r19392 = /* ERROR: no complex support in C */;
return r19392;
}
double f() {
double r19393 = -1.0;
double r19394 = 1.0;
double r19395 = /* ERROR: no complex support in C */;
double r19396 = r19395 * r19395;
double r19397 = r19396 * r19395;
double r19398 = r19397 * r19395;
double r19399 = r19398 * r19395;
double r19400 = r19399 * r19395;
double r19401 = 6.0;
double r19402 = 0.0;
double r19403 = /* ERROR: no complex support in C */;
double r19404 = r19403 * r19395;
double r19405 = r19404 * r19395;
double r19406 = r19405 * r19395;
double r19407 = r19406 * r19395;
double r19408 = r19407 * r19395;
double r19409 = r19400 + r19408;
double r19410 = 15.0;
double r19411 = /* ERROR: no complex support in C */;
double r19412 = r19411 * r19395;
double r19413 = r19412 * r19395;
double r19414 = r19413 * r19395;
double r19415 = r19414 * r19395;
double r19416 = r19409 + r19415;
double r19417 = 20.0;
double r19418 = /* ERROR: no complex support in C */;
double r19419 = r19418 * r19395;
double r19420 = r19419 * r19395;
double r19421 = r19420 * r19395;
double r19422 = r19416 + r19421;
double r19423 = r19422 + r19413;
double r19424 = r19423 + r19404;
double r19425 = /* ERROR: no complex support in C */;
double r19426 = r19424 + r19425;
double r19427 = /* ERROR: no complex support in C */;
return r19427;
}
Initial program 0
Final simplification0
herbie shell --seed 2020020
(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))))