\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 r18243 = -1.0;
double r18244 = 1.0;
double r18245 = /* ERROR: no complex support in C */;
double r18246 = r18245 * r18245;
double r18247 = r18246 * r18245;
double r18248 = r18247 * r18245;
double r18249 = r18248 * r18245;
double r18250 = r18249 * r18245;
double r18251 = 6.0;
double r18252 = 0.0;
double r18253 = /* ERROR: no complex support in C */;
double r18254 = r18253 * r18245;
double r18255 = r18254 * r18245;
double r18256 = r18255 * r18245;
double r18257 = r18256 * r18245;
double r18258 = r18257 * r18245;
double r18259 = r18250 + r18258;
double r18260 = 15.0;
double r18261 = /* ERROR: no complex support in C */;
double r18262 = r18261 * r18245;
double r18263 = r18262 * r18245;
double r18264 = r18263 * r18245;
double r18265 = r18264 * r18245;
double r18266 = r18259 + r18265;
double r18267 = 20.0;
double r18268 = /* ERROR: no complex support in C */;
double r18269 = r18268 * r18245;
double r18270 = r18269 * r18245;
double r18271 = r18270 * r18245;
double r18272 = r18266 + r18271;
double r18273 = r18272 + r18263;
double r18274 = r18273 + r18254;
double r18275 = /* ERROR: no complex support in C */;
double r18276 = r18274 + r18275;
double r18277 = /* ERROR: no complex support in C */;
return r18277;
}
double f() {
double r18278 = -1.0;
double r18279 = 1.0;
double r18280 = /* ERROR: no complex support in C */;
double r18281 = r18280 * r18280;
double r18282 = r18281 * r18280;
double r18283 = r18282 * r18280;
double r18284 = r18283 * r18280;
double r18285 = r18284 * r18280;
double r18286 = 6.0;
double r18287 = 0.0;
double r18288 = /* ERROR: no complex support in C */;
double r18289 = r18288 * r18280;
double r18290 = r18289 * r18280;
double r18291 = r18290 * r18280;
double r18292 = r18291 * r18280;
double r18293 = r18292 * r18280;
double r18294 = r18285 + r18293;
double r18295 = 15.0;
double r18296 = /* ERROR: no complex support in C */;
double r18297 = r18296 * r18280;
double r18298 = r18297 * r18280;
double r18299 = r18298 * r18280;
double r18300 = r18299 * r18280;
double r18301 = r18294 + r18300;
double r18302 = 20.0;
double r18303 = /* ERROR: no complex support in C */;
double r18304 = r18303 * r18280;
double r18305 = r18304 * r18280;
double r18306 = r18305 * r18280;
double r18307 = r18301 + r18306;
double r18308 = r18307 + r18298;
double r18309 = r18308 + r18289;
double r18310 = /* ERROR: no complex support in C */;
double r18311 = r18309 + r18310;
double r18312 = /* ERROR: no complex support in C */;
return r18312;
}
Initial program 0
Final simplification0
herbie shell --seed 2020083 +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))))