\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(1 + -1\right) \cdot 15\right) \cdot \left(-1 - 1\right) - \left(\left(-1 + -1\right) \cdot 1\right) \cdot 0.0\right) + \left(-1 \cdot 6 - 1 \cdot 0.0\right)\right) + \left(\left(-1 \cdot 6 - 1 \cdot 0.0\right) \cdot \left(\left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) \cdot \left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) - \left(\left(-1 + -1\right) \cdot 1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right) - \left(0.0 \cdot -1 + 1 \cdot 6\right) \cdot \left(\left(-1 - 1\right) \cdot \left(\left(1 + -1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right) + \left(-1 - 1\right) \cdot \left(\left(1 + -1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right)\right)\right)\right) + \left(\left(\left(-1 \cdot 6 - 1 \cdot 0.0\right) \cdot \left(\left(-1 - 1\right) \cdot \left(\left(1 + -1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right) + \left(-1 - 1\right) \cdot \left(\left(1 + -1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right)\right) + \left(0.0 \cdot -1 + 1 \cdot 6\right) \cdot \left(\left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) \cdot \left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) - \left(\left(-1 + -1\right) \cdot 1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right)\right) + \left(\left(0.0 \cdot -1 + 1 \cdot 6\right) + \left(\left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) \cdot 0.0 + \left(\left(-1 + -1\right) \cdot 1\right) \cdot 15\right)\right)\right) i\right) + \left(\left(\left(\left(\left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) \cdot \left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) - \left(\left(-1 + -1\right) \cdot 1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right) + \left(\left(20 \cdot -1 - 1 \cdot 0.0\right) + \left(\left(\left(1 + -1\right) \cdot 15\right) \cdot \left(-1 - 1\right) - \left(\left(-1 + -1\right) \cdot 1\right) \cdot 0.0\right)\right)\right) + \left(\left(\left(-1 - 1\right) \cdot \left(\left(1 + -1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right) + \left(-1 - 1\right) \cdot \left(\left(1 + -1\right) \cdot \left(\left(-1 + -1\right) \cdot 1\right)\right)\right) + \left(\left(\left(\left(1 + -1\right) \cdot \left(-1 - 1\right)\right) \cdot 0.0 + \left(\left(-1 + -1\right) \cdot 1\right) \cdot 15\right) + \left(20 \cdot 1 + 0.0 \cdot -1\right)\right)\right) i\right) \cdot \left(\left(1 + -1\right) \cdot \left(-1 - 1\right) + \left(-1 + -1\right) \cdot 1 i\right)\right)\right) + \left(1 + 0.0 i\right)\right))
double f() {
double r1999133 = -1.0;
double r1999134 = 1.0;
double r1999135 = /* ERROR: no complex support in C */;
double r1999136 = r1999135 * r1999135;
double r1999137 = r1999136 * r1999135;
double r1999138 = r1999137 * r1999135;
double r1999139 = r1999138 * r1999135;
double r1999140 = r1999139 * r1999135;
double r1999141 = 6.0;
double r1999142 = 0.0;
double r1999143 = /* ERROR: no complex support in C */;
double r1999144 = r1999143 * r1999135;
double r1999145 = r1999144 * r1999135;
double r1999146 = r1999145 * r1999135;
double r1999147 = r1999146 * r1999135;
double r1999148 = r1999147 * r1999135;
double r1999149 = r1999140 + r1999148;
double r1999150 = 15.0;
double r1999151 = /* ERROR: no complex support in C */;
double r1999152 = r1999151 * r1999135;
double r1999153 = r1999152 * r1999135;
double r1999154 = r1999153 * r1999135;
double r1999155 = r1999154 * r1999135;
double r1999156 = r1999149 + r1999155;
double r1999157 = 20.0;
double r1999158 = /* ERROR: no complex support in C */;
double r1999159 = r1999158 * r1999135;
double r1999160 = r1999159 * r1999135;
double r1999161 = r1999160 * r1999135;
double r1999162 = r1999156 + r1999161;
double r1999163 = r1999162 + r1999153;
double r1999164 = r1999163 + r1999144;
double r1999165 = /* ERROR: no complex support in C */;
double r1999166 = r1999164 + r1999165;
double r1999167 = /* ERROR: no complex support in C */;
return r1999167;
}
double f() {
double r1999168 = 1.0;
double r1999169 = -1.0;
double r1999170 = r1999168 + r1999169;
double r1999171 = 15.0;
double r1999172 = r1999170 * r1999171;
double r1999173 = r1999169 - r1999168;
double r1999174 = r1999172 * r1999173;
double r1999175 = r1999169 + r1999169;
double r1999176 = r1999175 * r1999168;
double r1999177 = 0.0;
double r1999178 = r1999176 * r1999177;
double r1999179 = r1999174 - r1999178;
double r1999180 = 6.0;
double r1999181 = r1999169 * r1999180;
double r1999182 = r1999168 * r1999177;
double r1999183 = r1999181 - r1999182;
double r1999184 = r1999179 + r1999183;
double r1999185 = r1999170 * r1999173;
double r1999186 = r1999185 * r1999185;
double r1999187 = r1999176 * r1999176;
double r1999188 = r1999186 - r1999187;
double r1999189 = r1999183 * r1999188;
double r1999190 = r1999177 * r1999169;
double r1999191 = r1999168 * r1999180;
double r1999192 = r1999190 + r1999191;
double r1999193 = r1999170 * r1999176;
double r1999194 = r1999173 * r1999193;
double r1999195 = r1999194 + r1999194;
double r1999196 = r1999192 * r1999195;
double r1999197 = r1999189 - r1999196;
double r1999198 = r1999184 + r1999197;
double r1999199 = r1999183 * r1999195;
double r1999200 = r1999192 * r1999188;
double r1999201 = r1999199 + r1999200;
double r1999202 = r1999185 * r1999177;
double r1999203 = r1999176 * r1999171;
double r1999204 = r1999202 + r1999203;
double r1999205 = r1999192 + r1999204;
double r1999206 = r1999201 + r1999205;
double r1999207 = /* ERROR: no complex support in C */;
double r1999208 = 20.0;
double r1999209 = r1999208 * r1999169;
double r1999210 = r1999209 - r1999182;
double r1999211 = r1999210 + r1999179;
double r1999212 = r1999188 + r1999211;
double r1999213 = r1999208 * r1999168;
double r1999214 = r1999213 + r1999190;
double r1999215 = r1999204 + r1999214;
double r1999216 = r1999195 + r1999215;
double r1999217 = /* ERROR: no complex support in C */;
double r1999218 = /* ERROR: no complex support in C */;
double r1999219 = r1999217 * r1999218;
double r1999220 = r1999207 + r1999219;
double r1999221 = /* ERROR: no complex support in C */;
double r1999222 = r1999220 + r1999221;
double r1999223 = /* ERROR: no complex support in C */;
return r1999223;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019172
(FPCore ()
:name "3.9.1 imaginary part (p56)"
(im (+ (+ (+ (+ (+ (+ (* (* (* (* (* (complex -1.0 1.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (* (* (* (* (* (complex 6.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (* (* (complex 15.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (* (complex 20.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (* (complex 15.0 0.0) (complex -1.0 1.0)) (complex -1.0 1.0))) (* (complex 6.0 0.0) (complex -1.0 1.0))) (complex 1.0 0.0))))