\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 r30150 = -1.0;
double r30151 = 1.0;
double r30152 = /* ERROR: no complex support in C */;
double r30153 = r30152 * r30152;
double r30154 = r30153 * r30152;
double r30155 = r30154 * r30152;
double r30156 = r30155 * r30152;
double r30157 = r30156 * r30152;
double r30158 = 6.0;
double r30159 = 0.0;
double r30160 = /* ERROR: no complex support in C */;
double r30161 = r30160 * r30152;
double r30162 = r30161 * r30152;
double r30163 = r30162 * r30152;
double r30164 = r30163 * r30152;
double r30165 = r30164 * r30152;
double r30166 = r30157 + r30165;
double r30167 = 15.0;
double r30168 = /* ERROR: no complex support in C */;
double r30169 = r30168 * r30152;
double r30170 = r30169 * r30152;
double r30171 = r30170 * r30152;
double r30172 = r30171 * r30152;
double r30173 = r30166 + r30172;
double r30174 = 20.0;
double r30175 = /* ERROR: no complex support in C */;
double r30176 = r30175 * r30152;
double r30177 = r30176 * r30152;
double r30178 = r30177 * r30152;
double r30179 = r30173 + r30178;
double r30180 = r30179 + r30170;
double r30181 = r30180 + r30161;
double r30182 = /* ERROR: no complex support in C */;
double r30183 = r30181 + r30182;
double r30184 = /* ERROR: no complex support in C */;
return r30184;
}
double f() {
double r30185 = -1.0;
double r30186 = 1.0;
double r30187 = /* ERROR: no complex support in C */;
double r30188 = r30187 * r30187;
double r30189 = r30188 * r30187;
double r30190 = r30189 * r30187;
double r30191 = r30190 * r30187;
double r30192 = r30191 * r30187;
double r30193 = 6.0;
double r30194 = 0.0;
double r30195 = /* ERROR: no complex support in C */;
double r30196 = r30195 * r30187;
double r30197 = r30196 * r30187;
double r30198 = r30197 * r30187;
double r30199 = r30198 * r30187;
double r30200 = r30199 * r30187;
double r30201 = r30192 + r30200;
double r30202 = 15.0;
double r30203 = /* ERROR: no complex support in C */;
double r30204 = r30203 * r30187;
double r30205 = r30204 * r30187;
double r30206 = r30205 * r30187;
double r30207 = r30206 * r30187;
double r30208 = r30201 + r30207;
double r30209 = 20.0;
double r30210 = /* ERROR: no complex support in C */;
double r30211 = r30210 * r30187;
double r30212 = r30211 * r30187;
double r30213 = r30212 * r30187;
double r30214 = r30208 + r30213;
double r30215 = r30214 + r30205;
double r30216 = r30215 + r30196;
double r30217 = /* ERROR: no complex support in C */;
double r30218 = r30216 + r30217;
double r30219 = /* ERROR: no complex support in C */;
return r30219;
}
Initial program 0
Final simplification0
herbie shell --seed 2019304
(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))))