\Re(\left(\left(\left(\left(\left(\left(\left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(\left(\left(\left(\left(-2\right) + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(\left(5 + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(\left(4 + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(7 + 0.0 i\right)\right))\Re(\left(\left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(4 + 0.0 i\right) + \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(5 + 0.0 i\right) + \left(\left(\frac{-1}{2} \cdot \left(-\left(\frac{1}{2} + 2\right)\right) - \frac{\sqrt{3}}{2} \cdot \left(\frac{\sqrt{3}}{2} + 0.0\right)\right) + \left(\frac{-1}{2} \cdot \left(\frac{\sqrt{3}}{2} + 0.0\right) + \frac{\sqrt{3}}{2} \cdot \left(-\left(\frac{1}{2} + 2\right)\right)\right) i\right)\right)\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r3175468 = 1.0;
double r3175469 = -r3175468;
double r3175470 = 2.0;
double r3175471 = r3175469 / r3175470;
double r3175472 = 3.0;
double r3175473 = sqrt(r3175472);
double r3175474 = r3175473 / r3175470;
double r3175475 = /* ERROR: no complex support in C */;
double r3175476 = r3175475 * r3175475;
double r3175477 = r3175476 * r3175475;
double r3175478 = r3175477 * r3175475;
double r3175479 = -r3175470;
double r3175480 = 0.0;
double r3175481 = /* ERROR: no complex support in C */;
double r3175482 = r3175481 * r3175475;
double r3175483 = r3175482 * r3175475;
double r3175484 = r3175483 * r3175475;
double r3175485 = r3175478 + r3175484;
double r3175486 = 5.0;
double r3175487 = /* ERROR: no complex support in C */;
double r3175488 = r3175487 * r3175475;
double r3175489 = r3175488 * r3175475;
double r3175490 = r3175485 + r3175489;
double r3175491 = 4.0;
double r3175492 = /* ERROR: no complex support in C */;
double r3175493 = r3175492 * r3175475;
double r3175494 = r3175490 + r3175493;
double r3175495 = 7.0;
double r3175496 = /* ERROR: no complex support in C */;
double r3175497 = r3175494 + r3175496;
double r3175498 = /* ERROR: no complex support in C */;
return r3175498;
}
double f() {
double r3175499 = 1.0;
double r3175500 = -r3175499;
double r3175501 = 2.0;
double r3175502 = r3175500 / r3175501;
double r3175503 = 3.0;
double r3175504 = sqrt(r3175503);
double r3175505 = r3175504 / r3175501;
double r3175506 = /* ERROR: no complex support in C */;
double r3175507 = 4.0;
double r3175508 = 0.0;
double r3175509 = /* ERROR: no complex support in C */;
double r3175510 = 5.0;
double r3175511 = /* ERROR: no complex support in C */;
double r3175512 = r3175499 / r3175501;
double r3175513 = r3175512 + r3175501;
double r3175514 = -r3175513;
double r3175515 = r3175502 * r3175514;
double r3175516 = r3175505 + r3175508;
double r3175517 = r3175505 * r3175516;
double r3175518 = r3175515 - r3175517;
double r3175519 = r3175502 * r3175516;
double r3175520 = r3175505 * r3175514;
double r3175521 = r3175519 + r3175520;
double r3175522 = /* ERROR: no complex support in C */;
double r3175523 = r3175511 + r3175522;
double r3175524 = r3175506 * r3175523;
double r3175525 = r3175509 + r3175524;
double r3175526 = r3175506 * r3175525;
double r3175527 = 7.0;
double r3175528 = /* ERROR: no complex support in C */;
double r3175529 = r3175526 + r3175528;
double r3175530 = /* ERROR: no complex support in C */;
return r3175530;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019174
(FPCore ()
:name "3.9.2 real part (p56)"
(re (+ (+ (+ (+ (* (* (* (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (* (* (* (complex (- 2.0) 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (* (* (complex 5.0 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (* (complex 4.0 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (complex 7.0 0.0))))