\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 r10348 = -1.0;
double r10349 = 1.0;
double r10350 = /* ERROR: no complex support in C */;
double r10351 = r10350 * r10350;
double r10352 = r10351 * r10350;
double r10353 = r10352 * r10350;
double r10354 = r10353 * r10350;
double r10355 = r10354 * r10350;
double r10356 = 6.0;
double r10357 = 0.0;
double r10358 = /* ERROR: no complex support in C */;
double r10359 = r10358 * r10350;
double r10360 = r10359 * r10350;
double r10361 = r10360 * r10350;
double r10362 = r10361 * r10350;
double r10363 = r10362 * r10350;
double r10364 = r10355 + r10363;
double r10365 = 15.0;
double r10366 = /* ERROR: no complex support in C */;
double r10367 = r10366 * r10350;
double r10368 = r10367 * r10350;
double r10369 = r10368 * r10350;
double r10370 = r10369 * r10350;
double r10371 = r10364 + r10370;
double r10372 = 20.0;
double r10373 = /* ERROR: no complex support in C */;
double r10374 = r10373 * r10350;
double r10375 = r10374 * r10350;
double r10376 = r10375 * r10350;
double r10377 = r10371 + r10376;
double r10378 = r10377 + r10368;
double r10379 = r10378 + r10359;
double r10380 = /* ERROR: no complex support in C */;
double r10381 = r10379 + r10380;
double r10382 = /* ERROR: no complex support in C */;
return r10382;
}
double f() {
double r10383 = -1.0;
double r10384 = 1.0;
double r10385 = /* ERROR: no complex support in C */;
double r10386 = r10385 * r10385;
double r10387 = r10386 * r10385;
double r10388 = r10387 * r10385;
double r10389 = r10388 * r10385;
double r10390 = r10389 * r10385;
double r10391 = 6.0;
double r10392 = 0.0;
double r10393 = /* ERROR: no complex support in C */;
double r10394 = r10393 * r10385;
double r10395 = r10394 * r10385;
double r10396 = r10395 * r10385;
double r10397 = r10396 * r10385;
double r10398 = r10397 * r10385;
double r10399 = r10390 + r10398;
double r10400 = 15.0;
double r10401 = /* ERROR: no complex support in C */;
double r10402 = r10401 * r10385;
double r10403 = r10402 * r10385;
double r10404 = r10403 * r10385;
double r10405 = r10404 * r10385;
double r10406 = r10399 + r10405;
double r10407 = 20.0;
double r10408 = /* ERROR: no complex support in C */;
double r10409 = r10408 * r10385;
double r10410 = r10409 * r10385;
double r10411 = r10410 * r10385;
double r10412 = r10406 + r10411;
double r10413 = r10412 + r10403;
double r10414 = r10413 + r10394;
double r10415 = /* ERROR: no complex support in C */;
double r10416 = r10414 + r10415;
double r10417 = /* ERROR: no complex support in C */;
return r10417;
}
Initial program 0
Final simplification0
herbie shell --seed 2019325 +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))))