\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 r41145 = -1.0;
double r41146 = 1.0;
double r41147 = /* ERROR: no complex support in C */;
double r41148 = r41147 * r41147;
double r41149 = r41148 * r41147;
double r41150 = r41149 * r41147;
double r41151 = r41150 * r41147;
double r41152 = r41151 * r41147;
double r41153 = 6.0;
double r41154 = 0.0;
double r41155 = /* ERROR: no complex support in C */;
double r41156 = r41155 * r41147;
double r41157 = r41156 * r41147;
double r41158 = r41157 * r41147;
double r41159 = r41158 * r41147;
double r41160 = r41159 * r41147;
double r41161 = r41152 + r41160;
double r41162 = 15.0;
double r41163 = /* ERROR: no complex support in C */;
double r41164 = r41163 * r41147;
double r41165 = r41164 * r41147;
double r41166 = r41165 * r41147;
double r41167 = r41166 * r41147;
double r41168 = r41161 + r41167;
double r41169 = 20.0;
double r41170 = /* ERROR: no complex support in C */;
double r41171 = r41170 * r41147;
double r41172 = r41171 * r41147;
double r41173 = r41172 * r41147;
double r41174 = r41168 + r41173;
double r41175 = r41174 + r41165;
double r41176 = r41175 + r41156;
double r41177 = /* ERROR: no complex support in C */;
double r41178 = r41176 + r41177;
double r41179 = /* ERROR: no complex support in C */;
return r41179;
}
double f() {
double r41180 = -1.0;
double r41181 = 1.0;
double r41182 = /* ERROR: no complex support in C */;
double r41183 = r41182 * r41182;
double r41184 = r41183 * r41182;
double r41185 = r41184 * r41182;
double r41186 = r41185 * r41182;
double r41187 = r41186 * r41182;
double r41188 = 6.0;
double r41189 = 0.0;
double r41190 = /* ERROR: no complex support in C */;
double r41191 = r41190 * r41182;
double r41192 = r41191 * r41182;
double r41193 = r41192 * r41182;
double r41194 = r41193 * r41182;
double r41195 = r41194 * r41182;
double r41196 = r41187 + r41195;
double r41197 = 15.0;
double r41198 = /* ERROR: no complex support in C */;
double r41199 = r41198 * r41182;
double r41200 = r41199 * r41182;
double r41201 = r41200 * r41182;
double r41202 = r41201 * r41182;
double r41203 = r41196 + r41202;
double r41204 = 20.0;
double r41205 = /* ERROR: no complex support in C */;
double r41206 = r41205 * r41182;
double r41207 = r41206 * r41182;
double r41208 = r41207 * r41182;
double r41209 = r41203 + r41208;
double r41210 = r41209 + r41200;
double r41211 = r41210 + r41191;
double r41212 = /* ERROR: no complex support in C */;
double r41213 = r41211 + r41212;
double r41214 = /* ERROR: no complex support in C */;
return r41214;
}
Initial program 0
Final simplification0
herbie shell --seed 2020043 +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))))