\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 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 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 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 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0 i\right)\right))
\Re(\left(-1 + 0 i\right))
double f() {
double r700185 = -1.0;
double r700186 = 1.0;
double r700187 = /* ERROR: no complex support in C */;
double r700188 = r700187 * r700187;
double r700189 = r700188 * r700187;
double r700190 = r700189 * r700187;
double r700191 = r700190 * r700187;
double r700192 = r700191 * r700187;
double r700193 = 6.0;
double r700194 = 0.0;
double r700195 = /* ERROR: no complex support in C */;
double r700196 = r700195 * r700187;
double r700197 = r700196 * r700187;
double r700198 = r700197 * r700187;
double r700199 = r700198 * r700187;
double r700200 = r700199 * r700187;
double r700201 = r700192 + r700200;
double r700202 = 15.0;
double r700203 = /* ERROR: no complex support in C */;
double r700204 = r700203 * r700187;
double r700205 = r700204 * r700187;
double r700206 = r700205 * r700187;
double r700207 = r700206 * r700187;
double r700208 = r700201 + r700207;
double r700209 = 20.0;
double r700210 = /* ERROR: no complex support in C */;
double r700211 = r700210 * r700187;
double r700212 = r700211 * r700187;
double r700213 = r700212 * r700187;
double r700214 = r700208 + r700213;
double r700215 = r700214 + r700205;
double r700216 = r700215 + r700196;
double r700217 = /* ERROR: no complex support in C */;
double r700218 = r700216 + r700217;
double r700219 = /* ERROR: no complex support in C */;
return r700219;
}
double f() {
double r700220 = -1.0;
double r700221 = 0.0;
double r700222 = /* ERROR: no complex support in C */;
double r700223 = /* ERROR: no complex support in C */;
return r700223;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019142
(FPCore ()
:name "3.9.1 real part (p56)"
(re (+.c (+.c (+.c (+.c (+.c (+.c (*.c (*.c (*.c (*.c (*.c (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (*.c (*.c (*.c (*.c (*.c (complex 6 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (*.c (complex 20 0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (*.c (*.c (complex 15 0) (complex -1 1)) (complex -1 1))) (*.c (complex 6 0) (complex -1 1))) (complex 1 0))))