\Im(\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))
\Im(\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))
double f() {
double r13927 = -1.0;
double r13928 = 1.0;
double r13929 = /* ERROR: no complex support in C */;
double r13930 = r13929 * r13929;
double r13931 = r13930 * r13929;
double r13932 = r13931 * r13929;
double r13933 = r13932 * r13929;
double r13934 = r13933 * r13929;
double r13935 = 6.0;
double r13936 = 0.0;
double r13937 = /* ERROR: no complex support in C */;
double r13938 = r13937 * r13929;
double r13939 = r13938 * r13929;
double r13940 = r13939 * r13929;
double r13941 = r13940 * r13929;
double r13942 = r13941 * r13929;
double r13943 = r13934 + r13942;
double r13944 = 15.0;
double r13945 = /* ERROR: no complex support in C */;
double r13946 = r13945 * r13929;
double r13947 = r13946 * r13929;
double r13948 = r13947 * r13929;
double r13949 = r13948 * r13929;
double r13950 = r13943 + r13949;
double r13951 = 20.0;
double r13952 = /* ERROR: no complex support in C */;
double r13953 = r13952 * r13929;
double r13954 = r13953 * r13929;
double r13955 = r13954 * r13929;
double r13956 = r13950 + r13955;
double r13957 = r13956 + r13947;
double r13958 = r13957 + r13938;
double r13959 = /* ERROR: no complex support in C */;
double r13960 = r13958 + r13959;
double r13961 = /* ERROR: no complex support in C */;
return r13961;
}
double f() {
double r13962 = -1.0;
double r13963 = 1.0;
double r13964 = /* ERROR: no complex support in C */;
double r13965 = r13964 * r13964;
double r13966 = r13965 * r13964;
double r13967 = r13966 * r13964;
double r13968 = r13967 * r13964;
double r13969 = r13968 * r13964;
double r13970 = 6.0;
double r13971 = 0.0;
double r13972 = /* ERROR: no complex support in C */;
double r13973 = r13972 * r13964;
double r13974 = r13973 * r13964;
double r13975 = r13974 * r13964;
double r13976 = r13975 * r13964;
double r13977 = r13976 * r13964;
double r13978 = r13969 + r13977;
double r13979 = 15.0;
double r13980 = /* ERROR: no complex support in C */;
double r13981 = r13980 * r13964;
double r13982 = r13981 * r13964;
double r13983 = r13982 * r13964;
double r13984 = r13983 * r13964;
double r13985 = r13978 + r13984;
double r13986 = 20.0;
double r13987 = /* ERROR: no complex support in C */;
double r13988 = r13987 * r13964;
double r13989 = r13988 * r13964;
double r13990 = r13989 * r13964;
double r13991 = r13985 + r13990;
double r13992 = r13991 + r13982;
double r13993 = r13992 + r13973;
double r13994 = /* ERROR: no complex support in C */;
double r13995 = r13993 + r13994;
double r13996 = /* ERROR: no complex support in C */;
return r13996;
}
Initial program 0
Final simplification0
herbie shell --seed 2020034
(FPCore ()
:name "3.9.1 imaginary part (p56)"
:precision binary64
(im (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))