\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 r194 = -1.0;
double r195 = 1.0;
double r196 = /* ERROR: no complex support in C */;
double r197 = r196 * r196;
double r198 = r197 * r196;
double r199 = r198 * r196;
double r200 = r199 * r196;
double r201 = r200 * r196;
double r202 = 6.0;
double r203 = 0.0;
double r204 = /* ERROR: no complex support in C */;
double r205 = r204 * r196;
double r206 = r205 * r196;
double r207 = r206 * r196;
double r208 = r207 * r196;
double r209 = r208 * r196;
double r210 = r201 + r209;
double r211 = 15.0;
double r212 = /* ERROR: no complex support in C */;
double r213 = r212 * r196;
double r214 = r213 * r196;
double r215 = r214 * r196;
double r216 = r215 * r196;
double r217 = r210 + r216;
double r218 = 20.0;
double r219 = /* ERROR: no complex support in C */;
double r220 = r219 * r196;
double r221 = r220 * r196;
double r222 = r221 * r196;
double r223 = r217 + r222;
double r224 = r223 + r214;
double r225 = r224 + r205;
double r226 = /* ERROR: no complex support in C */;
double r227 = r225 + r226;
double r228 = /* ERROR: no complex support in C */;
return r228;
}
double f() {
double r229 = -1.0;
double r230 = 1.0;
double r231 = /* ERROR: no complex support in C */;
double r232 = r231 * r231;
double r233 = r232 * r231;
double r234 = r233 * r231;
double r235 = r234 * r231;
double r236 = r235 * r231;
double r237 = 6.0;
double r238 = 0.0;
double r239 = /* ERROR: no complex support in C */;
double r240 = r239 * r231;
double r241 = r240 * r231;
double r242 = r241 * r231;
double r243 = r242 * r231;
double r244 = r243 * r231;
double r245 = r236 + r244;
double r246 = 15.0;
double r247 = /* ERROR: no complex support in C */;
double r248 = r247 * r231;
double r249 = r248 * r231;
double r250 = r249 * r231;
double r251 = r250 * r231;
double r252 = r245 + r251;
double r253 = 20.0;
double r254 = /* ERROR: no complex support in C */;
double r255 = r254 * r231;
double r256 = r255 * r231;
double r257 = r256 * r231;
double r258 = r252 + r257;
double r259 = r258 + r249;
double r260 = r259 + r240;
double r261 = /* ERROR: no complex support in C */;
double r262 = r260 + r261;
double r263 = /* ERROR: no complex support in C */;
return r263;
}
Initial program 0
Final simplification0
herbie shell --seed 2020025 +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))))