\Im(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) + \left(\left(\left(\left(\left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(20 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
\Im(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) + \left(\left(\left(\left(\left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(\left(20 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
double f() {
double r38142 = -1.0;
double r38143 = 1.0;
double r38144 = /* ERROR: no complex support in C */;
double r38145 = r38144 * r38144;
double r38146 = r38145 * r38144;
double r38147 = r38146 * r38144;
double r38148 = r38147 * r38144;
double r38149 = r38148 * r38144;
double r38150 = 6.0;
double r38151 = 0.0;
double r38152 = /* ERROR: no complex support in C */;
double r38153 = r38152 * r38144;
double r38154 = r38153 * r38144;
double r38155 = r38154 * r38144;
double r38156 = r38155 * r38144;
double r38157 = r38156 * r38144;
double r38158 = r38149 + r38157;
double r38159 = 15.0;
double r38160 = /* ERROR: no complex support in C */;
double r38161 = r38160 * r38144;
double r38162 = r38161 * r38144;
double r38163 = r38162 * r38144;
double r38164 = r38163 * r38144;
double r38165 = r38158 + r38164;
double r38166 = 20.0;
double r38167 = /* ERROR: no complex support in C */;
double r38168 = r38167 * r38144;
double r38169 = r38168 * r38144;
double r38170 = r38169 * r38144;
double r38171 = r38165 + r38170;
double r38172 = r38171 + r38162;
double r38173 = r38172 + r38153;
double r38174 = /* ERROR: no complex support in C */;
double r38175 = r38173 + r38174;
double r38176 = /* ERROR: no complex support in C */;
return r38176;
}
double f() {
double r38177 = -1.0;
double r38178 = 1.0;
double r38179 = /* ERROR: no complex support in C */;
double r38180 = r38179 * r38179;
double r38181 = r38180 * r38179;
double r38182 = r38181 * r38179;
double r38183 = r38182 * r38179;
double r38184 = r38183 * r38179;
double r38185 = 6.0;
double r38186 = 0.0;
double r38187 = /* ERROR: no complex support in C */;
double r38188 = r38187 * r38179;
double r38189 = r38188 * r38179;
double r38190 = r38189 * r38179;
double r38191 = r38190 * r38179;
double r38192 = r38191 * r38179;
double r38193 = r38184 + r38192;
double r38194 = 15.0;
double r38195 = /* ERROR: no complex support in C */;
double r38196 = r38195 * r38179;
double r38197 = r38196 * r38179;
double r38198 = r38197 * r38179;
double r38199 = r38198 * r38179;
double r38200 = r38193 + r38199;
double r38201 = 20.0;
double r38202 = /* ERROR: no complex support in C */;
double r38203 = r38202 * r38179;
double r38204 = r38203 * r38179;
double r38205 = r38204 * r38179;
double r38206 = r38200 + r38205;
double r38207 = r38206 + r38197;
double r38208 = r38207 + r38188;
double r38209 = /* ERROR: no complex support in C */;
double r38210 = r38208 + r38209;
double r38211 = /* ERROR: no complex support in C */;
return r38211;
}
Initial program 0
Final simplification0
herbie shell --seed 2020062 +o rules:numerics
(FPCore ()
:name "3.9.1 imaginary part (p56)"
:precision binary64
(im (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (* (* (* (* (* (complex 6 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (complex 20 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1))) (* (complex 6 0.0) (complex -1 1))) (complex 1 0.0))))