\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 r37358 = -1.0;
double r37359 = 1.0;
double r37360 = /* ERROR: no complex support in C */;
double r37361 = r37360 * r37360;
double r37362 = r37361 * r37360;
double r37363 = r37362 * r37360;
double r37364 = r37363 * r37360;
double r37365 = r37364 * r37360;
double r37366 = 6.0;
double r37367 = 0.0;
double r37368 = /* ERROR: no complex support in C */;
double r37369 = r37368 * r37360;
double r37370 = r37369 * r37360;
double r37371 = r37370 * r37360;
double r37372 = r37371 * r37360;
double r37373 = r37372 * r37360;
double r37374 = r37365 + r37373;
double r37375 = 15.0;
double r37376 = /* ERROR: no complex support in C */;
double r37377 = r37376 * r37360;
double r37378 = r37377 * r37360;
double r37379 = r37378 * r37360;
double r37380 = r37379 * r37360;
double r37381 = r37374 + r37380;
double r37382 = 20.0;
double r37383 = /* ERROR: no complex support in C */;
double r37384 = r37383 * r37360;
double r37385 = r37384 * r37360;
double r37386 = r37385 * r37360;
double r37387 = r37381 + r37386;
double r37388 = r37387 + r37378;
double r37389 = r37388 + r37369;
double r37390 = /* ERROR: no complex support in C */;
double r37391 = r37389 + r37390;
double r37392 = /* ERROR: no complex support in C */;
return r37392;
}
double f() {
double r37393 = -1.0;
double r37394 = 1.0;
double r37395 = /* ERROR: no complex support in C */;
double r37396 = r37395 * r37395;
double r37397 = r37396 * r37395;
double r37398 = r37397 * r37395;
double r37399 = r37398 * r37395;
double r37400 = r37399 * r37395;
double r37401 = 6.0;
double r37402 = 0.0;
double r37403 = /* ERROR: no complex support in C */;
double r37404 = r37403 * r37395;
double r37405 = r37404 * r37395;
double r37406 = r37405 * r37395;
double r37407 = r37406 * r37395;
double r37408 = r37407 * r37395;
double r37409 = r37400 + r37408;
double r37410 = 15.0;
double r37411 = /* ERROR: no complex support in C */;
double r37412 = r37411 * r37395;
double r37413 = r37412 * r37395;
double r37414 = r37413 * r37395;
double r37415 = r37414 * r37395;
double r37416 = r37409 + r37415;
double r37417 = 20.0;
double r37418 = /* ERROR: no complex support in C */;
double r37419 = r37418 * r37395;
double r37420 = r37419 * r37395;
double r37421 = r37420 * r37395;
double r37422 = r37416 + r37421;
double r37423 = r37422 + r37413;
double r37424 = r37423 + r37404;
double r37425 = /* ERROR: no complex support in C */;
double r37426 = r37424 + r37425;
double r37427 = /* ERROR: no complex support in C */;
return r37427;
}
Initial program 0
Final simplification0
herbie shell --seed 2020062
(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))))