\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.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.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.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.0 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(\left(6 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
\Re(\left(\left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(6 + 0.0 i\right)\right)\right) + \left(1 + 0.0 i\right)\right) + \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(20 + 0.0 i\right)\right)\right) + \left(\left(-1 + 1 i\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(-1 + 1 i\right) + \left(6 + 0.0 i\right)\right)\right)\right)\right)\right)\right))
double f() {
double r19858 = -1.0;
double r19859 = 1.0;
double r19860 = /* ERROR: no complex support in C */;
double r19861 = r19860 * r19860;
double r19862 = r19861 * r19860;
double r19863 = r19862 * r19860;
double r19864 = r19863 * r19860;
double r19865 = r19864 * r19860;
double r19866 = 6.0;
double r19867 = 0.0;
double r19868 = /* ERROR: no complex support in C */;
double r19869 = r19868 * r19860;
double r19870 = r19869 * r19860;
double r19871 = r19870 * r19860;
double r19872 = r19871 * r19860;
double r19873 = r19872 * r19860;
double r19874 = r19865 + r19873;
double r19875 = 15.0;
double r19876 = /* ERROR: no complex support in C */;
double r19877 = r19876 * r19860;
double r19878 = r19877 * r19860;
double r19879 = r19878 * r19860;
double r19880 = r19879 * r19860;
double r19881 = r19874 + r19880;
double r19882 = 20.0;
double r19883 = /* ERROR: no complex support in C */;
double r19884 = r19883 * r19860;
double r19885 = r19884 * r19860;
double r19886 = r19885 * r19860;
double r19887 = r19881 + r19886;
double r19888 = r19887 + r19878;
double r19889 = r19888 + r19869;
double r19890 = /* ERROR: no complex support in C */;
double r19891 = r19889 + r19890;
double r19892 = /* ERROR: no complex support in C */;
return r19892;
}
double f() {
double r19893 = -1.0;
double r19894 = 1.0;
double r19895 = /* ERROR: no complex support in C */;
double r19896 = 15.0;
double r19897 = 0.0;
double r19898 = /* ERROR: no complex support in C */;
double r19899 = r19898 * r19895;
double r19900 = 6.0;
double r19901 = /* ERROR: no complex support in C */;
double r19902 = r19899 + r19901;
double r19903 = r19895 * r19902;
double r19904 = /* ERROR: no complex support in C */;
double r19905 = r19903 + r19904;
double r19906 = r19895 * r19895;
double r19907 = 20.0;
double r19908 = /* ERROR: no complex support in C */;
double r19909 = r19899 + r19908;
double r19910 = r19895 * r19909;
double r19911 = r19895 + r19901;
double r19912 = r19906 * r19911;
double r19913 = r19895 * r19912;
double r19914 = r19910 + r19913;
double r19915 = r19906 * r19914;
double r19916 = r19905 + r19915;
double r19917 = /* ERROR: no complex support in C */;
return r19917;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019326
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1 1) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (* (* (* (* (* (complex 6 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (* (complex 20 0.0) (complex -1 1)) (complex -1 1)) (complex -1 1))) (* (* (complex 15 0.0) (complex -1 1)) (complex -1 1))) (* (complex 6 0.0) (complex -1 1))) (complex 1 0.0))))