\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.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))
\Re(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(6 + 0.0 i\right)\right)\right) + \left(1 + 0.0 i\right)\right) + \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(20 + 0.0 i\right)\right)\right) + \left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(-1 + 1 i\right) + \left(6 + 0.0 i\right)\right)\right)\right)\right)\right))
double f() {
double r10271 = -1.0;
double r10272 = 1.0;
double r10273 = /* ERROR: no complex support in C */;
double r10274 = r10273 * r10273;
double r10275 = r10274 * r10273;
double r10276 = r10275 * r10273;
double r10277 = r10276 * r10273;
double r10278 = r10277 * r10273;
double r10279 = 6.0;
double r10280 = 0.0;
double r10281 = /* ERROR: no complex support in C */;
double r10282 = r10281 * r10273;
double r10283 = r10282 * r10273;
double r10284 = r10283 * r10273;
double r10285 = r10284 * r10273;
double r10286 = r10285 * r10273;
double r10287 = r10278 + r10286;
double r10288 = 15.0;
double r10289 = /* ERROR: no complex support in C */;
double r10290 = r10289 * r10273;
double r10291 = r10290 * r10273;
double r10292 = r10291 * r10273;
double r10293 = r10292 * r10273;
double r10294 = r10287 + r10293;
double r10295 = 20.0;
double r10296 = /* ERROR: no complex support in C */;
double r10297 = r10296 * r10273;
double r10298 = r10297 * r10273;
double r10299 = r10298 * r10273;
double r10300 = r10294 + r10299;
double r10301 = r10300 + r10291;
double r10302 = r10301 + r10282;
double r10303 = /* ERROR: no complex support in C */;
double r10304 = r10302 + r10303;
double r10305 = /* ERROR: no complex support in C */;
return r10305;
}
double f() {
double r10306 = -1.0;
double r10307 = 1.0;
double r10308 = /* ERROR: no complex support in C */;
double r10309 = 15.0;
double r10310 = 0.0;
double r10311 = /* ERROR: no complex support in C */;
double r10312 = r10311 * r10308;
double r10313 = 6.0;
double r10314 = /* ERROR: no complex support in C */;
double r10315 = r10312 + r10314;
double r10316 = r10308 * r10315;
double r10317 = /* ERROR: no complex support in C */;
double r10318 = r10316 + r10317;
double r10319 = r10308 * r10308;
double r10320 = 20.0;
double r10321 = /* ERROR: no complex support in C */;
double r10322 = r10312 + r10321;
double r10323 = r10308 * r10322;
double r10324 = r10319 * r10308;
double r10325 = r10308 + r10314;
double r10326 = r10324 * r10325;
double r10327 = r10323 + r10326;
double r10328 = r10319 * r10327;
double r10329 = r10318 + r10328;
double r10330 = /* ERROR: no complex support in C */;
return r10330;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019209
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))