\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(\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) + \left(5 + 0.0 i\right)\right)\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r9185 = 1.0;
double r9186 = -r9185;
double r9187 = 2.0;
double r9188 = r9186 / r9187;
double r9189 = 3.0;
double r9190 = sqrt(r9189);
double r9191 = r9190 / r9187;
double r9192 = /* ERROR: no complex support in C */;
double r9193 = r9192 * r9192;
double r9194 = r9193 * r9192;
double r9195 = r9194 * r9192;
double r9196 = -r9187;
double r9197 = 0.0;
double r9198 = /* ERROR: no complex support in C */;
double r9199 = r9198 * r9192;
double r9200 = r9199 * r9192;
double r9201 = r9200 * r9192;
double r9202 = r9195 + r9201;
double r9203 = 5.0;
double r9204 = /* ERROR: no complex support in C */;
double r9205 = r9204 * r9192;
double r9206 = r9205 * r9192;
double r9207 = r9202 + r9206;
double r9208 = 4.0;
double r9209 = /* ERROR: no complex support in C */;
double r9210 = r9209 * r9192;
double r9211 = r9207 + r9210;
double r9212 = 7.0;
double r9213 = /* ERROR: no complex support in C */;
double r9214 = r9211 + r9213;
double r9215 = /* ERROR: no complex support in C */;
return r9215;
}
double f() {
double r9216 = 1.0;
double r9217 = -r9216;
double r9218 = 2.0;
double r9219 = r9217 / r9218;
double r9220 = 3.0;
double r9221 = sqrt(r9220);
double r9222 = r9221 / r9218;
double r9223 = /* ERROR: no complex support in C */;
double r9224 = 4.0;
double r9225 = 0.0;
double r9226 = /* ERROR: no complex support in C */;
double r9227 = r9216 / r9218;
double r9228 = r9227 + r9218;
double r9229 = -r9228;
double r9230 = r9222 + r9225;
double r9231 = /* ERROR: no complex support in C */;
double r9232 = r9223 * r9231;
double r9233 = 5.0;
double r9234 = /* ERROR: no complex support in C */;
double r9235 = r9232 + r9234;
double r9236 = r9223 * r9235;
double r9237 = r9226 + r9236;
double r9238 = r9223 * r9237;
double r9239 = 7.0;
double r9240 = /* ERROR: no complex support in C */;
double r9241 = r9238 + r9240;
double r9242 = /* ERROR: no complex support in C */;
return r9242;
}
Initial program 61.9
Simplified0
Final simplification0
herbie shell --seed 2019310 +o rules:numerics
(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))))