\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 r1011947 = -1.0;
double r1011948 = 1.0;
double r1011949 = /* ERROR: no complex support in C */;
double r1011950 = r1011949 * r1011949;
double r1011951 = r1011950 * r1011949;
double r1011952 = r1011951 * r1011949;
double r1011953 = r1011952 * r1011949;
double r1011954 = r1011953 * r1011949;
double r1011955 = 6.0;
double r1011956 = 0.0;
double r1011957 = /* ERROR: no complex support in C */;
double r1011958 = r1011957 * r1011949;
double r1011959 = r1011958 * r1011949;
double r1011960 = r1011959 * r1011949;
double r1011961 = r1011960 * r1011949;
double r1011962 = r1011961 * r1011949;
double r1011963 = r1011954 + r1011962;
double r1011964 = 15.0;
double r1011965 = /* ERROR: no complex support in C */;
double r1011966 = r1011965 * r1011949;
double r1011967 = r1011966 * r1011949;
double r1011968 = r1011967 * r1011949;
double r1011969 = r1011968 * r1011949;
double r1011970 = r1011963 + r1011969;
double r1011971 = 20.0;
double r1011972 = /* ERROR: no complex support in C */;
double r1011973 = r1011972 * r1011949;
double r1011974 = r1011973 * r1011949;
double r1011975 = r1011974 * r1011949;
double r1011976 = r1011970 + r1011975;
double r1011977 = r1011976 + r1011967;
double r1011978 = r1011977 + r1011958;
double r1011979 = /* ERROR: no complex support in C */;
double r1011980 = r1011978 + r1011979;
double r1011981 = /* ERROR: no complex support in C */;
return r1011981;
}
double f() {
double r1011982 = -1.0;
double r1011983 = 0.0;
double r1011984 = /* ERROR: no complex support in C */;
double r1011985 = /* ERROR: no complex support in C */;
return r1011985;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019149
(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))))