\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 r25372 = -1.0;
double r25373 = 1.0;
double r25374 = /* ERROR: no complex support in C */;
double r25375 = r25374 * r25374;
double r25376 = r25375 * r25374;
double r25377 = r25376 * r25374;
double r25378 = r25377 * r25374;
double r25379 = r25378 * r25374;
double r25380 = 6.0;
double r25381 = 0.0;
double r25382 = /* ERROR: no complex support in C */;
double r25383 = r25382 * r25374;
double r25384 = r25383 * r25374;
double r25385 = r25384 * r25374;
double r25386 = r25385 * r25374;
double r25387 = r25386 * r25374;
double r25388 = r25379 + r25387;
double r25389 = 15.0;
double r25390 = /* ERROR: no complex support in C */;
double r25391 = r25390 * r25374;
double r25392 = r25391 * r25374;
double r25393 = r25392 * r25374;
double r25394 = r25393 * r25374;
double r25395 = r25388 + r25394;
double r25396 = 20.0;
double r25397 = /* ERROR: no complex support in C */;
double r25398 = r25397 * r25374;
double r25399 = r25398 * r25374;
double r25400 = r25399 * r25374;
double r25401 = r25395 + r25400;
double r25402 = r25401 + r25392;
double r25403 = r25402 + r25383;
double r25404 = /* ERROR: no complex support in C */;
double r25405 = r25403 + r25404;
double r25406 = /* ERROR: no complex support in C */;
return r25406;
}
double f() {
double r25407 = -1.0;
double r25408 = 1.0;
double r25409 = /* ERROR: no complex support in C */;
double r25410 = r25409 * r25409;
double r25411 = r25410 * r25409;
double r25412 = r25411 * r25409;
double r25413 = r25412 * r25409;
double r25414 = r25413 * r25409;
double r25415 = 6.0;
double r25416 = 0.0;
double r25417 = /* ERROR: no complex support in C */;
double r25418 = r25417 * r25409;
double r25419 = r25418 * r25409;
double r25420 = r25419 * r25409;
double r25421 = r25420 * r25409;
double r25422 = r25421 * r25409;
double r25423 = r25414 + r25422;
double r25424 = 15.0;
double r25425 = /* ERROR: no complex support in C */;
double r25426 = r25425 * r25409;
double r25427 = r25426 * r25409;
double r25428 = r25427 * r25409;
double r25429 = r25428 * r25409;
double r25430 = r25423 + r25429;
double r25431 = 20.0;
double r25432 = /* ERROR: no complex support in C */;
double r25433 = r25432 * r25409;
double r25434 = r25433 * r25409;
double r25435 = r25434 * r25409;
double r25436 = r25430 + r25435;
double r25437 = r25436 + r25427;
double r25438 = r25437 + r25418;
double r25439 = /* ERROR: no complex support in C */;
double r25440 = r25438 + r25439;
double r25441 = /* ERROR: no complex support in C */;
return r25441;
}
Initial program 0
Final simplification0
herbie shell --seed 2019353
(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))))