\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 r27291 = 1.0;
double r27292 = -r27291;
double r27293 = 2.0;
double r27294 = r27292 / r27293;
double r27295 = 3.0;
double r27296 = sqrt(r27295);
double r27297 = r27296 / r27293;
double r27298 = /* ERROR: no complex support in C */;
double r27299 = r27298 * r27298;
double r27300 = r27299 * r27298;
double r27301 = r27300 * r27298;
double r27302 = -r27293;
double r27303 = 0.0;
double r27304 = /* ERROR: no complex support in C */;
double r27305 = r27304 * r27298;
double r27306 = r27305 * r27298;
double r27307 = r27306 * r27298;
double r27308 = r27301 + r27307;
double r27309 = 5.0;
double r27310 = /* ERROR: no complex support in C */;
double r27311 = r27310 * r27298;
double r27312 = r27311 * r27298;
double r27313 = r27308 + r27312;
double r27314 = 4.0;
double r27315 = /* ERROR: no complex support in C */;
double r27316 = r27315 * r27298;
double r27317 = r27313 + r27316;
double r27318 = 7.0;
double r27319 = /* ERROR: no complex support in C */;
double r27320 = r27317 + r27319;
double r27321 = /* ERROR: no complex support in C */;
return r27321;
}
double f() {
double r27322 = 1.0;
double r27323 = -r27322;
double r27324 = 2.0;
double r27325 = r27323 / r27324;
double r27326 = 3.0;
double r27327 = sqrt(r27326);
double r27328 = r27327 / r27324;
double r27329 = /* ERROR: no complex support in C */;
double r27330 = 4.0;
double r27331 = 0.0;
double r27332 = /* ERROR: no complex support in C */;
double r27333 = 5.0;
double r27334 = /* ERROR: no complex support in C */;
double r27335 = r27322 / r27324;
double r27336 = r27335 + r27324;
double r27337 = -r27336;
double r27338 = r27328 + r27331;
double r27339 = /* ERROR: no complex support in C */;
double r27340 = r27329 * r27339;
double r27341 = r27334 + r27340;
double r27342 = r27329 * r27341;
double r27343 = r27332 + r27342;
double r27344 = r27329 * r27343;
double r27345 = 7.0;
double r27346 = /* ERROR: no complex support in C */;
double r27347 = r27344 + r27346;
double r27348 = /* ERROR: no complex support in C */;
return r27348;
}
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))))