\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 r30208 = -1.0;
double r30209 = 1.0;
double r30210 = /* ERROR: no complex support in C */;
double r30211 = r30210 * r30210;
double r30212 = r30211 * r30210;
double r30213 = r30212 * r30210;
double r30214 = r30213 * r30210;
double r30215 = r30214 * r30210;
double r30216 = 6.0;
double r30217 = 0.0;
double r30218 = /* ERROR: no complex support in C */;
double r30219 = r30218 * r30210;
double r30220 = r30219 * r30210;
double r30221 = r30220 * r30210;
double r30222 = r30221 * r30210;
double r30223 = r30222 * r30210;
double r30224 = r30215 + r30223;
double r30225 = 15.0;
double r30226 = /* ERROR: no complex support in C */;
double r30227 = r30226 * r30210;
double r30228 = r30227 * r30210;
double r30229 = r30228 * r30210;
double r30230 = r30229 * r30210;
double r30231 = r30224 + r30230;
double r30232 = 20.0;
double r30233 = /* ERROR: no complex support in C */;
double r30234 = r30233 * r30210;
double r30235 = r30234 * r30210;
double r30236 = r30235 * r30210;
double r30237 = r30231 + r30236;
double r30238 = r30237 + r30228;
double r30239 = r30238 + r30219;
double r30240 = /* ERROR: no complex support in C */;
double r30241 = r30239 + r30240;
double r30242 = /* ERROR: no complex support in C */;
return r30242;
}
double f() {
double r30243 = -1.0;
double r30244 = 1.0;
double r30245 = /* ERROR: no complex support in C */;
double r30246 = r30245 * r30245;
double r30247 = r30246 * r30245;
double r30248 = r30247 * r30245;
double r30249 = r30248 * r30245;
double r30250 = r30249 * r30245;
double r30251 = 6.0;
double r30252 = 0.0;
double r30253 = /* ERROR: no complex support in C */;
double r30254 = r30253 * r30245;
double r30255 = r30254 * r30245;
double r30256 = r30255 * r30245;
double r30257 = r30256 * r30245;
double r30258 = r30257 * r30245;
double r30259 = r30250 + r30258;
double r30260 = 15.0;
double r30261 = /* ERROR: no complex support in C */;
double r30262 = r30261 * r30245;
double r30263 = r30262 * r30245;
double r30264 = r30263 * r30245;
double r30265 = r30264 * r30245;
double r30266 = r30259 + r30265;
double r30267 = 20.0;
double r30268 = /* ERROR: no complex support in C */;
double r30269 = r30268 * r30245;
double r30270 = r30269 * r30245;
double r30271 = r30270 * r30245;
double r30272 = r30266 + r30271;
double r30273 = r30272 + r30263;
double r30274 = r30273 + r30254;
double r30275 = /* ERROR: no complex support in C */;
double r30276 = r30274 + r30275;
double r30277 = /* ERROR: no complex support in C */;
return r30277;
}
Initial program 0
Final simplification0
herbie shell --seed 2020046 +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))))