\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(-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(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(6 + 0.0 i\right) + \left(-1 + 1 i\right)\right)\right)\right)\right) + \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)\right) + \left(1 + 0.0 i\right)\right))
double f() {
double r29223 = -1.0;
double r29224 = 1.0;
double r29225 = /* ERROR: no complex support in C */;
double r29226 = r29225 * r29225;
double r29227 = r29226 * r29225;
double r29228 = r29227 * r29225;
double r29229 = r29228 * r29225;
double r29230 = r29229 * r29225;
double r29231 = 6.0;
double r29232 = 0.0;
double r29233 = /* ERROR: no complex support in C */;
double r29234 = r29233 * r29225;
double r29235 = r29234 * r29225;
double r29236 = r29235 * r29225;
double r29237 = r29236 * r29225;
double r29238 = r29237 * r29225;
double r29239 = r29230 + r29238;
double r29240 = 15.0;
double r29241 = /* ERROR: no complex support in C */;
double r29242 = r29241 * r29225;
double r29243 = r29242 * r29225;
double r29244 = r29243 * r29225;
double r29245 = r29244 * r29225;
double r29246 = r29239 + r29245;
double r29247 = 20.0;
double r29248 = /* ERROR: no complex support in C */;
double r29249 = r29248 * r29225;
double r29250 = r29249 * r29225;
double r29251 = r29250 * r29225;
double r29252 = r29246 + r29251;
double r29253 = r29252 + r29243;
double r29254 = r29253 + r29234;
double r29255 = /* ERROR: no complex support in C */;
double r29256 = r29254 + r29255;
double r29257 = /* ERROR: no complex support in C */;
return r29257;
}
double f() {
double r29258 = -1.0;
double r29259 = 1.0;
double r29260 = /* ERROR: no complex support in C */;
double r29261 = r29260 * r29260;
double r29262 = 15.0;
double r29263 = 0.0;
double r29264 = /* ERROR: no complex support in C */;
double r29265 = r29264 * r29260;
double r29266 = 20.0;
double r29267 = /* ERROR: no complex support in C */;
double r29268 = r29265 + r29267;
double r29269 = r29260 * r29268;
double r29270 = r29261 * r29260;
double r29271 = 6.0;
double r29272 = /* ERROR: no complex support in C */;
double r29273 = r29272 + r29260;
double r29274 = r29270 * r29273;
double r29275 = r29269 + r29274;
double r29276 = r29261 * r29275;
double r29277 = r29265 + r29272;
double r29278 = r29260 * r29277;
double r29279 = r29276 + r29278;
double r29280 = /* ERROR: no complex support in C */;
double r29281 = r29279 + r29280;
double r29282 = /* ERROR: no complex support in C */;
return r29282;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019199 +o rules:numerics
(FPCore ()
:name "3.9.1 real part (p56)"
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1.0 1.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (* (* (* (* (* (complex 6.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (* (* (complex 15.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (* (complex 20.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (complex 15.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (complex 6.0 0.0) (complex -1.0 1.0))) (complex 1.0 0.0))))