\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 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 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 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 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0 i\right)\right))
\Re(\left(-1 + 0 i\right))
double f() {
double r58314 = -1.0;
double r58315 = 1.0;
double r58316 = /* ERROR: no complex support in C */;
double r58317 = r58316 * r58316;
double r58318 = r58317 * r58316;
double r58319 = r58318 * r58316;
double r58320 = r58319 * r58316;
double r58321 = r58320 * r58316;
double r58322 = 6.0;
double r58323 = 0.0;
double r58324 = /* ERROR: no complex support in C */;
double r58325 = r58324 * r58316;
double r58326 = r58325 * r58316;
double r58327 = r58326 * r58316;
double r58328 = r58327 * r58316;
double r58329 = r58328 * r58316;
double r58330 = r58321 + r58329;
double r58331 = 15.0;
double r58332 = /* ERROR: no complex support in C */;
double r58333 = r58332 * r58316;
double r58334 = r58333 * r58316;
double r58335 = r58334 * r58316;
double r58336 = r58335 * r58316;
double r58337 = r58330 + r58336;
double r58338 = 20.0;
double r58339 = /* ERROR: no complex support in C */;
double r58340 = r58339 * r58316;
double r58341 = r58340 * r58316;
double r58342 = r58341 * r58316;
double r58343 = r58337 + r58342;
double r58344 = r58343 + r58334;
double r58345 = r58344 + r58325;
double r58346 = /* ERROR: no complex support in C */;
double r58347 = r58345 + r58346;
double r58348 = /* ERROR: no complex support in C */;
return r58348;
}
double f() {
double r58349 = -1.0;
double r58350 = 0.0;
double r58351 = /* ERROR: no complex support in C */;
double r58352 = /* ERROR: no complex support in C */;
return r58352;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019133
(FPCore ()
:name "3.9.1 real part (p56)"
(re (+.c (+.c (+.c (+.c (+.c (+.c (*.c (*.c (*.c (*.c (*.c (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (*.c (*.c (*.c (*.c (*.c (complex 6 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (complex 20 0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1))) (*.c (complex 6 0) (complex -1 1))) (complex 1 0))))