\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 r24305 = -1.0;
double r24306 = 1.0;
double r24307 = /* ERROR: no complex support in C */;
double r24308 = r24307 * r24307;
double r24309 = r24308 * r24307;
double r24310 = r24309 * r24307;
double r24311 = r24310 * r24307;
double r24312 = r24311 * r24307;
double r24313 = 6.0;
double r24314 = 0.0;
double r24315 = /* ERROR: no complex support in C */;
double r24316 = r24315 * r24307;
double r24317 = r24316 * r24307;
double r24318 = r24317 * r24307;
double r24319 = r24318 * r24307;
double r24320 = r24319 * r24307;
double r24321 = r24312 + r24320;
double r24322 = 15.0;
double r24323 = /* ERROR: no complex support in C */;
double r24324 = r24323 * r24307;
double r24325 = r24324 * r24307;
double r24326 = r24325 * r24307;
double r24327 = r24326 * r24307;
double r24328 = r24321 + r24327;
double r24329 = 20.0;
double r24330 = /* ERROR: no complex support in C */;
double r24331 = r24330 * r24307;
double r24332 = r24331 * r24307;
double r24333 = r24332 * r24307;
double r24334 = r24328 + r24333;
double r24335 = r24334 + r24325;
double r24336 = r24335 + r24316;
double r24337 = /* ERROR: no complex support in C */;
double r24338 = r24336 + r24337;
double r24339 = /* ERROR: no complex support in C */;
return r24339;
}
double f() {
double r24340 = -1.0;
double r24341 = 1.0;
double r24342 = /* ERROR: no complex support in C */;
double r24343 = 15.0;
double r24344 = 0.0;
double r24345 = /* ERROR: no complex support in C */;
double r24346 = r24345 * r24342;
double r24347 = 6.0;
double r24348 = /* ERROR: no complex support in C */;
double r24349 = r24346 + r24348;
double r24350 = r24342 * r24349;
double r24351 = /* ERROR: no complex support in C */;
double r24352 = r24350 + r24351;
double r24353 = r24342 * r24342;
double r24354 = 20.0;
double r24355 = /* ERROR: no complex support in C */;
double r24356 = r24346 + r24355;
double r24357 = r24342 * r24356;
double r24358 = r24353 * r24342;
double r24359 = r24342 + r24348;
double r24360 = r24358 * r24359;
double r24361 = r24357 + r24360;
double r24362 = r24353 * r24361;
double r24363 = r24352 + r24362;
double r24364 = /* ERROR: no complex support in C */;
return r24364;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019198
(FPCore ()
:name "3.9.1 real part (p56)"
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1.0 1.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (* (* (* (* (* (complex 6.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (* (* (complex 15.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (* (complex 20.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (complex 15.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (complex 6.0 0.0) (complex -1.0 1.0))) (complex 1.0 0.0))))