\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 r44029 = -1.0;
double r44030 = 1.0;
double r44031 = /* ERROR: no complex support in C */;
double r44032 = r44031 * r44031;
double r44033 = r44032 * r44031;
double r44034 = r44033 * r44031;
double r44035 = r44034 * r44031;
double r44036 = r44035 * r44031;
double r44037 = 6.0;
double r44038 = 0.0;
double r44039 = /* ERROR: no complex support in C */;
double r44040 = r44039 * r44031;
double r44041 = r44040 * r44031;
double r44042 = r44041 * r44031;
double r44043 = r44042 * r44031;
double r44044 = r44043 * r44031;
double r44045 = r44036 + r44044;
double r44046 = 15.0;
double r44047 = /* ERROR: no complex support in C */;
double r44048 = r44047 * r44031;
double r44049 = r44048 * r44031;
double r44050 = r44049 * r44031;
double r44051 = r44050 * r44031;
double r44052 = r44045 + r44051;
double r44053 = 20.0;
double r44054 = /* ERROR: no complex support in C */;
double r44055 = r44054 * r44031;
double r44056 = r44055 * r44031;
double r44057 = r44056 * r44031;
double r44058 = r44052 + r44057;
double r44059 = r44058 + r44049;
double r44060 = r44059 + r44040;
double r44061 = /* ERROR: no complex support in C */;
double r44062 = r44060 + r44061;
double r44063 = /* ERROR: no complex support in C */;
return r44063;
}
double f() {
double r44064 = -1.0;
double r44065 = 1.0;
double r44066 = /* ERROR: no complex support in C */;
double r44067 = r44066 * r44066;
double r44068 = r44067 * r44066;
double r44069 = r44068 * r44066;
double r44070 = r44069 * r44066;
double r44071 = r44070 * r44066;
double r44072 = 6.0;
double r44073 = 0.0;
double r44074 = /* ERROR: no complex support in C */;
double r44075 = r44074 * r44066;
double r44076 = r44075 * r44066;
double r44077 = r44076 * r44066;
double r44078 = r44077 * r44066;
double r44079 = r44078 * r44066;
double r44080 = r44071 + r44079;
double r44081 = 15.0;
double r44082 = /* ERROR: no complex support in C */;
double r44083 = r44082 * r44066;
double r44084 = r44083 * r44066;
double r44085 = r44084 * r44066;
double r44086 = r44085 * r44066;
double r44087 = r44080 + r44086;
double r44088 = 20.0;
double r44089 = /* ERROR: no complex support in C */;
double r44090 = r44089 * r44066;
double r44091 = r44090 * r44066;
double r44092 = r44091 * r44066;
double r44093 = r44087 + r44092;
double r44094 = r44093 + r44084;
double r44095 = r44094 + r44075;
double r44096 = /* ERROR: no complex support in C */;
double r44097 = r44095 + r44096;
double r44098 = /* ERROR: no complex support in C */;
return r44098;
}
Initial program 0
Final simplification0
herbie shell --seed 2019297
(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))))