\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 r33964 = -1.0;
double r33965 = 1.0;
double r33966 = /* ERROR: no complex support in C */;
double r33967 = r33966 * r33966;
double r33968 = r33967 * r33966;
double r33969 = r33968 * r33966;
double r33970 = r33969 * r33966;
double r33971 = r33970 * r33966;
double r33972 = 6.0;
double r33973 = 0.0;
double r33974 = /* ERROR: no complex support in C */;
double r33975 = r33974 * r33966;
double r33976 = r33975 * r33966;
double r33977 = r33976 * r33966;
double r33978 = r33977 * r33966;
double r33979 = r33978 * r33966;
double r33980 = r33971 + r33979;
double r33981 = 15.0;
double r33982 = /* ERROR: no complex support in C */;
double r33983 = r33982 * r33966;
double r33984 = r33983 * r33966;
double r33985 = r33984 * r33966;
double r33986 = r33985 * r33966;
double r33987 = r33980 + r33986;
double r33988 = 20.0;
double r33989 = /* ERROR: no complex support in C */;
double r33990 = r33989 * r33966;
double r33991 = r33990 * r33966;
double r33992 = r33991 * r33966;
double r33993 = r33987 + r33992;
double r33994 = r33993 + r33984;
double r33995 = r33994 + r33975;
double r33996 = /* ERROR: no complex support in C */;
double r33997 = r33995 + r33996;
double r33998 = /* ERROR: no complex support in C */;
return r33998;
}
double f() {
double r33999 = -1.0;
double r34000 = 1.0;
double r34001 = /* ERROR: no complex support in C */;
double r34002 = r34001 * r34001;
double r34003 = r34002 * r34001;
double r34004 = r34003 * r34001;
double r34005 = r34004 * r34001;
double r34006 = r34005 * r34001;
double r34007 = 6.0;
double r34008 = 0.0;
double r34009 = /* ERROR: no complex support in C */;
double r34010 = r34009 * r34001;
double r34011 = r34010 * r34001;
double r34012 = r34011 * r34001;
double r34013 = r34012 * r34001;
double r34014 = r34013 * r34001;
double r34015 = r34006 + r34014;
double r34016 = 15.0;
double r34017 = /* ERROR: no complex support in C */;
double r34018 = r34017 * r34001;
double r34019 = r34018 * r34001;
double r34020 = r34019 * r34001;
double r34021 = r34020 * r34001;
double r34022 = r34015 + r34021;
double r34023 = 20.0;
double r34024 = /* ERROR: no complex support in C */;
double r34025 = r34024 * r34001;
double r34026 = r34025 * r34001;
double r34027 = r34026 * r34001;
double r34028 = r34022 + r34027;
double r34029 = r34028 + r34019;
double r34030 = r34029 + r34010;
double r34031 = /* ERROR: no complex support in C */;
double r34032 = r34030 + r34031;
double r34033 = /* ERROR: no complex support in C */;
return r34033;
}
Initial program 0
Final simplification0
herbie shell --seed 2020064 +o rules:numerics
(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))))