\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(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(6 + 0.0 i\right)\right)\right) + \left(1 + 0.0 i\right)\right) + \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(20 + 0.0 i\right)\right)\right) + \left(\left(-1 + 1 i\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(-1 + 1 i\right) + \left(6 + 0.0 i\right)\right)\right)\right)\right)\right)\right))
double f() {
double r20210 = -1.0;
double r20211 = 1.0;
double r20212 = /* ERROR: no complex support in C */;
double r20213 = r20212 * r20212;
double r20214 = r20213 * r20212;
double r20215 = r20214 * r20212;
double r20216 = r20215 * r20212;
double r20217 = r20216 * r20212;
double r20218 = 6.0;
double r20219 = 0.0;
double r20220 = /* ERROR: no complex support in C */;
double r20221 = r20220 * r20212;
double r20222 = r20221 * r20212;
double r20223 = r20222 * r20212;
double r20224 = r20223 * r20212;
double r20225 = r20224 * r20212;
double r20226 = r20217 + r20225;
double r20227 = 15.0;
double r20228 = /* ERROR: no complex support in C */;
double r20229 = r20228 * r20212;
double r20230 = r20229 * r20212;
double r20231 = r20230 * r20212;
double r20232 = r20231 * r20212;
double r20233 = r20226 + r20232;
double r20234 = 20.0;
double r20235 = /* ERROR: no complex support in C */;
double r20236 = r20235 * r20212;
double r20237 = r20236 * r20212;
double r20238 = r20237 * r20212;
double r20239 = r20233 + r20238;
double r20240 = r20239 + r20230;
double r20241 = r20240 + r20221;
double r20242 = /* ERROR: no complex support in C */;
double r20243 = r20241 + r20242;
double r20244 = /* ERROR: no complex support in C */;
return r20244;
}
double f() {
double r20245 = -1.0;
double r20246 = 1.0;
double r20247 = /* ERROR: no complex support in C */;
double r20248 = 15.0;
double r20249 = 0.0;
double r20250 = /* ERROR: no complex support in C */;
double r20251 = r20250 * r20247;
double r20252 = 6.0;
double r20253 = /* ERROR: no complex support in C */;
double r20254 = r20251 + r20253;
double r20255 = r20247 * r20254;
double r20256 = /* ERROR: no complex support in C */;
double r20257 = r20255 + r20256;
double r20258 = r20247 * r20247;
double r20259 = 20.0;
double r20260 = /* ERROR: no complex support in C */;
double r20261 = r20251 + r20260;
double r20262 = r20247 * r20261;
double r20263 = r20247 + r20253;
double r20264 = r20258 * r20263;
double r20265 = r20247 * r20264;
double r20266 = r20262 + r20265;
double r20267 = r20258 * r20266;
double r20268 = r20257 + r20267;
double r20269 = /* ERROR: no complex support in C */;
return r20269;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019322
(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))))