\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 r25954 = -1.0;
double r25955 = 1.0;
double r25956 = /* ERROR: no complex support in C */;
double r25957 = r25956 * r25956;
double r25958 = r25957 * r25956;
double r25959 = r25958 * r25956;
double r25960 = r25959 * r25956;
double r25961 = r25960 * r25956;
double r25962 = 6.0;
double r25963 = 0.0;
double r25964 = /* ERROR: no complex support in C */;
double r25965 = r25964 * r25956;
double r25966 = r25965 * r25956;
double r25967 = r25966 * r25956;
double r25968 = r25967 * r25956;
double r25969 = r25968 * r25956;
double r25970 = r25961 + r25969;
double r25971 = 15.0;
double r25972 = /* ERROR: no complex support in C */;
double r25973 = r25972 * r25956;
double r25974 = r25973 * r25956;
double r25975 = r25974 * r25956;
double r25976 = r25975 * r25956;
double r25977 = r25970 + r25976;
double r25978 = 20.0;
double r25979 = /* ERROR: no complex support in C */;
double r25980 = r25979 * r25956;
double r25981 = r25980 * r25956;
double r25982 = r25981 * r25956;
double r25983 = r25977 + r25982;
double r25984 = r25983 + r25974;
double r25985 = r25984 + r25965;
double r25986 = /* ERROR: no complex support in C */;
double r25987 = r25985 + r25986;
double r25988 = /* ERROR: no complex support in C */;
return r25988;
}
double f() {
double r25989 = -1.0;
double r25990 = 0.0;
double r25991 = /* ERROR: no complex support in C */;
double r25992 = /* ERROR: no complex support in C */;
return r25992;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019144
(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))))