\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 r23334 = 1.0;
double r23335 = -r23334;
double r23336 = 2.0;
double r23337 = r23335 / r23336;
double r23338 = 3.0;
double r23339 = sqrt(r23338);
double r23340 = r23339 / r23336;
double r23341 = /* ERROR: no complex support in C */;
double r23342 = r23341 * r23341;
double r23343 = r23342 * r23341;
double r23344 = r23343 * r23341;
double r23345 = -r23336;
double r23346 = 0.0;
double r23347 = /* ERROR: no complex support in C */;
double r23348 = r23347 * r23341;
double r23349 = r23348 * r23341;
double r23350 = r23349 * r23341;
double r23351 = r23344 + r23350;
double r23352 = 5.0;
double r23353 = /* ERROR: no complex support in C */;
double r23354 = r23353 * r23341;
double r23355 = r23354 * r23341;
double r23356 = r23351 + r23355;
double r23357 = 4.0;
double r23358 = /* ERROR: no complex support in C */;
double r23359 = r23358 * r23341;
double r23360 = r23356 + r23359;
double r23361 = 7.0;
double r23362 = /* ERROR: no complex support in C */;
double r23363 = r23360 + r23362;
double r23364 = /* ERROR: no complex support in C */;
return r23364;
}
double f() {
double r23365 = 1.0;
double r23366 = -r23365;
double r23367 = 2.0;
double r23368 = r23366 / r23367;
double r23369 = 3.0;
double r23370 = sqrt(r23369);
double r23371 = r23370 / r23367;
double r23372 = /* ERROR: no complex support in C */;
double r23373 = 4.0;
double r23374 = 0.0;
double r23375 = /* ERROR: no complex support in C */;
double r23376 = 5.0;
double r23377 = /* ERROR: no complex support in C */;
double r23378 = r23365 / r23367;
double r23379 = r23378 + r23367;
double r23380 = -r23379;
double r23381 = r23371 + r23374;
double r23382 = /* ERROR: no complex support in C */;
double r23383 = r23372 * r23382;
double r23384 = r23377 + r23383;
double r23385 = r23372 * r23384;
double r23386 = r23375 + r23385;
double r23387 = r23372 * r23386;
double r23388 = 7.0;
double r23389 = /* ERROR: no complex support in C */;
double r23390 = r23387 + r23389;
double r23391 = /* ERROR: no complex support in C */;
return r23391;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019325
(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))))