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