\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 r58175 = -1.0;
double r58176 = 1.0;
double r58177 = /* ERROR: no complex support in C */;
double r58178 = r58177 * r58177;
double r58179 = r58178 * r58177;
double r58180 = r58179 * r58177;
double r58181 = r58180 * r58177;
double r58182 = r58181 * r58177;
double r58183 = 6.0;
double r58184 = 0.0;
double r58185 = /* ERROR: no complex support in C */;
double r58186 = r58185 * r58177;
double r58187 = r58186 * r58177;
double r58188 = r58187 * r58177;
double r58189 = r58188 * r58177;
double r58190 = r58189 * r58177;
double r58191 = r58182 + r58190;
double r58192 = 15.0;
double r58193 = /* ERROR: no complex support in C */;
double r58194 = r58193 * r58177;
double r58195 = r58194 * r58177;
double r58196 = r58195 * r58177;
double r58197 = r58196 * r58177;
double r58198 = r58191 + r58197;
double r58199 = 20.0;
double r58200 = /* ERROR: no complex support in C */;
double r58201 = r58200 * r58177;
double r58202 = r58201 * r58177;
double r58203 = r58202 * r58177;
double r58204 = r58198 + r58203;
double r58205 = r58204 + r58195;
double r58206 = r58205 + r58186;
double r58207 = /* ERROR: no complex support in C */;
double r58208 = r58206 + r58207;
double r58209 = /* ERROR: no complex support in C */;
return r58209;
}
double f() {
double r58210 = -1.0;
double r58211 = 1.0;
double r58212 = /* ERROR: no complex support in C */;
double r58213 = r58212 * r58212;
double r58214 = r58213 * r58212;
double r58215 = r58214 * r58212;
double r58216 = r58215 * r58212;
double r58217 = r58216 * r58212;
double r58218 = 6.0;
double r58219 = 0.0;
double r58220 = /* ERROR: no complex support in C */;
double r58221 = r58220 * r58212;
double r58222 = r58221 * r58212;
double r58223 = r58222 * r58212;
double r58224 = r58223 * r58212;
double r58225 = r58224 * r58212;
double r58226 = r58217 + r58225;
double r58227 = 15.0;
double r58228 = /* ERROR: no complex support in C */;
double r58229 = r58228 * r58212;
double r58230 = r58229 * r58212;
double r58231 = r58230 * r58212;
double r58232 = r58231 * r58212;
double r58233 = r58226 + r58232;
double r58234 = 20.0;
double r58235 = /* ERROR: no complex support in C */;
double r58236 = r58235 * r58212;
double r58237 = r58236 * r58212;
double r58238 = r58237 * r58212;
double r58239 = r58233 + r58238;
double r58240 = r58239 + r58230;
double r58241 = r58240 + r58221;
double r58242 = /* ERROR: no complex support in C */;
double r58243 = r58241 + r58242;
double r58244 = /* ERROR: no complex support in C */;
return r58244;
}
Initial program 0
Final simplification0
herbie shell --seed 2020065
(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))))