\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 r31124 = -1.0;
double r31125 = 1.0;
double r31126 = /* ERROR: no complex support in C */;
double r31127 = r31126 * r31126;
double r31128 = r31127 * r31126;
double r31129 = r31128 * r31126;
double r31130 = r31129 * r31126;
double r31131 = r31130 * r31126;
double r31132 = 6.0;
double r31133 = 0.0;
double r31134 = /* ERROR: no complex support in C */;
double r31135 = r31134 * r31126;
double r31136 = r31135 * r31126;
double r31137 = r31136 * r31126;
double r31138 = r31137 * r31126;
double r31139 = r31138 * r31126;
double r31140 = r31131 + r31139;
double r31141 = 15.0;
double r31142 = /* ERROR: no complex support in C */;
double r31143 = r31142 * r31126;
double r31144 = r31143 * r31126;
double r31145 = r31144 * r31126;
double r31146 = r31145 * r31126;
double r31147 = r31140 + r31146;
double r31148 = 20.0;
double r31149 = /* ERROR: no complex support in C */;
double r31150 = r31149 * r31126;
double r31151 = r31150 * r31126;
double r31152 = r31151 * r31126;
double r31153 = r31147 + r31152;
double r31154 = r31153 + r31144;
double r31155 = r31154 + r31135;
double r31156 = /* ERROR: no complex support in C */;
double r31157 = r31155 + r31156;
double r31158 = /* ERROR: no complex support in C */;
return r31158;
}
double f() {
double r31159 = -1.0;
double r31160 = 1.0;
double r31161 = /* ERROR: no complex support in C */;
double r31162 = r31161 * r31161;
double r31163 = r31162 * r31161;
double r31164 = r31163 * r31161;
double r31165 = r31164 * r31161;
double r31166 = r31165 * r31161;
double r31167 = 6.0;
double r31168 = 0.0;
double r31169 = /* ERROR: no complex support in C */;
double r31170 = r31169 * r31161;
double r31171 = r31170 * r31161;
double r31172 = r31171 * r31161;
double r31173 = r31172 * r31161;
double r31174 = r31173 * r31161;
double r31175 = r31166 + r31174;
double r31176 = 15.0;
double r31177 = /* ERROR: no complex support in C */;
double r31178 = r31177 * r31161;
double r31179 = r31178 * r31161;
double r31180 = r31179 * r31161;
double r31181 = r31180 * r31161;
double r31182 = r31175 + r31181;
double r31183 = 20.0;
double r31184 = /* ERROR: no complex support in C */;
double r31185 = r31184 * r31161;
double r31186 = r31185 * r31161;
double r31187 = r31186 * r31161;
double r31188 = r31182 + r31187;
double r31189 = r31188 + r31179;
double r31190 = r31189 + r31170;
double r31191 = /* ERROR: no complex support in C */;
double r31192 = r31190 + r31191;
double r31193 = /* ERROR: no complex support in C */;
return r31193;
}
Initial program 0
Final simplification0
herbie shell --seed 2020065 +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))))