\Im(\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))\Im(\left(\left(\left(\left(\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(\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(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(\left(\left(-2\right) + 0.0 i\right) \cdot \left(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right)\right)\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(\frac{-1}{2} + \frac{\sqrt{3}}{2} i\right) \cdot \left(4 + 0.0 i\right)\right)\right) + \left(7 + 0.0 i\right)\right))double f() {
double r2315085 = 1.0;
double r2315086 = -r2315085;
double r2315087 = 2.0;
double r2315088 = r2315086 / r2315087;
double r2315089 = 3.0;
double r2315090 = sqrt(r2315089);
double r2315091 = r2315090 / r2315087;
double r2315092 = /* ERROR: no complex support in C */;
double r2315093 = r2315092 * r2315092;
double r2315094 = r2315093 * r2315092;
double r2315095 = r2315094 * r2315092;
double r2315096 = -r2315087;
double r2315097 = 0.0;
double r2315098 = /* ERROR: no complex support in C */;
double r2315099 = r2315098 * r2315092;
double r2315100 = r2315099 * r2315092;
double r2315101 = r2315100 * r2315092;
double r2315102 = r2315095 + r2315101;
double r2315103 = 5.0;
double r2315104 = /* ERROR: no complex support in C */;
double r2315105 = r2315104 * r2315092;
double r2315106 = r2315105 * r2315092;
double r2315107 = r2315102 + r2315106;
double r2315108 = 4.0;
double r2315109 = /* ERROR: no complex support in C */;
double r2315110 = r2315109 * r2315092;
double r2315111 = r2315107 + r2315110;
double r2315112 = 7.0;
double r2315113 = /* ERROR: no complex support in C */;
double r2315114 = r2315111 + r2315113;
double r2315115 = /* ERROR: no complex support in C */;
return r2315115;
}
double f() {
double r2315116 = 1.0;
double r2315117 = -r2315116;
double r2315118 = 2.0;
double r2315119 = r2315117 / r2315118;
double r2315120 = 3.0;
double r2315121 = sqrt(r2315120);
double r2315122 = r2315121 / r2315118;
double r2315123 = /* ERROR: no complex support in C */;
double r2315124 = r2315123 * r2315123;
double r2315125 = r2315124 * r2315123;
double r2315126 = r2315123 * r2315125;
double r2315127 = -r2315118;
double r2315128 = 0.0;
double r2315129 = /* ERROR: no complex support in C */;
double r2315130 = r2315129 * r2315123;
double r2315131 = r2315123 * r2315130;
double r2315132 = r2315123 * r2315131;
double r2315133 = r2315126 + r2315132;
double r2315134 = 5.0;
double r2315135 = /* ERROR: no complex support in C */;
double r2315136 = r2315135 * r2315123;
double r2315137 = r2315136 * r2315123;
double r2315138 = r2315133 + r2315137;
double r2315139 = 4.0;
double r2315140 = /* ERROR: no complex support in C */;
double r2315141 = r2315123 * r2315140;
double r2315142 = r2315138 + r2315141;
double r2315143 = 7.0;
double r2315144 = /* ERROR: no complex support in C */;
double r2315145 = r2315142 + r2315144;
double r2315146 = /* ERROR: no complex support in C */;
return r2315146;
}
Initial program 0
Final simplification0
herbie shell --seed 2019174 +o rules:numerics
(FPCore ()
:name "3.9.2 imaginary part (p56)"
(im (+ (+ (+ (+ (* (* (* (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))))