\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 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))
0
double f() {
double r15989 = -1.0;
double r15990 = 1.0;
double r15991 = /* ERROR: no complex support in C */;
double r15992 = r15991 * r15991;
double r15993 = r15992 * r15991;
double r15994 = r15993 * r15991;
double r15995 = r15994 * r15991;
double r15996 = r15995 * r15991;
double r15997 = 6.0;
double r15998 = 0.0;
double r15999 = /* ERROR: no complex support in C */;
double r16000 = r15999 * r15991;
double r16001 = r16000 * r15991;
double r16002 = r16001 * r15991;
double r16003 = r16002 * r15991;
double r16004 = r16003 * r15991;
double r16005 = r15996 + r16004;
double r16006 = 15.0;
double r16007 = /* ERROR: no complex support in C */;
double r16008 = r16007 * r15991;
double r16009 = r16008 * r15991;
double r16010 = r16009 * r15991;
double r16011 = r16010 * r15991;
double r16012 = r16005 + r16011;
double r16013 = 20.0;
double r16014 = /* ERROR: no complex support in C */;
double r16015 = r16014 * r15991;
double r16016 = r16015 * r15991;
double r16017 = r16016 * r15991;
double r16018 = r16012 + r16017;
double r16019 = r16018 + r16009;
double r16020 = r16019 + r16000;
double r16021 = /* ERROR: no complex support in C */;
double r16022 = r16020 + r16021;
double r16023 = /* ERROR: no complex support in C */;
return r16023;
}
double f() {
double r16024 = 0.0;
return r16024;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019168
(FPCore ()
:name "3.9.1 imaginary part (p56)"
(im (+.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))))