\Re(\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))
\Re(\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 r33353 = -1.0;
double r33354 = 1.0;
double r33355 = /* ERROR: no complex support in C */;
double r33356 = r33355 * r33355;
double r33357 = r33356 * r33355;
double r33358 = r33357 * r33355;
double r33359 = r33358 * r33355;
double r33360 = r33359 * r33355;
double r33361 = 6.0;
double r33362 = 0.0;
double r33363 = /* ERROR: no complex support in C */;
double r33364 = r33363 * r33355;
double r33365 = r33364 * r33355;
double r33366 = r33365 * r33355;
double r33367 = r33366 * r33355;
double r33368 = r33367 * r33355;
double r33369 = r33360 + r33368;
double r33370 = 15.0;
double r33371 = /* ERROR: no complex support in C */;
double r33372 = r33371 * r33355;
double r33373 = r33372 * r33355;
double r33374 = r33373 * r33355;
double r33375 = r33374 * r33355;
double r33376 = r33369 + r33375;
double r33377 = 20.0;
double r33378 = /* ERROR: no complex support in C */;
double r33379 = r33378 * r33355;
double r33380 = r33379 * r33355;
double r33381 = r33380 * r33355;
double r33382 = r33376 + r33381;
double r33383 = r33382 + r33373;
double r33384 = r33383 + r33364;
double r33385 = /* ERROR: no complex support in C */;
double r33386 = r33384 + r33385;
double r33387 = /* ERROR: no complex support in C */;
return r33387;
}
double f() {
double r33388 = -1.0;
double r33389 = 1.0;
double r33390 = /* ERROR: no complex support in C */;
double r33391 = r33390 * r33390;
double r33392 = r33391 * r33390;
double r33393 = r33392 * r33390;
double r33394 = r33393 * r33390;
double r33395 = r33394 * r33390;
double r33396 = 6.0;
double r33397 = 0.0;
double r33398 = /* ERROR: no complex support in C */;
double r33399 = r33398 * r33390;
double r33400 = r33399 * r33390;
double r33401 = r33400 * r33390;
double r33402 = r33401 * r33390;
double r33403 = r33402 * r33390;
double r33404 = r33395 + r33403;
double r33405 = 15.0;
double r33406 = /* ERROR: no complex support in C */;
double r33407 = r33406 * r33390;
double r33408 = r33407 * r33390;
double r33409 = r33408 * r33390;
double r33410 = r33409 * r33390;
double r33411 = r33404 + r33410;
double r33412 = 20.0;
double r33413 = /* ERROR: no complex support in C */;
double r33414 = r33413 * r33390;
double r33415 = r33414 * r33390;
double r33416 = r33415 * r33390;
double r33417 = r33411 + r33416;
double r33418 = r33417 + r33408;
double r33419 = r33418 + r33399;
double r33420 = /* ERROR: no complex support in C */;
double r33421 = r33419 + r33420;
double r33422 = /* ERROR: no complex support in C */;
return r33422;
}
Initial program 0
Final simplification0
herbie shell --seed 2020059 +o rules:numerics
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))