\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 r31226 = -1.0;
double r31227 = 1.0;
double r31228 = /* ERROR: no complex support in C */;
double r31229 = r31228 * r31228;
double r31230 = r31229 * r31228;
double r31231 = r31230 * r31228;
double r31232 = r31231 * r31228;
double r31233 = r31232 * r31228;
double r31234 = 6.0;
double r31235 = 0.0;
double r31236 = /* ERROR: no complex support in C */;
double r31237 = r31236 * r31228;
double r31238 = r31237 * r31228;
double r31239 = r31238 * r31228;
double r31240 = r31239 * r31228;
double r31241 = r31240 * r31228;
double r31242 = r31233 + r31241;
double r31243 = 15.0;
double r31244 = /* ERROR: no complex support in C */;
double r31245 = r31244 * r31228;
double r31246 = r31245 * r31228;
double r31247 = r31246 * r31228;
double r31248 = r31247 * r31228;
double r31249 = r31242 + r31248;
double r31250 = 20.0;
double r31251 = /* ERROR: no complex support in C */;
double r31252 = r31251 * r31228;
double r31253 = r31252 * r31228;
double r31254 = r31253 * r31228;
double r31255 = r31249 + r31254;
double r31256 = r31255 + r31246;
double r31257 = r31256 + r31237;
double r31258 = /* ERROR: no complex support in C */;
double r31259 = r31257 + r31258;
double r31260 = /* ERROR: no complex support in C */;
return r31260;
}
double f() {
double r31261 = -1.0;
double r31262 = 1.0;
double r31263 = /* ERROR: no complex support in C */;
double r31264 = 15.0;
double r31265 = 0.0;
double r31266 = /* ERROR: no complex support in C */;
double r31267 = r31266 * r31263;
double r31268 = 6.0;
double r31269 = /* ERROR: no complex support in C */;
double r31270 = r31267 + r31269;
double r31271 = r31263 * r31270;
double r31272 = /* ERROR: no complex support in C */;
double r31273 = r31271 + r31272;
double r31274 = r31263 * r31263;
double r31275 = 20.0;
double r31276 = /* ERROR: no complex support in C */;
double r31277 = r31267 + r31276;
double r31278 = r31263 * r31277;
double r31279 = r31263 + r31269;
double r31280 = r31274 * r31279;
double r31281 = r31263 * r31280;
double r31282 = r31278 + r31281;
double r31283 = r31274 * r31282;
double r31284 = r31273 + r31283;
double r31285 = /* ERROR: no complex support in C */;
return r31285;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019303
(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))))