\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 r22034 = 1.0;
double r22035 = -r22034;
double r22036 = 2.0;
double r22037 = r22035 / r22036;
double r22038 = 3.0;
double r22039 = sqrt(r22038);
double r22040 = r22039 / r22036;
double r22041 = /* ERROR: no complex support in C */;
double r22042 = r22041 * r22041;
double r22043 = r22042 * r22041;
double r22044 = r22043 * r22041;
double r22045 = -r22036;
double r22046 = 0.0;
double r22047 = /* ERROR: no complex support in C */;
double r22048 = r22047 * r22041;
double r22049 = r22048 * r22041;
double r22050 = r22049 * r22041;
double r22051 = r22044 + r22050;
double r22052 = 5.0;
double r22053 = /* ERROR: no complex support in C */;
double r22054 = r22053 * r22041;
double r22055 = r22054 * r22041;
double r22056 = r22051 + r22055;
double r22057 = 4.0;
double r22058 = /* ERROR: no complex support in C */;
double r22059 = r22058 * r22041;
double r22060 = r22056 + r22059;
double r22061 = 7.0;
double r22062 = /* ERROR: no complex support in C */;
double r22063 = r22060 + r22062;
double r22064 = /* ERROR: no complex support in C */;
return r22064;
}
double f() {
double r22065 = 1.0;
double r22066 = -r22065;
double r22067 = 2.0;
double r22068 = r22066 / r22067;
double r22069 = 3.0;
double r22070 = sqrt(r22069);
double r22071 = r22070 / r22067;
double r22072 = /* ERROR: no complex support in C */;
double r22073 = 4.0;
double r22074 = 0.0;
double r22075 = /* ERROR: no complex support in C */;
double r22076 = 5.0;
double r22077 = /* ERROR: no complex support in C */;
double r22078 = r22065 / r22067;
double r22079 = r22078 + r22067;
double r22080 = -r22079;
double r22081 = r22071 + r22074;
double r22082 = /* ERROR: no complex support in C */;
double r22083 = r22072 * r22082;
double r22084 = r22077 + r22083;
double r22085 = r22072 * r22084;
double r22086 = r22075 + r22085;
double r22087 = r22072 * r22086;
double r22088 = 7.0;
double r22089 = /* ERROR: no complex support in C */;
double r22090 = r22087 + r22089;
double r22091 = /* ERROR: no complex support in C */;
return r22091;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019304
(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))))