\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 r10324 = -1.0;
double r10325 = 1.0;
double r10326 = /* ERROR: no complex support in C */;
double r10327 = r10326 * r10326;
double r10328 = r10327 * r10326;
double r10329 = r10328 * r10326;
double r10330 = r10329 * r10326;
double r10331 = r10330 * r10326;
double r10332 = 6.0;
double r10333 = 0.0;
double r10334 = /* ERROR: no complex support in C */;
double r10335 = r10334 * r10326;
double r10336 = r10335 * r10326;
double r10337 = r10336 * r10326;
double r10338 = r10337 * r10326;
double r10339 = r10338 * r10326;
double r10340 = r10331 + r10339;
double r10341 = 15.0;
double r10342 = /* ERROR: no complex support in C */;
double r10343 = r10342 * r10326;
double r10344 = r10343 * r10326;
double r10345 = r10344 * r10326;
double r10346 = r10345 * r10326;
double r10347 = r10340 + r10346;
double r10348 = 20.0;
double r10349 = /* ERROR: no complex support in C */;
double r10350 = r10349 * r10326;
double r10351 = r10350 * r10326;
double r10352 = r10351 * r10326;
double r10353 = r10347 + r10352;
double r10354 = r10353 + r10344;
double r10355 = r10354 + r10335;
double r10356 = /* ERROR: no complex support in C */;
double r10357 = r10355 + r10356;
double r10358 = /* ERROR: no complex support in C */;
return r10358;
}
double f() {
double r10359 = -1.0;
double r10360 = 1.0;
double r10361 = /* ERROR: no complex support in C */;
double r10362 = r10361 * r10361;
double r10363 = r10362 * r10361;
double r10364 = r10363 * r10361;
double r10365 = r10364 * r10361;
double r10366 = r10365 * r10361;
double r10367 = 6.0;
double r10368 = 0.0;
double r10369 = /* ERROR: no complex support in C */;
double r10370 = r10369 * r10361;
double r10371 = r10370 * r10361;
double r10372 = r10371 * r10361;
double r10373 = r10372 * r10361;
double r10374 = r10373 * r10361;
double r10375 = r10366 + r10374;
double r10376 = 15.0;
double r10377 = /* ERROR: no complex support in C */;
double r10378 = r10377 * r10361;
double r10379 = r10378 * r10361;
double r10380 = r10379 * r10361;
double r10381 = r10380 * r10361;
double r10382 = r10375 + r10381;
double r10383 = 20.0;
double r10384 = /* ERROR: no complex support in C */;
double r10385 = r10384 * r10361;
double r10386 = r10385 * r10361;
double r10387 = r10386 * r10361;
double r10388 = r10382 + r10387;
double r10389 = r10388 + r10379;
double r10390 = r10389 + r10370;
double r10391 = /* ERROR: no complex support in C */;
double r10392 = r10390 + r10391;
double r10393 = /* ERROR: no complex support in C */;
return r10393;
}
Initial program 0
Final simplification0
herbie shell --seed 2019208
(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))))