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