\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(7 + 0.0 i\right) + \left(\left(\left(4 + 0.0 i\right) + \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\left(\frac{1}{2} \cdot \left(\frac{1}{2} + 2\right) - \frac{\sqrt{3}}{2} \cdot \left(\frac{\sqrt{3}}{2} + 0.0\right)\right) + \left(\left(\frac{\sqrt{3}}{2} + 0.0\right) \cdot \frac{-1}{2} + \frac{\sqrt{3}}{2} \cdot \left(-\left(\frac{1}{2} + 2\right)\right)\right) i\right) + \left(5 + 0.0 i\right)\right)\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\right))double f() {
double r1926960 = 1.0;
double r1926961 = -r1926960;
double r1926962 = 2.0;
double r1926963 = r1926961 / r1926962;
double r1926964 = 3.0;
double r1926965 = sqrt(r1926964);
double r1926966 = r1926965 / r1926962;
double r1926967 = /* ERROR: no complex support in C */;
double r1926968 = r1926967 * r1926967;
double r1926969 = r1926968 * r1926967;
double r1926970 = r1926969 * r1926967;
double r1926971 = -r1926962;
double r1926972 = 0.0;
double r1926973 = /* ERROR: no complex support in C */;
double r1926974 = r1926973 * r1926967;
double r1926975 = r1926974 * r1926967;
double r1926976 = r1926975 * r1926967;
double r1926977 = r1926970 + r1926976;
double r1926978 = 5.0;
double r1926979 = /* ERROR: no complex support in C */;
double r1926980 = r1926979 * r1926967;
double r1926981 = r1926980 * r1926967;
double r1926982 = r1926977 + r1926981;
double r1926983 = 4.0;
double r1926984 = /* ERROR: no complex support in C */;
double r1926985 = r1926984 * r1926967;
double r1926986 = r1926982 + r1926985;
double r1926987 = 7.0;
double r1926988 = /* ERROR: no complex support in C */;
double r1926989 = r1926986 + r1926988;
double r1926990 = /* ERROR: no complex support in C */;
return r1926990;
}
double f() {
double r1926991 = 7.0;
double r1926992 = 0.0;
double r1926993 = /* ERROR: no complex support in C */;
double r1926994 = 4.0;
double r1926995 = /* ERROR: no complex support in C */;
double r1926996 = 1.0;
double r1926997 = -r1926996;
double r1926998 = 2.0;
double r1926999 = r1926997 / r1926998;
double r1927000 = 3.0;
double r1927001 = sqrt(r1927000);
double r1927002 = r1927001 / r1926998;
double r1927003 = /* ERROR: no complex support in C */;
double r1927004 = r1926996 / r1926998;
double r1927005 = r1927004 + r1926998;
double r1927006 = r1927004 * r1927005;
double r1927007 = r1927002 + r1926992;
double r1927008 = r1927002 * r1927007;
double r1927009 = r1927006 - r1927008;
double r1927010 = r1927007 * r1926999;
double r1927011 = -r1927005;
double r1927012 = r1927002 * r1927011;
double r1927013 = r1927010 + r1927012;
double r1927014 = /* ERROR: no complex support in C */;
double r1927015 = 5.0;
double r1927016 = /* ERROR: no complex support in C */;
double r1927017 = r1927014 + r1927016;
double r1927018 = r1927003 * r1927017;
double r1927019 = r1926995 + r1927018;
double r1927020 = r1927019 * r1927003;
double r1927021 = r1926993 + r1927020;
double r1927022 = /* ERROR: no complex support in C */;
return r1927022;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019172 +o rules:numerics
(FPCore ()
:name "3.9.2 real part (p56)"
(re (+ (+ (+ (+ (* (* (* (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (* (* (* (complex (- 2.0) 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (* (* (complex 5.0 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0))) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (* (complex 4.0 0.0) (complex (/ (- 1.0) 2.0) (/ (sqrt 3.0) 2.0)))) (complex 7.0 0.0))))