\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 r50067 = -1.0;
double r50068 = 1.0;
double r50069 = /* ERROR: no complex support in C */;
double r50070 = r50069 * r50069;
double r50071 = r50070 * r50069;
double r50072 = r50071 * r50069;
double r50073 = r50072 * r50069;
double r50074 = r50073 * r50069;
double r50075 = 6.0;
double r50076 = 0.0;
double r50077 = /* ERROR: no complex support in C */;
double r50078 = r50077 * r50069;
double r50079 = r50078 * r50069;
double r50080 = r50079 * r50069;
double r50081 = r50080 * r50069;
double r50082 = r50081 * r50069;
double r50083 = r50074 + r50082;
double r50084 = 15.0;
double r50085 = /* ERROR: no complex support in C */;
double r50086 = r50085 * r50069;
double r50087 = r50086 * r50069;
double r50088 = r50087 * r50069;
double r50089 = r50088 * r50069;
double r50090 = r50083 + r50089;
double r50091 = 20.0;
double r50092 = /* ERROR: no complex support in C */;
double r50093 = r50092 * r50069;
double r50094 = r50093 * r50069;
double r50095 = r50094 * r50069;
double r50096 = r50090 + r50095;
double r50097 = r50096 + r50087;
double r50098 = r50097 + r50078;
double r50099 = /* ERROR: no complex support in C */;
double r50100 = r50098 + r50099;
double r50101 = /* ERROR: no complex support in C */;
return r50101;
}
double f() {
double r50102 = -1.0;
double r50103 = 1.0;
double r50104 = /* ERROR: no complex support in C */;
double r50105 = r50104 * r50104;
double r50106 = r50105 * r50104;
double r50107 = r50106 * r50104;
double r50108 = r50107 * r50104;
double r50109 = r50108 * r50104;
double r50110 = 6.0;
double r50111 = 0.0;
double r50112 = /* ERROR: no complex support in C */;
double r50113 = r50112 * r50104;
double r50114 = r50113 * r50104;
double r50115 = r50114 * r50104;
double r50116 = r50115 * r50104;
double r50117 = r50116 * r50104;
double r50118 = r50109 + r50117;
double r50119 = 15.0;
double r50120 = /* ERROR: no complex support in C */;
double r50121 = r50120 * r50104;
double r50122 = r50121 * r50104;
double r50123 = r50122 * r50104;
double r50124 = r50123 * r50104;
double r50125 = r50118 + r50124;
double r50126 = 20.0;
double r50127 = /* ERROR: no complex support in C */;
double r50128 = r50127 * r50104;
double r50129 = r50128 * r50104;
double r50130 = r50129 * r50104;
double r50131 = r50125 + r50130;
double r50132 = r50131 + r50122;
double r50133 = r50132 + r50113;
double r50134 = /* ERROR: no complex support in C */;
double r50135 = r50133 + r50134;
double r50136 = /* ERROR: no complex support in C */;
return r50136;
}
Initial program 0
Final simplification0
herbie shell --seed 2020081 +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))))