\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(\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) + \left(4 + 0.0 i\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r10217 = 1.0;
double r10218 = -r10217;
double r10219 = 2.0;
double r10220 = r10218 / r10219;
double r10221 = 3.0;
double r10222 = sqrt(r10221);
double r10223 = r10222 / r10219;
double r10224 = /* ERROR: no complex support in C */;
double r10225 = r10224 * r10224;
double r10226 = r10225 * r10224;
double r10227 = r10226 * r10224;
double r10228 = -r10219;
double r10229 = 0.0;
double r10230 = /* ERROR: no complex support in C */;
double r10231 = r10230 * r10224;
double r10232 = r10231 * r10224;
double r10233 = r10232 * r10224;
double r10234 = r10227 + r10233;
double r10235 = 5.0;
double r10236 = /* ERROR: no complex support in C */;
double r10237 = r10236 * r10224;
double r10238 = r10237 * r10224;
double r10239 = r10234 + r10238;
double r10240 = 4.0;
double r10241 = /* ERROR: no complex support in C */;
double r10242 = r10241 * r10224;
double r10243 = r10239 + r10242;
double r10244 = 7.0;
double r10245 = /* ERROR: no complex support in C */;
double r10246 = r10243 + r10245;
double r10247 = /* ERROR: no complex support in C */;
return r10247;
}
double f() {
double r10248 = 1.0;
double r10249 = -r10248;
double r10250 = 2.0;
double r10251 = r10249 / r10250;
double r10252 = 3.0;
double r10253 = sqrt(r10252);
double r10254 = r10253 / r10250;
double r10255 = /* ERROR: no complex support in C */;
double r10256 = 5.0;
double r10257 = 0.0;
double r10258 = /* ERROR: no complex support in C */;
double r10259 = r10248 / r10250;
double r10260 = r10259 + r10250;
double r10261 = -r10260;
double r10262 = r10254 + r10257;
double r10263 = /* ERROR: no complex support in C */;
double r10264 = r10255 * r10263;
double r10265 = r10258 + r10264;
double r10266 = r10255 * r10265;
double r10267 = 4.0;
double r10268 = /* ERROR: no complex support in C */;
double r10269 = r10266 + r10268;
double r10270 = r10255 * r10269;
double r10271 = 7.0;
double r10272 = /* ERROR: no complex support in C */;
double r10273 = r10270 + r10272;
double r10274 = /* ERROR: no complex support in C */;
return r10274;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019198 +o rules:numerics
(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))))