\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 r10218 = -1.0;
double r10219 = 1.0;
double r10220 = /* ERROR: no complex support in C */;
double r10221 = r10220 * r10220;
double r10222 = r10221 * r10220;
double r10223 = r10222 * r10220;
double r10224 = r10223 * r10220;
double r10225 = r10224 * r10220;
double r10226 = 6.0;
double r10227 = 0.0;
double r10228 = /* ERROR: no complex support in C */;
double r10229 = r10228 * r10220;
double r10230 = r10229 * r10220;
double r10231 = r10230 * r10220;
double r10232 = r10231 * r10220;
double r10233 = r10232 * r10220;
double r10234 = r10225 + r10233;
double r10235 = 15.0;
double r10236 = /* ERROR: no complex support in C */;
double r10237 = r10236 * r10220;
double r10238 = r10237 * r10220;
double r10239 = r10238 * r10220;
double r10240 = r10239 * r10220;
double r10241 = r10234 + r10240;
double r10242 = 20.0;
double r10243 = /* ERROR: no complex support in C */;
double r10244 = r10243 * r10220;
double r10245 = r10244 * r10220;
double r10246 = r10245 * r10220;
double r10247 = r10241 + r10246;
double r10248 = r10247 + r10238;
double r10249 = r10248 + r10229;
double r10250 = /* ERROR: no complex support in C */;
double r10251 = r10249 + r10250;
double r10252 = /* ERROR: no complex support in C */;
return r10252;
}
double f() {
double r10253 = -1.0;
double r10254 = 1.0;
double r10255 = /* ERROR: no complex support in C */;
double r10256 = r10255 * r10255;
double r10257 = r10256 * r10255;
double r10258 = r10257 * r10255;
double r10259 = r10258 * r10255;
double r10260 = r10259 * r10255;
double r10261 = 6.0;
double r10262 = 0.0;
double r10263 = /* ERROR: no complex support in C */;
double r10264 = r10263 * r10255;
double r10265 = r10264 * r10255;
double r10266 = r10265 * r10255;
double r10267 = r10266 * r10255;
double r10268 = r10267 * r10255;
double r10269 = r10260 + r10268;
double r10270 = 15.0;
double r10271 = /* ERROR: no complex support in C */;
double r10272 = r10271 * r10255;
double r10273 = r10272 * r10255;
double r10274 = r10273 * r10255;
double r10275 = r10274 * r10255;
double r10276 = r10269 + r10275;
double r10277 = 20.0;
double r10278 = /* ERROR: no complex support in C */;
double r10279 = r10278 * r10255;
double r10280 = r10279 * r10255;
double r10281 = r10280 * r10255;
double r10282 = r10276 + r10281;
double r10283 = r10282 + r10273;
double r10284 = r10283 + r10264;
double r10285 = /* ERROR: no complex support in C */;
double r10286 = r10284 + r10285;
double r10287 = /* ERROR: no complex support in C */;
return r10287;
}
Initial program 0
Final simplification0
herbie shell --seed 2019303
(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))))