\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 r34236 = -1.0;
double r34237 = 1.0;
double r34238 = /* ERROR: no complex support in C */;
double r34239 = r34238 * r34238;
double r34240 = r34239 * r34238;
double r34241 = r34240 * r34238;
double r34242 = r34241 * r34238;
double r34243 = r34242 * r34238;
double r34244 = 6.0;
double r34245 = 0.0;
double r34246 = /* ERROR: no complex support in C */;
double r34247 = r34246 * r34238;
double r34248 = r34247 * r34238;
double r34249 = r34248 * r34238;
double r34250 = r34249 * r34238;
double r34251 = r34250 * r34238;
double r34252 = r34243 + r34251;
double r34253 = 15.0;
double r34254 = /* ERROR: no complex support in C */;
double r34255 = r34254 * r34238;
double r34256 = r34255 * r34238;
double r34257 = r34256 * r34238;
double r34258 = r34257 * r34238;
double r34259 = r34252 + r34258;
double r34260 = 20.0;
double r34261 = /* ERROR: no complex support in C */;
double r34262 = r34261 * r34238;
double r34263 = r34262 * r34238;
double r34264 = r34263 * r34238;
double r34265 = r34259 + r34264;
double r34266 = r34265 + r34256;
double r34267 = r34266 + r34247;
double r34268 = /* ERROR: no complex support in C */;
double r34269 = r34267 + r34268;
double r34270 = /* ERROR: no complex support in C */;
return r34270;
}
double f() {
double r34271 = -1.0;
double r34272 = 1.0;
double r34273 = /* ERROR: no complex support in C */;
double r34274 = r34273 * r34273;
double r34275 = r34274 * r34273;
double r34276 = r34275 * r34273;
double r34277 = r34276 * r34273;
double r34278 = r34277 * r34273;
double r34279 = 6.0;
double r34280 = 0.0;
double r34281 = /* ERROR: no complex support in C */;
double r34282 = r34281 * r34273;
double r34283 = r34282 * r34273;
double r34284 = r34283 * r34273;
double r34285 = r34284 * r34273;
double r34286 = r34285 * r34273;
double r34287 = r34278 + r34286;
double r34288 = 15.0;
double r34289 = /* ERROR: no complex support in C */;
double r34290 = r34289 * r34273;
double r34291 = r34290 * r34273;
double r34292 = r34291 * r34273;
double r34293 = r34292 * r34273;
double r34294 = r34287 + r34293;
double r34295 = 20.0;
double r34296 = /* ERROR: no complex support in C */;
double r34297 = r34296 * r34273;
double r34298 = r34297 * r34273;
double r34299 = r34298 * r34273;
double r34300 = r34294 + r34299;
double r34301 = r34300 + r34291;
double r34302 = r34301 + r34282;
double r34303 = /* ERROR: no complex support in C */;
double r34304 = r34302 + r34303;
double r34305 = /* ERROR: no complex support in C */;
return r34305;
}
Initial program 0
Final simplification0
herbie shell --seed 2020039
(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))))