\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 r20944 = -1.0;
double r20945 = 1.0;
double r20946 = /* ERROR: no complex support in C */;
double r20947 = r20946 * r20946;
double r20948 = r20947 * r20946;
double r20949 = r20948 * r20946;
double r20950 = r20949 * r20946;
double r20951 = r20950 * r20946;
double r20952 = 6.0;
double r20953 = 0.0;
double r20954 = /* ERROR: no complex support in C */;
double r20955 = r20954 * r20946;
double r20956 = r20955 * r20946;
double r20957 = r20956 * r20946;
double r20958 = r20957 * r20946;
double r20959 = r20958 * r20946;
double r20960 = r20951 + r20959;
double r20961 = 15.0;
double r20962 = /* ERROR: no complex support in C */;
double r20963 = r20962 * r20946;
double r20964 = r20963 * r20946;
double r20965 = r20964 * r20946;
double r20966 = r20965 * r20946;
double r20967 = r20960 + r20966;
double r20968 = 20.0;
double r20969 = /* ERROR: no complex support in C */;
double r20970 = r20969 * r20946;
double r20971 = r20970 * r20946;
double r20972 = r20971 * r20946;
double r20973 = r20967 + r20972;
double r20974 = r20973 + r20964;
double r20975 = r20974 + r20955;
double r20976 = /* ERROR: no complex support in C */;
double r20977 = r20975 + r20976;
double r20978 = /* ERROR: no complex support in C */;
return r20978;
}
double f() {
double r20979 = -1.0;
double r20980 = 1.0;
double r20981 = /* ERROR: no complex support in C */;
double r20982 = r20981 * r20981;
double r20983 = r20982 * r20981;
double r20984 = r20983 * r20981;
double r20985 = r20984 * r20981;
double r20986 = r20985 * r20981;
double r20987 = 6.0;
double r20988 = 0.0;
double r20989 = /* ERROR: no complex support in C */;
double r20990 = r20989 * r20981;
double r20991 = r20990 * r20981;
double r20992 = r20991 * r20981;
double r20993 = r20992 * r20981;
double r20994 = r20993 * r20981;
double r20995 = r20986 + r20994;
double r20996 = 15.0;
double r20997 = /* ERROR: no complex support in C */;
double r20998 = r20997 * r20981;
double r20999 = r20998 * r20981;
double r21000 = r20999 * r20981;
double r21001 = r21000 * r20981;
double r21002 = r20995 + r21001;
double r21003 = 20.0;
double r21004 = /* ERROR: no complex support in C */;
double r21005 = r21004 * r20981;
double r21006 = r21005 * r20981;
double r21007 = r21006 * r20981;
double r21008 = r21002 + r21007;
double r21009 = r21008 + r20999;
double r21010 = r21009 + r20990;
double r21011 = /* ERROR: no complex support in C */;
double r21012 = r21010 + r21011;
double r21013 = /* ERROR: no complex support in C */;
return r21013;
}
Initial program 0
Final simplification0
herbie shell --seed 2020025
(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))))