\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(-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 r9985 = -1.0;
double r9986 = 1.0;
double r9987 = /* ERROR: no complex support in C */;
double r9988 = r9987 * r9987;
double r9989 = r9988 * r9987;
double r9990 = r9989 * r9987;
double r9991 = r9990 * r9987;
double r9992 = r9991 * r9987;
double r9993 = 6.0;
double r9994 = 0.0;
double r9995 = /* ERROR: no complex support in C */;
double r9996 = r9995 * r9987;
double r9997 = r9996 * r9987;
double r9998 = r9997 * r9987;
double r9999 = r9998 * r9987;
double r10000 = r9999 * r9987;
double r10001 = r9992 + r10000;
double r10002 = 15.0;
double r10003 = /* ERROR: no complex support in C */;
double r10004 = r10003 * r9987;
double r10005 = r10004 * r9987;
double r10006 = r10005 * r9987;
double r10007 = r10006 * r9987;
double r10008 = r10001 + r10007;
double r10009 = 20.0;
double r10010 = /* ERROR: no complex support in C */;
double r10011 = r10010 * r9987;
double r10012 = r10011 * r9987;
double r10013 = r10012 * r9987;
double r10014 = r10008 + r10013;
double r10015 = r10014 + r10005;
double r10016 = r10015 + r9996;
double r10017 = /* ERROR: no complex support in C */;
double r10018 = r10016 + r10017;
double r10019 = /* ERROR: no complex support in C */;
return r10019;
}
double f() {
double r10020 = -1.0;
double r10021 = 1.0;
double r10022 = /* ERROR: no complex support in C */;
double r10023 = 15.0;
double r10024 = 0.0;
double r10025 = /* ERROR: no complex support in C */;
double r10026 = r10025 * r10022;
double r10027 = 6.0;
double r10028 = /* ERROR: no complex support in C */;
double r10029 = r10026 + r10028;
double r10030 = r10022 * r10029;
double r10031 = /* ERROR: no complex support in C */;
double r10032 = r10030 + r10031;
double r10033 = r10022 * r10022;
double r10034 = 20.0;
double r10035 = /* ERROR: no complex support in C */;
double r10036 = r10026 + r10035;
double r10037 = r10022 * r10036;
double r10038 = r10022 + r10028;
double r10039 = r10033 * r10038;
double r10040 = r10022 * r10039;
double r10041 = r10037 + r10040;
double r10042 = r10033 * r10041;
double r10043 = r10032 + r10042;
double r10044 = /* ERROR: no complex support in C */;
return r10044;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019315
(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))))