\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 r30138 = -1.0;
double r30139 = 1.0;
double r30140 = /* ERROR: no complex support in C */;
double r30141 = r30140 * r30140;
double r30142 = r30141 * r30140;
double r30143 = r30142 * r30140;
double r30144 = r30143 * r30140;
double r30145 = r30144 * r30140;
double r30146 = 6.0;
double r30147 = 0.0;
double r30148 = /* ERROR: no complex support in C */;
double r30149 = r30148 * r30140;
double r30150 = r30149 * r30140;
double r30151 = r30150 * r30140;
double r30152 = r30151 * r30140;
double r30153 = r30152 * r30140;
double r30154 = r30145 + r30153;
double r30155 = 15.0;
double r30156 = /* ERROR: no complex support in C */;
double r30157 = r30156 * r30140;
double r30158 = r30157 * r30140;
double r30159 = r30158 * r30140;
double r30160 = r30159 * r30140;
double r30161 = r30154 + r30160;
double r30162 = 20.0;
double r30163 = /* ERROR: no complex support in C */;
double r30164 = r30163 * r30140;
double r30165 = r30164 * r30140;
double r30166 = r30165 * r30140;
double r30167 = r30161 + r30166;
double r30168 = r30167 + r30158;
double r30169 = r30168 + r30149;
double r30170 = /* ERROR: no complex support in C */;
double r30171 = r30169 + r30170;
double r30172 = /* ERROR: no complex support in C */;
return r30172;
}
double f() {
double r30173 = -1.0;
double r30174 = 1.0;
double r30175 = /* ERROR: no complex support in C */;
double r30176 = r30175 * r30175;
double r30177 = r30176 * r30175;
double r30178 = r30177 * r30175;
double r30179 = r30178 * r30175;
double r30180 = r30179 * r30175;
double r30181 = 6.0;
double r30182 = 0.0;
double r30183 = /* ERROR: no complex support in C */;
double r30184 = r30183 * r30175;
double r30185 = r30184 * r30175;
double r30186 = r30185 * r30175;
double r30187 = r30186 * r30175;
double r30188 = r30187 * r30175;
double r30189 = r30180 + r30188;
double r30190 = 15.0;
double r30191 = /* ERROR: no complex support in C */;
double r30192 = r30191 * r30175;
double r30193 = r30192 * r30175;
double r30194 = r30193 * r30175;
double r30195 = r30194 * r30175;
double r30196 = r30189 + r30195;
double r30197 = 20.0;
double r30198 = /* ERROR: no complex support in C */;
double r30199 = r30198 * r30175;
double r30200 = r30199 * r30175;
double r30201 = r30200 * r30175;
double r30202 = r30196 + r30201;
double r30203 = r30202 + r30193;
double r30204 = r30203 + r30184;
double r30205 = /* ERROR: no complex support in C */;
double r30206 = r30204 + r30205;
double r30207 = /* ERROR: no complex support in C */;
return r30207;
}
Initial program 0
Final simplification0
herbie shell --seed 2019362
(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))))