\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(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) + \left(\left(-2\right) + 0.0 i\right)\right)\right)\right)\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r21202 = 1.0;
double r21203 = -r21202;
double r21204 = 2.0;
double r21205 = r21203 / r21204;
double r21206 = 3.0;
double r21207 = sqrt(r21206);
double r21208 = r21207 / r21204;
double r21209 = /* ERROR: no complex support in C */;
double r21210 = r21209 * r21209;
double r21211 = r21210 * r21209;
double r21212 = r21211 * r21209;
double r21213 = -r21204;
double r21214 = 0.0;
double r21215 = /* ERROR: no complex support in C */;
double r21216 = r21215 * r21209;
double r21217 = r21216 * r21209;
double r21218 = r21217 * r21209;
double r21219 = r21212 + r21218;
double r21220 = 5.0;
double r21221 = /* ERROR: no complex support in C */;
double r21222 = r21221 * r21209;
double r21223 = r21222 * r21209;
double r21224 = r21219 + r21223;
double r21225 = 4.0;
double r21226 = /* ERROR: no complex support in C */;
double r21227 = r21226 * r21209;
double r21228 = r21224 + r21227;
double r21229 = 7.0;
double r21230 = /* ERROR: no complex support in C */;
double r21231 = r21228 + r21230;
double r21232 = /* ERROR: no complex support in C */;
return r21232;
}
double f() {
double r21233 = 1.0;
double r21234 = -r21233;
double r21235 = 2.0;
double r21236 = r21234 / r21235;
double r21237 = 3.0;
double r21238 = sqrt(r21237);
double r21239 = r21238 / r21235;
double r21240 = /* ERROR: no complex support in C */;
double r21241 = 4.0;
double r21242 = 0.0;
double r21243 = /* ERROR: no complex support in C */;
double r21244 = 5.0;
double r21245 = /* ERROR: no complex support in C */;
double r21246 = -r21235;
double r21247 = /* ERROR: no complex support in C */;
double r21248 = r21240 + r21247;
double r21249 = r21240 * r21248;
double r21250 = r21245 + r21249;
double r21251 = r21240 * r21250;
double r21252 = r21243 + r21251;
double r21253 = r21240 * r21252;
double r21254 = 7.0;
double r21255 = /* ERROR: no complex support in C */;
double r21256 = r21253 + r21255;
double r21257 = /* ERROR: no complex support in C */;
return r21257;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019323
(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))))