\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 r10304 = -1.0;
double r10305 = 1.0;
double r10306 = /* ERROR: no complex support in C */;
double r10307 = r10306 * r10306;
double r10308 = r10307 * r10306;
double r10309 = r10308 * r10306;
double r10310 = r10309 * r10306;
double r10311 = r10310 * r10306;
double r10312 = 6.0;
double r10313 = 0.0;
double r10314 = /* ERROR: no complex support in C */;
double r10315 = r10314 * r10306;
double r10316 = r10315 * r10306;
double r10317 = r10316 * r10306;
double r10318 = r10317 * r10306;
double r10319 = r10318 * r10306;
double r10320 = r10311 + r10319;
double r10321 = 15.0;
double r10322 = /* ERROR: no complex support in C */;
double r10323 = r10322 * r10306;
double r10324 = r10323 * r10306;
double r10325 = r10324 * r10306;
double r10326 = r10325 * r10306;
double r10327 = r10320 + r10326;
double r10328 = 20.0;
double r10329 = /* ERROR: no complex support in C */;
double r10330 = r10329 * r10306;
double r10331 = r10330 * r10306;
double r10332 = r10331 * r10306;
double r10333 = r10327 + r10332;
double r10334 = r10333 + r10324;
double r10335 = r10334 + r10315;
double r10336 = /* ERROR: no complex support in C */;
double r10337 = r10335 + r10336;
double r10338 = /* ERROR: no complex support in C */;
return r10338;
}
double f() {
double r10339 = -1.0;
double r10340 = 1.0;
double r10341 = /* ERROR: no complex support in C */;
double r10342 = r10341 * r10341;
double r10343 = r10342 * r10341;
double r10344 = r10343 * r10341;
double r10345 = r10344 * r10341;
double r10346 = r10345 * r10341;
double r10347 = 6.0;
double r10348 = 0.0;
double r10349 = /* ERROR: no complex support in C */;
double r10350 = r10349 * r10341;
double r10351 = r10350 * r10341;
double r10352 = r10351 * r10341;
double r10353 = r10352 * r10341;
double r10354 = r10353 * r10341;
double r10355 = r10346 + r10354;
double r10356 = 15.0;
double r10357 = /* ERROR: no complex support in C */;
double r10358 = r10357 * r10341;
double r10359 = r10358 * r10341;
double r10360 = r10359 * r10341;
double r10361 = r10360 * r10341;
double r10362 = r10355 + r10361;
double r10363 = 20.0;
double r10364 = /* ERROR: no complex support in C */;
double r10365 = r10364 * r10341;
double r10366 = r10365 * r10341;
double r10367 = r10366 * r10341;
double r10368 = r10362 + r10367;
double r10369 = r10368 + r10359;
double r10370 = r10369 + r10350;
double r10371 = /* ERROR: no complex support in C */;
double r10372 = r10370 + r10371;
double r10373 = /* ERROR: no complex support in C */;
return r10373;
}
Initial program 0
Final simplification0
herbie shell --seed 2019326 +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))))