\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 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 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 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 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0 i\right)\right))
-1
double f() {
double r862349 = -1.0;
double r862350 = 1.0;
double r862351 = /* ERROR: no complex support in C */;
double r862352 = r862351 * r862351;
double r862353 = r862352 * r862351;
double r862354 = r862353 * r862351;
double r862355 = r862354 * r862351;
double r862356 = r862355 * r862351;
double r862357 = 6.0;
double r862358 = 0.0;
double r862359 = /* ERROR: no complex support in C */;
double r862360 = r862359 * r862351;
double r862361 = r862360 * r862351;
double r862362 = r862361 * r862351;
double r862363 = r862362 * r862351;
double r862364 = r862363 * r862351;
double r862365 = r862356 + r862364;
double r862366 = 15.0;
double r862367 = /* ERROR: no complex support in C */;
double r862368 = r862367 * r862351;
double r862369 = r862368 * r862351;
double r862370 = r862369 * r862351;
double r862371 = r862370 * r862351;
double r862372 = r862365 + r862371;
double r862373 = 20.0;
double r862374 = /* ERROR: no complex support in C */;
double r862375 = r862374 * r862351;
double r862376 = r862375 * r862351;
double r862377 = r862376 * r862351;
double r862378 = r862372 + r862377;
double r862379 = r862378 + r862369;
double r862380 = r862379 + r862360;
double r862381 = /* ERROR: no complex support in C */;
double r862382 = r862380 + r862381;
double r862383 = /* ERROR: no complex support in C */;
return r862383;
}
double f() {
double r862384 = -1.0;
return r862384;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019163 +o rules:numerics
(FPCore ()
:name "3.9.1 real part (p56)"
(re (+.c (+.c (+.c (+.c (+.c (+.c (*.c (*.c (*.c (*.c (*.c (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (*.c (*.c (*.c (*.c (*.c (complex 6 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (complex 20 0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1))) (*.c (complex 6 0) (complex -1 1))) (complex 1 0))))