double f() {
double r1370265 = 1.0;
double r1370266 = -r1370265;
double r1370267 = 2.0;
double r1370268 = r1370266 / r1370267;
double r1370269 = 3.0;
double r1370270 = sqrt(r1370269);
double r1370271 = r1370270 / r1370267;
double r1370272 = /* ERROR: no complex support in C */;
double r1370273 = r1370272 * r1370272;
double r1370274 = r1370273 * r1370272;
double r1370275 = r1370274 * r1370272;
double r1370276 = -r1370267;
double r1370277 = 0.0;
double r1370278 = /* ERROR: no complex support in C */;
double r1370279 = r1370278 * r1370272;
double r1370280 = r1370279 * r1370272;
double r1370281 = r1370280 * r1370272;
double r1370282 = r1370275 + r1370281;
double r1370283 = 5.0;
double r1370284 = /* ERROR: no complex support in C */;
double r1370285 = r1370284 * r1370272;
double r1370286 = r1370285 * r1370272;
double r1370287 = r1370282 + r1370286;
double r1370288 = 4.0;
double r1370289 = /* ERROR: no complex support in C */;
double r1370290 = r1370289 * r1370272;
double r1370291 = r1370287 + r1370290;
double r1370292 = 7.0;
double r1370293 = /* ERROR: no complex support in C */;
double r1370294 = r1370291 + r1370293;
double r1370295 = /* ERROR: no complex support in C */;
return r1370295;
}
double f() {
double r1370296 = 5.0;
double r1370297 = 3.0;
double r1370298 = sqrt(r1370297);
double r1370299 = 2.0;
double r1370300 = r1370298 / r1370299;
double r1370301 = 4.0;
double r1370302 = r1370300 * r1370301;
double r1370303 = /* ERROR: no complex support in C */;
double r1370304 = 0.25;
double r1370305 = r1370300 * r1370300;
double r1370306 = r1370304 - r1370305;
double r1370307 = -r1370298;
double r1370308 = r1370307 / r1370299;
double r1370309 = /* ERROR: no complex support in C */;
double r1370310 = 6.0;
double r1370311 = -2.0;
double r1370312 = r1370311 * r1370298;
double r1370313 = r1370312 / r1370299;
double r1370314 = /* ERROR: no complex support in C */;
double r1370315 = r1370314 + r1370309;
double r1370316 = r1370309 * r1370315;
double r1370317 = r1370303 + r1370316;
double r1370318 = /* ERROR: no complex support in C */;
return r1370318;
}
\Re(\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) + \left(\left(\left(\left(-2\right) + 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) + \left(\left(5 + 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) + \left(4 + 0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(7 + 0 i\right)\right))\Re(\left(\left(5 + \frac{\sqrt{3}}{2} \cdot 4 i\right) + \left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right) \cdot \left(\left(6 + \frac{-2 \cdot \sqrt{3}}{2} i\right) + \left(\left(\frac{1}{4} - \frac{\sqrt{3}}{2} \cdot \frac{\sqrt{3}}{2}\right) + \frac{-\sqrt{3}}{2} i\right)\right)\right))Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019101 +o rules:numerics
(FPCore ()
:name "3.9.2 real part (p56)"
(re (+.c (+.c (+.c (+.c (*.c (*.c (*.c (complex (/ (- 1) 2) (/ (sqrt 3) 2)) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (*.c (*.c (*.c (complex (- 2) 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (*.c (*.c (complex 5 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2))) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (*.c (complex 4 0) (complex (/ (- 1) 2) (/ (sqrt 3) 2)))) (complex 7 0))))