\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(\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(\frac{-1}{2} - 2\right) + \left(\frac{\sqrt{3}}{2} + 0.0\right) i\right)\right)\right)\right) + \left(4 + 0.0 i\right)\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r23150 = 1.0;
double r23151 = -r23150;
double r23152 = 2.0;
double r23153 = r23151 / r23152;
double r23154 = 3.0;
double r23155 = sqrt(r23154);
double r23156 = r23155 / r23152;
double r23157 = /* ERROR: no complex support in C */;
double r23158 = r23157 * r23157;
double r23159 = r23158 * r23157;
double r23160 = r23159 * r23157;
double r23161 = -r23152;
double r23162 = 0.0;
double r23163 = /* ERROR: no complex support in C */;
double r23164 = r23163 * r23157;
double r23165 = r23164 * r23157;
double r23166 = r23165 * r23157;
double r23167 = r23160 + r23166;
double r23168 = 5.0;
double r23169 = /* ERROR: no complex support in C */;
double r23170 = r23169 * r23157;
double r23171 = r23170 * r23157;
double r23172 = r23167 + r23171;
double r23173 = 4.0;
double r23174 = /* ERROR: no complex support in C */;
double r23175 = r23174 * r23157;
double r23176 = r23172 + r23175;
double r23177 = 7.0;
double r23178 = /* ERROR: no complex support in C */;
double r23179 = r23176 + r23178;
double r23180 = /* ERROR: no complex support in C */;
return r23180;
}
double f() {
double r23181 = 1.0;
double r23182 = -r23181;
double r23183 = 2.0;
double r23184 = r23182 / r23183;
double r23185 = 3.0;
double r23186 = sqrt(r23185);
double r23187 = r23186 / r23183;
double r23188 = /* ERROR: no complex support in C */;
double r23189 = 5.0;
double r23190 = 0.0;
double r23191 = /* ERROR: no complex support in C */;
double r23192 = r23184 - r23183;
double r23193 = r23187 + r23190;
double r23194 = /* ERROR: no complex support in C */;
double r23195 = r23188 * r23194;
double r23196 = r23191 + r23195;
double r23197 = r23188 * r23196;
double r23198 = 4.0;
double r23199 = /* ERROR: no complex support in C */;
double r23200 = r23197 + r23199;
double r23201 = r23200 * r23188;
double r23202 = 7.0;
double r23203 = /* ERROR: no complex support in C */;
double r23204 = r23201 + r23203;
double r23205 = /* ERROR: no complex support in C */;
return r23205;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2020045
(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))))