\Im(\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))
\Im(\left(-1 + 0 i\right))
double f() {
double r472273 = -1.0;
double r472274 = 1.0;
double r472275 = /* ERROR: no complex support in C */;
double r472276 = r472275 * r472275;
double r472277 = r472276 * r472275;
double r472278 = r472277 * r472275;
double r472279 = r472278 * r472275;
double r472280 = r472279 * r472275;
double r472281 = 6.0;
double r472282 = 0.0;
double r472283 = /* ERROR: no complex support in C */;
double r472284 = r472283 * r472275;
double r472285 = r472284 * r472275;
double r472286 = r472285 * r472275;
double r472287 = r472286 * r472275;
double r472288 = r472287 * r472275;
double r472289 = r472280 + r472288;
double r472290 = 15.0;
double r472291 = /* ERROR: no complex support in C */;
double r472292 = r472291 * r472275;
double r472293 = r472292 * r472275;
double r472294 = r472293 * r472275;
double r472295 = r472294 * r472275;
double r472296 = r472289 + r472295;
double r472297 = 20.0;
double r472298 = /* ERROR: no complex support in C */;
double r472299 = r472298 * r472275;
double r472300 = r472299 * r472275;
double r472301 = r472300 * r472275;
double r472302 = r472296 + r472301;
double r472303 = r472302 + r472293;
double r472304 = r472303 + r472284;
double r472305 = /* ERROR: no complex support in C */;
double r472306 = r472304 + r472305;
double r472307 = /* ERROR: no complex support in C */;
return r472307;
}
double f() {
double r472308 = -1.0;
double r472309 = 0.0;
double r472310 = /* ERROR: no complex support in C */;
double r472311 = /* ERROR: no complex support in C */;
return r472311;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019146
(FPCore ()
:name "3.9.1 imaginary part (p56)"
(im (+.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))))