\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} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(-\left(\frac{1}{2} + 2\right)\right) + \left(\frac{\sqrt{3}}{2} + 0.0\right) i\right)\right)\right)\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r31366 = 1.0;
double r31367 = -r31366;
double r31368 = 2.0;
double r31369 = r31367 / r31368;
double r31370 = 3.0;
double r31371 = sqrt(r31370);
double r31372 = r31371 / r31368;
double r31373 = /* ERROR: no complex support in C */;
double r31374 = r31373 * r31373;
double r31375 = r31374 * r31373;
double r31376 = r31375 * r31373;
double r31377 = -r31368;
double r31378 = 0.0;
double r31379 = /* ERROR: no complex support in C */;
double r31380 = r31379 * r31373;
double r31381 = r31380 * r31373;
double r31382 = r31381 * r31373;
double r31383 = r31376 + r31382;
double r31384 = 5.0;
double r31385 = /* ERROR: no complex support in C */;
double r31386 = r31385 * r31373;
double r31387 = r31386 * r31373;
double r31388 = r31383 + r31387;
double r31389 = 4.0;
double r31390 = /* ERROR: no complex support in C */;
double r31391 = r31390 * r31373;
double r31392 = r31388 + r31391;
double r31393 = 7.0;
double r31394 = /* ERROR: no complex support in C */;
double r31395 = r31392 + r31394;
double r31396 = /* ERROR: no complex support in C */;
return r31396;
}
double f() {
double r31397 = 1.0;
double r31398 = -r31397;
double r31399 = 2.0;
double r31400 = r31398 / r31399;
double r31401 = 3.0;
double r31402 = sqrt(r31401);
double r31403 = r31402 / r31399;
double r31404 = /* ERROR: no complex support in C */;
double r31405 = 4.0;
double r31406 = 0.0;
double r31407 = /* ERROR: no complex support in C */;
double r31408 = 5.0;
double r31409 = /* ERROR: no complex support in C */;
double r31410 = r31397 / r31399;
double r31411 = r31410 + r31399;
double r31412 = -r31411;
double r31413 = r31403 + r31406;
double r31414 = /* ERROR: no complex support in C */;
double r31415 = r31404 * r31414;
double r31416 = r31409 + r31415;
double r31417 = r31404 * r31416;
double r31418 = r31407 + r31417;
double r31419 = r31404 * r31418;
double r31420 = 7.0;
double r31421 = /* ERROR: no complex support in C */;
double r31422 = r31419 + r31421;
double r31423 = /* ERROR: no complex support in C */;
return r31423;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019303
(FPCore ()
:name "3.9.2 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (* (* (* (complex (/ (- 1) 2) (/ (sqrt 3) 2)) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (* (* (* (complex (- 2) 0.0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (* (* (complex 5 0.0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (* (complex 4 0.0) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (complex 7 0.0))))