\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 r2065114 = 1.0;
double r2065115 = -r2065114;
double r2065116 = 2.0;
double r2065117 = r2065115 / r2065116;
double r2065118 = 3.0;
double r2065119 = sqrt(r2065118);
double r2065120 = r2065119 / r2065116;
double r2065121 = /* ERROR: no complex support in C */;
double r2065122 = r2065121 * r2065121;
double r2065123 = r2065122 * r2065121;
double r2065124 = r2065123 * r2065121;
double r2065125 = -r2065116;
double r2065126 = 0.0;
double r2065127 = /* ERROR: no complex support in C */;
double r2065128 = r2065127 * r2065121;
double r2065129 = r2065128 * r2065121;
double r2065130 = r2065129 * r2065121;
double r2065131 = r2065124 + r2065130;
double r2065132 = 5.0;
double r2065133 = /* ERROR: no complex support in C */;
double r2065134 = r2065133 * r2065121;
double r2065135 = r2065134 * r2065121;
double r2065136 = r2065131 + r2065135;
double r2065137 = 4.0;
double r2065138 = /* ERROR: no complex support in C */;
double r2065139 = r2065138 * r2065121;
double r2065140 = r2065136 + r2065139;
double r2065141 = 7.0;
double r2065142 = /* ERROR: no complex support in C */;
double r2065143 = r2065140 + r2065142;
double r2065144 = /* ERROR: no complex support in C */;
return r2065144;
}
double f() {
double r2065145 = 1.0;
double r2065146 = -r2065145;
double r2065147 = 2.0;
double r2065148 = r2065146 / r2065147;
double r2065149 = 3.0;
double r2065150 = sqrt(r2065149);
double r2065151 = r2065150 / r2065147;
double r2065152 = /* ERROR: no complex support in C */;
double r2065153 = r2065152 * r2065152;
double r2065154 = r2065153 * r2065152;
double r2065155 = r2065152 * r2065154;
double r2065156 = -r2065147;
double r2065157 = 0.0;
double r2065158 = /* ERROR: no complex support in C */;
double r2065159 = r2065158 * r2065152;
double r2065160 = r2065152 * r2065159;
double r2065161 = r2065152 * r2065160;
double r2065162 = r2065155 + r2065161;
double r2065163 = 5.0;
double r2065164 = /* ERROR: no complex support in C */;
double r2065165 = r2065164 * r2065152;
double r2065166 = r2065165 * r2065152;
double r2065167 = r2065162 + r2065166;
double r2065168 = 4.0;
double r2065169 = /* ERROR: no complex support in C */;
double r2065170 = r2065152 * r2065169;
double r2065171 = r2065167 + r2065170;
double r2065172 = 7.0;
double r2065173 = /* ERROR: no complex support in C */;
double r2065174 = r2065171 + r2065173;
double r2065175 = /* ERROR: no complex support in C */;
return r2065175;
}
Initial program 0
Final simplification0
herbie shell --seed 2019171 +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))))