\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 r26341 = -1.0;
double r26342 = 1.0;
double r26343 = /* ERROR: no complex support in C */;
double r26344 = r26343 * r26343;
double r26345 = r26344 * r26343;
double r26346 = r26345 * r26343;
double r26347 = r26346 * r26343;
double r26348 = r26347 * r26343;
double r26349 = 6.0;
double r26350 = 0.0;
double r26351 = /* ERROR: no complex support in C */;
double r26352 = r26351 * r26343;
double r26353 = r26352 * r26343;
double r26354 = r26353 * r26343;
double r26355 = r26354 * r26343;
double r26356 = r26355 * r26343;
double r26357 = r26348 + r26356;
double r26358 = 15.0;
double r26359 = /* ERROR: no complex support in C */;
double r26360 = r26359 * r26343;
double r26361 = r26360 * r26343;
double r26362 = r26361 * r26343;
double r26363 = r26362 * r26343;
double r26364 = r26357 + r26363;
double r26365 = 20.0;
double r26366 = /* ERROR: no complex support in C */;
double r26367 = r26366 * r26343;
double r26368 = r26367 * r26343;
double r26369 = r26368 * r26343;
double r26370 = r26364 + r26369;
double r26371 = r26370 + r26361;
double r26372 = r26371 + r26352;
double r26373 = /* ERROR: no complex support in C */;
double r26374 = r26372 + r26373;
double r26375 = /* ERROR: no complex support in C */;
return r26375;
}
double f() {
double r26376 = -1.0;
double r26377 = 1.0;
double r26378 = /* ERROR: no complex support in C */;
double r26379 = r26378 * r26378;
double r26380 = r26379 * r26378;
double r26381 = r26380 * r26378;
double r26382 = r26381 * r26378;
double r26383 = r26382 * r26378;
double r26384 = 6.0;
double r26385 = 0.0;
double r26386 = /* ERROR: no complex support in C */;
double r26387 = r26386 * r26378;
double r26388 = r26387 * r26378;
double r26389 = r26388 * r26378;
double r26390 = r26389 * r26378;
double r26391 = r26390 * r26378;
double r26392 = r26383 + r26391;
double r26393 = 15.0;
double r26394 = /* ERROR: no complex support in C */;
double r26395 = r26394 * r26378;
double r26396 = r26395 * r26378;
double r26397 = r26396 * r26378;
double r26398 = r26397 * r26378;
double r26399 = r26392 + r26398;
double r26400 = 20.0;
double r26401 = /* ERROR: no complex support in C */;
double r26402 = r26401 * r26378;
double r26403 = r26402 * r26378;
double r26404 = r26403 * r26378;
double r26405 = r26399 + r26404;
double r26406 = r26405 + r26396;
double r26407 = r26406 + r26387;
double r26408 = /* ERROR: no complex support in C */;
double r26409 = r26407 + r26408;
double r26410 = /* ERROR: no complex support in C */;
return r26410;
}
Initial program 0
Final simplification0
herbie shell --seed 2019305
(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))))