\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.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.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.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.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
\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.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.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.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.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
double f() {
double r25241 = -1.0;
double r25242 = 1.0;
double r25243 = /* ERROR: no complex support in C */;
double r25244 = r25243 * r25243;
double r25245 = r25244 * r25243;
double r25246 = r25245 * r25243;
double r25247 = r25246 * r25243;
double r25248 = r25247 * r25243;
double r25249 = 6.0;
double r25250 = 0.0;
double r25251 = /* ERROR: no complex support in C */;
double r25252 = r25251 * r25243;
double r25253 = r25252 * r25243;
double r25254 = r25253 * r25243;
double r25255 = r25254 * r25243;
double r25256 = r25255 * r25243;
double r25257 = r25248 + r25256;
double r25258 = 15.0;
double r25259 = /* ERROR: no complex support in C */;
double r25260 = r25259 * r25243;
double r25261 = r25260 * r25243;
double r25262 = r25261 * r25243;
double r25263 = r25262 * r25243;
double r25264 = r25257 + r25263;
double r25265 = 20.0;
double r25266 = /* ERROR: no complex support in C */;
double r25267 = r25266 * r25243;
double r25268 = r25267 * r25243;
double r25269 = r25268 * r25243;
double r25270 = r25264 + r25269;
double r25271 = r25270 + r25261;
double r25272 = r25271 + r25252;
double r25273 = /* ERROR: no complex support in C */;
double r25274 = r25272 + r25273;
double r25275 = /* ERROR: no complex support in C */;
return r25275;
}
double f() {
double r25276 = -1.0;
double r25277 = 1.0;
double r25278 = /* ERROR: no complex support in C */;
double r25279 = r25278 * r25278;
double r25280 = r25279 * r25278;
double r25281 = r25280 * r25278;
double r25282 = r25281 * r25278;
double r25283 = r25282 * r25278;
double r25284 = 6.0;
double r25285 = 0.0;
double r25286 = /* ERROR: no complex support in C */;
double r25287 = r25286 * r25278;
double r25288 = r25287 * r25278;
double r25289 = r25288 * r25278;
double r25290 = r25289 * r25278;
double r25291 = r25290 * r25278;
double r25292 = r25283 + r25291;
double r25293 = 15.0;
double r25294 = /* ERROR: no complex support in C */;
double r25295 = r25294 * r25278;
double r25296 = r25295 * r25278;
double r25297 = r25296 * r25278;
double r25298 = r25297 * r25278;
double r25299 = r25292 + r25298;
double r25300 = 20.0;
double r25301 = /* ERROR: no complex support in C */;
double r25302 = r25301 * r25278;
double r25303 = r25302 * r25278;
double r25304 = r25303 * r25278;
double r25305 = r25299 + r25304;
double r25306 = r25305 + r25296;
double r25307 = r25306 + r25287;
double r25308 = /* ERROR: no complex support in C */;
double r25309 = r25307 + r25308;
double r25310 = /* ERROR: no complex support in C */;
return r25310;
}
Initial program 0
Final simplification0
herbie shell --seed 2019325 +o rules:numerics
(FPCore ()
:name "3.9.1 imaginary part (p56)"
:precision binary64
(im (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (* (* (* (* (* (complex 6 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (complex 20 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1))) (* (complex 6 0.0) (complex -1 1))) (complex 1 0.0))))