\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 r417116 = -1.0;
double r417117 = 1.0;
double r417118 = /* ERROR: no complex support in C */;
double r417119 = r417118 * r417118;
double r417120 = r417119 * r417118;
double r417121 = r417120 * r417118;
double r417122 = r417121 * r417118;
double r417123 = r417122 * r417118;
double r417124 = 6.0;
double r417125 = 0.0;
double r417126 = /* ERROR: no complex support in C */;
double r417127 = r417126 * r417118;
double r417128 = r417127 * r417118;
double r417129 = r417128 * r417118;
double r417130 = r417129 * r417118;
double r417131 = r417130 * r417118;
double r417132 = r417123 + r417131;
double r417133 = 15.0;
double r417134 = /* ERROR: no complex support in C */;
double r417135 = r417134 * r417118;
double r417136 = r417135 * r417118;
double r417137 = r417136 * r417118;
double r417138 = r417137 * r417118;
double r417139 = r417132 + r417138;
double r417140 = 20.0;
double r417141 = /* ERROR: no complex support in C */;
double r417142 = r417141 * r417118;
double r417143 = r417142 * r417118;
double r417144 = r417143 * r417118;
double r417145 = r417139 + r417144;
double r417146 = r417145 + r417136;
double r417147 = r417146 + r417127;
double r417148 = /* ERROR: no complex support in C */;
double r417149 = r417147 + r417148;
double r417150 = /* ERROR: no complex support in C */;
return r417150;
}
double f() {
double r417151 = -1.0;
return r417151;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019153
(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))))