\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 r935616 = -1.0;
double r935617 = 1.0;
double r935618 = /* ERROR: no complex support in C */;
double r935619 = r935618 * r935618;
double r935620 = r935619 * r935618;
double r935621 = r935620 * r935618;
double r935622 = r935621 * r935618;
double r935623 = r935622 * r935618;
double r935624 = 6.0;
double r935625 = 0.0;
double r935626 = /* ERROR: no complex support in C */;
double r935627 = r935626 * r935618;
double r935628 = r935627 * r935618;
double r935629 = r935628 * r935618;
double r935630 = r935629 * r935618;
double r935631 = r935630 * r935618;
double r935632 = r935623 + r935631;
double r935633 = 15.0;
double r935634 = /* ERROR: no complex support in C */;
double r935635 = r935634 * r935618;
double r935636 = r935635 * r935618;
double r935637 = r935636 * r935618;
double r935638 = r935637 * r935618;
double r935639 = r935632 + r935638;
double r935640 = 20.0;
double r935641 = /* ERROR: no complex support in C */;
double r935642 = r935641 * r935618;
double r935643 = r935642 * r935618;
double r935644 = r935643 * r935618;
double r935645 = r935639 + r935644;
double r935646 = r935645 + r935636;
double r935647 = r935646 + r935627;
double r935648 = /* ERROR: no complex support in C */;
double r935649 = r935647 + r935648;
double r935650 = /* ERROR: no complex support in C */;
return r935650;
}
double f() {
double r935651 = -1.0;
return r935651;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019158
(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))))