\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 r21185 = 1.0;
double r21186 = -r21185;
double r21187 = 2.0;
double r21188 = r21186 / r21187;
double r21189 = 3.0;
double r21190 = sqrt(r21189);
double r21191 = r21190 / r21187;
double r21192 = /* ERROR: no complex support in C */;
double r21193 = r21192 * r21192;
double r21194 = r21193 * r21192;
double r21195 = r21194 * r21192;
double r21196 = -r21187;
double r21197 = 0.0;
double r21198 = /* ERROR: no complex support in C */;
double r21199 = r21198 * r21192;
double r21200 = r21199 * r21192;
double r21201 = r21200 * r21192;
double r21202 = r21195 + r21201;
double r21203 = 5.0;
double r21204 = /* ERROR: no complex support in C */;
double r21205 = r21204 * r21192;
double r21206 = r21205 * r21192;
double r21207 = r21202 + r21206;
double r21208 = 4.0;
double r21209 = /* ERROR: no complex support in C */;
double r21210 = r21209 * r21192;
double r21211 = r21207 + r21210;
double r21212 = 7.0;
double r21213 = /* ERROR: no complex support in C */;
double r21214 = r21211 + r21213;
double r21215 = /* ERROR: no complex support in C */;
return r21215;
}
double f() {
double r21216 = 1.0;
double r21217 = -r21216;
double r21218 = 2.0;
double r21219 = r21217 / r21218;
double r21220 = 3.0;
double r21221 = sqrt(r21220);
double r21222 = r21221 / r21218;
double r21223 = /* ERROR: no complex support in C */;
double r21224 = 4.0;
double r21225 = 0.0;
double r21226 = /* ERROR: no complex support in C */;
double r21227 = 5.0;
double r21228 = /* ERROR: no complex support in C */;
double r21229 = r21216 / r21218;
double r21230 = r21229 + r21218;
double r21231 = -r21230;
double r21232 = r21222 + r21225;
double r21233 = /* ERROR: no complex support in C */;
double r21234 = r21223 * r21233;
double r21235 = r21228 + r21234;
double r21236 = r21223 * r21235;
double r21237 = r21226 + r21236;
double r21238 = r21223 * r21237;
double r21239 = 7.0;
double r21240 = /* ERROR: no complex support in C */;
double r21241 = r21238 + r21240;
double r21242 = /* ERROR: no complex support in C */;
return r21242;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019326
(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))))