\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 r26180 = -1.0;
double r26181 = 1.0;
double r26182 = /* ERROR: no complex support in C */;
double r26183 = r26182 * r26182;
double r26184 = r26183 * r26182;
double r26185 = r26184 * r26182;
double r26186 = r26185 * r26182;
double r26187 = r26186 * r26182;
double r26188 = 6.0;
double r26189 = 0.0;
double r26190 = /* ERROR: no complex support in C */;
double r26191 = r26190 * r26182;
double r26192 = r26191 * r26182;
double r26193 = r26192 * r26182;
double r26194 = r26193 * r26182;
double r26195 = r26194 * r26182;
double r26196 = r26187 + r26195;
double r26197 = 15.0;
double r26198 = /* ERROR: no complex support in C */;
double r26199 = r26198 * r26182;
double r26200 = r26199 * r26182;
double r26201 = r26200 * r26182;
double r26202 = r26201 * r26182;
double r26203 = r26196 + r26202;
double r26204 = 20.0;
double r26205 = /* ERROR: no complex support in C */;
double r26206 = r26205 * r26182;
double r26207 = r26206 * r26182;
double r26208 = r26207 * r26182;
double r26209 = r26203 + r26208;
double r26210 = r26209 + r26200;
double r26211 = r26210 + r26191;
double r26212 = /* ERROR: no complex support in C */;
double r26213 = r26211 + r26212;
double r26214 = /* ERROR: no complex support in C */;
return r26214;
}
double f() {
double r26215 = -1.0;
double r26216 = 1.0;
double r26217 = /* ERROR: no complex support in C */;
double r26218 = r26217 * r26217;
double r26219 = r26218 * r26217;
double r26220 = r26219 * r26217;
double r26221 = r26220 * r26217;
double r26222 = r26221 * r26217;
double r26223 = 6.0;
double r26224 = 0.0;
double r26225 = /* ERROR: no complex support in C */;
double r26226 = r26225 * r26217;
double r26227 = r26226 * r26217;
double r26228 = r26227 * r26217;
double r26229 = r26228 * r26217;
double r26230 = r26229 * r26217;
double r26231 = r26222 + r26230;
double r26232 = 15.0;
double r26233 = /* ERROR: no complex support in C */;
double r26234 = r26233 * r26217;
double r26235 = r26234 * r26217;
double r26236 = r26235 * r26217;
double r26237 = r26236 * r26217;
double r26238 = r26231 + r26237;
double r26239 = 20.0;
double r26240 = /* ERROR: no complex support in C */;
double r26241 = r26240 * r26217;
double r26242 = r26241 * r26217;
double r26243 = r26242 * r26217;
double r26244 = r26238 + r26243;
double r26245 = r26244 + r26235;
double r26246 = r26245 + r26226;
double r26247 = /* ERROR: no complex support in C */;
double r26248 = r26246 + r26247;
double r26249 = /* ERROR: no complex support in C */;
return r26249;
}
Initial program 0
Final simplification0
herbie shell --seed 2020059
(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))))