\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 r834931 = -1.0;
double r834932 = 1.0;
double r834933 = /* ERROR: no complex support in C */;
double r834934 = r834933 * r834933;
double r834935 = r834934 * r834933;
double r834936 = r834935 * r834933;
double r834937 = r834936 * r834933;
double r834938 = r834937 * r834933;
double r834939 = 6.0;
double r834940 = 0.0;
double r834941 = /* ERROR: no complex support in C */;
double r834942 = r834941 * r834933;
double r834943 = r834942 * r834933;
double r834944 = r834943 * r834933;
double r834945 = r834944 * r834933;
double r834946 = r834945 * r834933;
double r834947 = r834938 + r834946;
double r834948 = 15.0;
double r834949 = /* ERROR: no complex support in C */;
double r834950 = r834949 * r834933;
double r834951 = r834950 * r834933;
double r834952 = r834951 * r834933;
double r834953 = r834952 * r834933;
double r834954 = r834947 + r834953;
double r834955 = 20.0;
double r834956 = /* ERROR: no complex support in C */;
double r834957 = r834956 * r834933;
double r834958 = r834957 * r834933;
double r834959 = r834958 * r834933;
double r834960 = r834954 + r834959;
double r834961 = r834960 + r834951;
double r834962 = r834961 + r834942;
double r834963 = /* ERROR: no complex support in C */;
double r834964 = r834962 + r834963;
double r834965 = /* ERROR: no complex support in C */;
return r834965;
}
double f() {
double r834966 = -1.0;
return r834966;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019164 +o rules:numerics
(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))))