\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(\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 r36285 = -1.0;
double r36286 = 1.0;
double r36287 = /* ERROR: no complex support in C */;
double r36288 = r36287 * r36287;
double r36289 = r36288 * r36287;
double r36290 = r36289 * r36287;
double r36291 = r36290 * r36287;
double r36292 = r36291 * r36287;
double r36293 = 6.0;
double r36294 = 0.0;
double r36295 = /* ERROR: no complex support in C */;
double r36296 = r36295 * r36287;
double r36297 = r36296 * r36287;
double r36298 = r36297 * r36287;
double r36299 = r36298 * r36287;
double r36300 = r36299 * r36287;
double r36301 = r36292 + r36300;
double r36302 = 15.0;
double r36303 = /* ERROR: no complex support in C */;
double r36304 = r36303 * r36287;
double r36305 = r36304 * r36287;
double r36306 = r36305 * r36287;
double r36307 = r36306 * r36287;
double r36308 = r36301 + r36307;
double r36309 = 20.0;
double r36310 = /* ERROR: no complex support in C */;
double r36311 = r36310 * r36287;
double r36312 = r36311 * r36287;
double r36313 = r36312 * r36287;
double r36314 = r36308 + r36313;
double r36315 = r36314 + r36305;
double r36316 = r36315 + r36296;
double r36317 = /* ERROR: no complex support in C */;
double r36318 = r36316 + r36317;
double r36319 = /* ERROR: no complex support in C */;
return r36319;
}
double f() {
double r36320 = -1.0;
double r36321 = 1.0;
double r36322 = /* ERROR: no complex support in C */;
double r36323 = r36322 * r36322;
double r36324 = r36323 * r36322;
double r36325 = r36324 * r36322;
double r36326 = r36325 * r36322;
double r36327 = r36326 * r36322;
double r36328 = 6.0;
double r36329 = 0.0;
double r36330 = /* ERROR: no complex support in C */;
double r36331 = r36330 * r36322;
double r36332 = r36331 * r36322;
double r36333 = r36332 * r36322;
double r36334 = r36333 * r36322;
double r36335 = r36334 * r36322;
double r36336 = r36327 + r36335;
double r36337 = 15.0;
double r36338 = /* ERROR: no complex support in C */;
double r36339 = r36338 * r36322;
double r36340 = r36339 * r36322;
double r36341 = r36340 * r36322;
double r36342 = r36341 * r36322;
double r36343 = r36336 + r36342;
double r36344 = 20.0;
double r36345 = /* ERROR: no complex support in C */;
double r36346 = r36345 * r36322;
double r36347 = r36346 * r36322;
double r36348 = r36347 * r36322;
double r36349 = r36343 + r36348;
double r36350 = r36349 + r36340;
double r36351 = r36350 + r36331;
double r36352 = /* ERROR: no complex support in C */;
double r36353 = r36351 + r36352;
double r36354 = /* ERROR: no complex support in C */;
return r36354;
}
Initial program 0
Final simplification0
herbie shell --seed 2020056 +o rules:numerics
(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))))