\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(\left(4 + 0.0 i\right) + \left(\left(\left(5 + 0.0 i\right) + \left(\left(\left(-\frac{1}{2}\right) + \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) \cdot \left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right)\right)\right) \cdot \left(\left(-\frac{1}{2}\right) + \frac{\sqrt{3}}{2} i\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r26989 = 1.0;
double r26990 = -r26989;
double r26991 = 2.0;
double r26992 = r26990 / r26991;
double r26993 = 3.0;
double r26994 = sqrt(r26993);
double r26995 = r26994 / r26991;
double r26996 = /* ERROR: no complex support in C */;
double r26997 = r26996 * r26996;
double r26998 = r26997 * r26996;
double r26999 = r26998 * r26996;
double r27000 = -r26991;
double r27001 = 0.0;
double r27002 = /* ERROR: no complex support in C */;
double r27003 = r27002 * r26996;
double r27004 = r27003 * r26996;
double r27005 = r27004 * r26996;
double r27006 = r26999 + r27005;
double r27007 = 5.0;
double r27008 = /* ERROR: no complex support in C */;
double r27009 = r27008 * r26996;
double r27010 = r27009 * r26996;
double r27011 = r27006 + r27010;
double r27012 = 4.0;
double r27013 = /* ERROR: no complex support in C */;
double r27014 = r27013 * r26996;
double r27015 = r27011 + r27014;
double r27016 = 7.0;
double r27017 = /* ERROR: no complex support in C */;
double r27018 = r27015 + r27017;
double r27019 = /* ERROR: no complex support in C */;
return r27019;
}
double f() {
double r27020 = 4.0;
double r27021 = 0.0;
double r27022 = /* ERROR: no complex support in C */;
double r27023 = 5.0;
double r27024 = /* ERROR: no complex support in C */;
double r27025 = 1.0;
double r27026 = 2.0;
double r27027 = r27025 / r27026;
double r27028 = -r27027;
double r27029 = 3.0;
double r27030 = sqrt(r27029);
double r27031 = r27030 / r27026;
double r27032 = /* ERROR: no complex support in C */;
double r27033 = r27027 + r27026;
double r27034 = -r27033;
double r27035 = r27031 + r27021;
double r27036 = /* ERROR: no complex support in C */;
double r27037 = r27032 * r27036;
double r27038 = r27024 + r27037;
double r27039 = r27038 * r27032;
double r27040 = r27022 + r27039;
double r27041 = r27040 * r27032;
double r27042 = 7.0;
double r27043 = /* ERROR: no complex support in C */;
double r27044 = r27041 + r27043;
double r27045 = /* ERROR: no complex support in C */;
return r27045;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019174 +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))))