\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 r855924 = -1.0;
double r855925 = 1.0;
double r855926 = /* ERROR: no complex support in C */;
double r855927 = r855926 * r855926;
double r855928 = r855927 * r855926;
double r855929 = r855928 * r855926;
double r855930 = r855929 * r855926;
double r855931 = r855930 * r855926;
double r855932 = 6.0;
double r855933 = 0.0;
double r855934 = /* ERROR: no complex support in C */;
double r855935 = r855934 * r855926;
double r855936 = r855935 * r855926;
double r855937 = r855936 * r855926;
double r855938 = r855937 * r855926;
double r855939 = r855938 * r855926;
double r855940 = r855931 + r855939;
double r855941 = 15.0;
double r855942 = /* ERROR: no complex support in C */;
double r855943 = r855942 * r855926;
double r855944 = r855943 * r855926;
double r855945 = r855944 * r855926;
double r855946 = r855945 * r855926;
double r855947 = r855940 + r855946;
double r855948 = 20.0;
double r855949 = /* ERROR: no complex support in C */;
double r855950 = r855949 * r855926;
double r855951 = r855950 * r855926;
double r855952 = r855951 * r855926;
double r855953 = r855947 + r855952;
double r855954 = r855953 + r855944;
double r855955 = r855954 + r855935;
double r855956 = /* ERROR: no complex support in C */;
double r855957 = r855955 + r855956;
double r855958 = /* ERROR: no complex support in C */;
return r855958;
}
double f() {
double r855959 = -1.0;
double r855960 = 0.0;
double r855961 = /* ERROR: no complex support in C */;
double r855962 = /* ERROR: no complex support in C */;
return r855962;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019143 +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))))