\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 r38186 = -1.0;
double r38187 = 1.0;
double r38188 = /* ERROR: no complex support in C */;
double r38189 = r38188 * r38188;
double r38190 = r38189 * r38188;
double r38191 = r38190 * r38188;
double r38192 = r38191 * r38188;
double r38193 = r38192 * r38188;
double r38194 = 6.0;
double r38195 = 0.0;
double r38196 = /* ERROR: no complex support in C */;
double r38197 = r38196 * r38188;
double r38198 = r38197 * r38188;
double r38199 = r38198 * r38188;
double r38200 = r38199 * r38188;
double r38201 = r38200 * r38188;
double r38202 = r38193 + r38201;
double r38203 = 15.0;
double r38204 = /* ERROR: no complex support in C */;
double r38205 = r38204 * r38188;
double r38206 = r38205 * r38188;
double r38207 = r38206 * r38188;
double r38208 = r38207 * r38188;
double r38209 = r38202 + r38208;
double r38210 = 20.0;
double r38211 = /* ERROR: no complex support in C */;
double r38212 = r38211 * r38188;
double r38213 = r38212 * r38188;
double r38214 = r38213 * r38188;
double r38215 = r38209 + r38214;
double r38216 = r38215 + r38206;
double r38217 = r38216 + r38197;
double r38218 = /* ERROR: no complex support in C */;
double r38219 = r38217 + r38218;
double r38220 = /* ERROR: no complex support in C */;
return r38220;
}
double f() {
double r38221 = -1.0;
return r38221;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019152
(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))))