\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 r497588 = -1.0;
double r497589 = 1.0;
double r497590 = /* ERROR: no complex support in C */;
double r497591 = r497590 * r497590;
double r497592 = r497591 * r497590;
double r497593 = r497592 * r497590;
double r497594 = r497593 * r497590;
double r497595 = r497594 * r497590;
double r497596 = 6.0;
double r497597 = 0.0;
double r497598 = /* ERROR: no complex support in C */;
double r497599 = r497598 * r497590;
double r497600 = r497599 * r497590;
double r497601 = r497600 * r497590;
double r497602 = r497601 * r497590;
double r497603 = r497602 * r497590;
double r497604 = r497595 + r497603;
double r497605 = 15.0;
double r497606 = /* ERROR: no complex support in C */;
double r497607 = r497606 * r497590;
double r497608 = r497607 * r497590;
double r497609 = r497608 * r497590;
double r497610 = r497609 * r497590;
double r497611 = r497604 + r497610;
double r497612 = 20.0;
double r497613 = /* ERROR: no complex support in C */;
double r497614 = r497613 * r497590;
double r497615 = r497614 * r497590;
double r497616 = r497615 * r497590;
double r497617 = r497611 + r497616;
double r497618 = r497617 + r497608;
double r497619 = r497618 + r497599;
double r497620 = /* ERROR: no complex support in C */;
double r497621 = r497619 + r497620;
double r497622 = /* ERROR: no complex support in C */;
return r497622;
}
double f() {
double r497623 = -1.0;
return r497623;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019135
(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))))