\Re(\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))
\Re(\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 r23219 = -1.0;
double r23220 = 1.0;
double r23221 = /* ERROR: no complex support in C */;
double r23222 = r23221 * r23221;
double r23223 = r23222 * r23221;
double r23224 = r23223 * r23221;
double r23225 = r23224 * r23221;
double r23226 = r23225 * r23221;
double r23227 = 6.0;
double r23228 = 0.0;
double r23229 = /* ERROR: no complex support in C */;
double r23230 = r23229 * r23221;
double r23231 = r23230 * r23221;
double r23232 = r23231 * r23221;
double r23233 = r23232 * r23221;
double r23234 = r23233 * r23221;
double r23235 = r23226 + r23234;
double r23236 = 15.0;
double r23237 = /* ERROR: no complex support in C */;
double r23238 = r23237 * r23221;
double r23239 = r23238 * r23221;
double r23240 = r23239 * r23221;
double r23241 = r23240 * r23221;
double r23242 = r23235 + r23241;
double r23243 = 20.0;
double r23244 = /* ERROR: no complex support in C */;
double r23245 = r23244 * r23221;
double r23246 = r23245 * r23221;
double r23247 = r23246 * r23221;
double r23248 = r23242 + r23247;
double r23249 = r23248 + r23239;
double r23250 = r23249 + r23230;
double r23251 = /* ERROR: no complex support in C */;
double r23252 = r23250 + r23251;
double r23253 = /* ERROR: no complex support in C */;
return r23253;
}
double f() {
double r23254 = -1.0;
double r23255 = 1.0;
double r23256 = /* ERROR: no complex support in C */;
double r23257 = r23256 * r23256;
double r23258 = r23257 * r23256;
double r23259 = r23258 * r23256;
double r23260 = r23259 * r23256;
double r23261 = r23260 * r23256;
double r23262 = 6.0;
double r23263 = 0.0;
double r23264 = /* ERROR: no complex support in C */;
double r23265 = r23264 * r23256;
double r23266 = r23265 * r23256;
double r23267 = r23266 * r23256;
double r23268 = r23267 * r23256;
double r23269 = r23268 * r23256;
double r23270 = r23261 + r23269;
double r23271 = 15.0;
double r23272 = /* ERROR: no complex support in C */;
double r23273 = r23272 * r23256;
double r23274 = r23273 * r23256;
double r23275 = r23274 * r23256;
double r23276 = r23275 * r23256;
double r23277 = r23270 + r23276;
double r23278 = 20.0;
double r23279 = /* ERROR: no complex support in C */;
double r23280 = r23279 * r23256;
double r23281 = r23280 * r23256;
double r23282 = r23281 * r23256;
double r23283 = r23277 + r23282;
double r23284 = r23283 + r23274;
double r23285 = r23284 + r23265;
double r23286 = /* ERROR: no complex support in C */;
double r23287 = r23285 + r23286;
double r23288 = /* ERROR: no complex support in C */;
return r23288;
}
Initial program 0
Final simplification0
herbie shell --seed 2020007 +o rules:numerics
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))