\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 r28381 = -1.0;
double r28382 = 1.0;
double r28383 = /* ERROR: no complex support in C */;
double r28384 = r28383 * r28383;
double r28385 = r28384 * r28383;
double r28386 = r28385 * r28383;
double r28387 = r28386 * r28383;
double r28388 = r28387 * r28383;
double r28389 = 6.0;
double r28390 = 0.0;
double r28391 = /* ERROR: no complex support in C */;
double r28392 = r28391 * r28383;
double r28393 = r28392 * r28383;
double r28394 = r28393 * r28383;
double r28395 = r28394 * r28383;
double r28396 = r28395 * r28383;
double r28397 = r28388 + r28396;
double r28398 = 15.0;
double r28399 = /* ERROR: no complex support in C */;
double r28400 = r28399 * r28383;
double r28401 = r28400 * r28383;
double r28402 = r28401 * r28383;
double r28403 = r28402 * r28383;
double r28404 = r28397 + r28403;
double r28405 = 20.0;
double r28406 = /* ERROR: no complex support in C */;
double r28407 = r28406 * r28383;
double r28408 = r28407 * r28383;
double r28409 = r28408 * r28383;
double r28410 = r28404 + r28409;
double r28411 = r28410 + r28401;
double r28412 = r28411 + r28392;
double r28413 = /* ERROR: no complex support in C */;
double r28414 = r28412 + r28413;
double r28415 = /* ERROR: no complex support in C */;
return r28415;
}
double f() {
double r28416 = -1.0;
double r28417 = 1.0;
double r28418 = /* ERROR: no complex support in C */;
double r28419 = r28418 * r28418;
double r28420 = r28419 * r28418;
double r28421 = r28420 * r28418;
double r28422 = r28421 * r28418;
double r28423 = r28422 * r28418;
double r28424 = 6.0;
double r28425 = 0.0;
double r28426 = /* ERROR: no complex support in C */;
double r28427 = r28426 * r28418;
double r28428 = r28427 * r28418;
double r28429 = r28428 * r28418;
double r28430 = r28429 * r28418;
double r28431 = r28430 * r28418;
double r28432 = r28423 + r28431;
double r28433 = 15.0;
double r28434 = /* ERROR: no complex support in C */;
double r28435 = r28434 * r28418;
double r28436 = r28435 * r28418;
double r28437 = r28436 * r28418;
double r28438 = r28437 * r28418;
double r28439 = r28432 + r28438;
double r28440 = 20.0;
double r28441 = /* ERROR: no complex support in C */;
double r28442 = r28441 * r28418;
double r28443 = r28442 * r28418;
double r28444 = r28443 * r28418;
double r28445 = r28439 + r28444;
double r28446 = r28445 + r28436;
double r28447 = r28446 + r28427;
double r28448 = /* ERROR: no complex support in C */;
double r28449 = r28447 + r28448;
double r28450 = /* ERROR: no complex support in C */;
return r28450;
}
Initial program 0
Final simplification0
herbie shell --seed 2020025
(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))))