\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))
-1
double f() {
double r842179 = -1.0;
double r842180 = 1.0;
double r842181 = /* ERROR: no complex support in C */;
double r842182 = r842181 * r842181;
double r842183 = r842182 * r842181;
double r842184 = r842183 * r842181;
double r842185 = r842184 * r842181;
double r842186 = r842185 * r842181;
double r842187 = 6.0;
double r842188 = 0.0;
double r842189 = /* ERROR: no complex support in C */;
double r842190 = r842189 * r842181;
double r842191 = r842190 * r842181;
double r842192 = r842191 * r842181;
double r842193 = r842192 * r842181;
double r842194 = r842193 * r842181;
double r842195 = r842186 + r842194;
double r842196 = 15.0;
double r842197 = /* ERROR: no complex support in C */;
double r842198 = r842197 * r842181;
double r842199 = r842198 * r842181;
double r842200 = r842199 * r842181;
double r842201 = r842200 * r842181;
double r842202 = r842195 + r842201;
double r842203 = 20.0;
double r842204 = /* ERROR: no complex support in C */;
double r842205 = r842204 * r842181;
double r842206 = r842205 * r842181;
double r842207 = r842206 * r842181;
double r842208 = r842202 + r842207;
double r842209 = r842208 + r842199;
double r842210 = r842209 + r842190;
double r842211 = /* ERROR: no complex support in C */;
double r842212 = r842210 + r842211;
double r842213 = /* ERROR: no complex support in C */;
return r842213;
}
double f() {
double r842214 = -1.0;
return r842214;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019164
(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))))