\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))
-1
double f() {
double r833061 = -1.0;
double r833062 = 1.0;
double r833063 = /* ERROR: no complex support in C */;
double r833064 = r833063 * r833063;
double r833065 = r833064 * r833063;
double r833066 = r833065 * r833063;
double r833067 = r833066 * r833063;
double r833068 = r833067 * r833063;
double r833069 = 6.0;
double r833070 = 0.0;
double r833071 = /* ERROR: no complex support in C */;
double r833072 = r833071 * r833063;
double r833073 = r833072 * r833063;
double r833074 = r833073 * r833063;
double r833075 = r833074 * r833063;
double r833076 = r833075 * r833063;
double r833077 = r833068 + r833076;
double r833078 = 15.0;
double r833079 = /* ERROR: no complex support in C */;
double r833080 = r833079 * r833063;
double r833081 = r833080 * r833063;
double r833082 = r833081 * r833063;
double r833083 = r833082 * r833063;
double r833084 = r833077 + r833083;
double r833085 = 20.0;
double r833086 = /* ERROR: no complex support in C */;
double r833087 = r833086 * r833063;
double r833088 = r833087 * r833063;
double r833089 = r833088 * r833063;
double r833090 = r833084 + r833089;
double r833091 = r833090 + r833081;
double r833092 = r833091 + r833072;
double r833093 = /* ERROR: no complex support in C */;
double r833094 = r833092 + r833093;
double r833095 = /* ERROR: no complex support in C */;
return r833095;
}
double f() {
double r833096 = -1.0;
return r833096;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019158
(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))))