\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 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 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 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right) + \left(7 + 0 i\right)\right))\Re(\left(\left(\frac{11}{2} + \left(\left(-\sqrt{3}\right) - \frac{\sqrt{3}}{2}\right) i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{-2} i\right) + \left(5 + \sqrt{3} \cdot 2 i\right)\right))double f() {
double r337938 = 1.0;
double r337939 = -r337938;
double r337940 = 2.0;
double r337941 = r337939 / r337940;
double r337942 = 3.0;
double r337943 = sqrt(r337942);
double r337944 = r337943 / r337940;
double r337945 = /* ERROR: no complex support in C */;
double r337946 = r337945 * r337945;
double r337947 = r337946 * r337945;
double r337948 = r337947 * r337945;
double r337949 = -r337940;
double r337950 = 0.0;
double r337951 = /* ERROR: no complex support in C */;
double r337952 = r337951 * r337945;
double r337953 = r337952 * r337945;
double r337954 = r337953 * r337945;
double r337955 = r337948 + r337954;
double r337956 = 5.0;
double r337957 = /* ERROR: no complex support in C */;
double r337958 = r337957 * r337945;
double r337959 = r337958 * r337945;
double r337960 = r337955 + r337959;
double r337961 = 4.0;
double r337962 = /* ERROR: no complex support in C */;
double r337963 = r337962 * r337945;
double r337964 = r337960 + r337963;
double r337965 = 7.0;
double r337966 = /* ERROR: no complex support in C */;
double r337967 = r337964 + r337966;
double r337968 = /* ERROR: no complex support in C */;
return r337968;
}
double f() {
double r337969 = 5.5;
double r337970 = 3.0;
double r337971 = sqrt(r337970);
double r337972 = -r337971;
double r337973 = 2.0;
double r337974 = r337971 / r337973;
double r337975 = r337972 - r337974;
double r337976 = /* ERROR: no complex support in C */;
double r337977 = -0.5;
double r337978 = -2.0;
double r337979 = r337971 / r337978;
double r337980 = /* ERROR: no complex support in C */;
double r337981 = r337976 * r337980;
double r337982 = 5.0;
double r337983 = r337971 * r337973;
double r337984 = /* ERROR: no complex support in C */;
double r337985 = r337981 + r337984;
double r337986 = /* ERROR: no complex support in C */;
return r337986;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019142
(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))))