\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 r118338 = -1.0;
double r118339 = 1.0;
double r118340 = /* ERROR: no complex support in C */;
double r118341 = r118340 * r118340;
double r118342 = r118341 * r118340;
double r118343 = r118342 * r118340;
double r118344 = r118343 * r118340;
double r118345 = r118344 * r118340;
double r118346 = 6.0;
double r118347 = 0.0;
double r118348 = /* ERROR: no complex support in C */;
double r118349 = r118348 * r118340;
double r118350 = r118349 * r118340;
double r118351 = r118350 * r118340;
double r118352 = r118351 * r118340;
double r118353 = r118352 * r118340;
double r118354 = r118345 + r118353;
double r118355 = 15.0;
double r118356 = /* ERROR: no complex support in C */;
double r118357 = r118356 * r118340;
double r118358 = r118357 * r118340;
double r118359 = r118358 * r118340;
double r118360 = r118359 * r118340;
double r118361 = r118354 + r118360;
double r118362 = 20.0;
double r118363 = /* ERROR: no complex support in C */;
double r118364 = r118363 * r118340;
double r118365 = r118364 * r118340;
double r118366 = r118365 * r118340;
double r118367 = r118361 + r118366;
double r118368 = r118367 + r118358;
double r118369 = r118368 + r118349;
double r118370 = /* ERROR: no complex support in C */;
double r118371 = r118369 + r118370;
double r118372 = /* ERROR: no complex support in C */;
return r118372;
}
double f() {
double r118373 = -1.0;
double r118374 = 1.0;
double r118375 = /* ERROR: no complex support in C */;
double r118376 = r118375 * r118375;
double r118377 = r118376 * r118375;
double r118378 = r118377 * r118375;
double r118379 = r118378 * r118375;
double r118380 = r118379 * r118375;
double r118381 = 6.0;
double r118382 = 0.0;
double r118383 = /* ERROR: no complex support in C */;
double r118384 = r118383 * r118375;
double r118385 = r118384 * r118375;
double r118386 = r118385 * r118375;
double r118387 = r118386 * r118375;
double r118388 = r118387 * r118375;
double r118389 = r118380 + r118388;
double r118390 = 15.0;
double r118391 = /* ERROR: no complex support in C */;
double r118392 = r118391 * r118375;
double r118393 = r118392 * r118375;
double r118394 = r118393 * r118375;
double r118395 = r118394 * r118375;
double r118396 = r118389 + r118395;
double r118397 = 20.0;
double r118398 = /* ERROR: no complex support in C */;
double r118399 = r118398 * r118375;
double r118400 = r118399 * r118375;
double r118401 = r118400 * r118375;
double r118402 = r118396 + r118401;
double r118403 = r118402 + r118393;
double r118404 = r118403 + r118384;
double r118405 = /* ERROR: no complex support in C */;
double r118406 = r118404 + r118405;
double r118407 = /* ERROR: no complex support in C */;
return r118407;
}
Initial program 0
Final simplification0
herbie shell --seed 350497007
(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))))