\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 r19113 = -1.0;
double r19114 = 1.0;
double r19115 = /* ERROR: no complex support in C */;
double r19116 = r19115 * r19115;
double r19117 = r19116 * r19115;
double r19118 = r19117 * r19115;
double r19119 = r19118 * r19115;
double r19120 = r19119 * r19115;
double r19121 = 6.0;
double r19122 = 0.0;
double r19123 = /* ERROR: no complex support in C */;
double r19124 = r19123 * r19115;
double r19125 = r19124 * r19115;
double r19126 = r19125 * r19115;
double r19127 = r19126 * r19115;
double r19128 = r19127 * r19115;
double r19129 = r19120 + r19128;
double r19130 = 15.0;
double r19131 = /* ERROR: no complex support in C */;
double r19132 = r19131 * r19115;
double r19133 = r19132 * r19115;
double r19134 = r19133 * r19115;
double r19135 = r19134 * r19115;
double r19136 = r19129 + r19135;
double r19137 = 20.0;
double r19138 = /* ERROR: no complex support in C */;
double r19139 = r19138 * r19115;
double r19140 = r19139 * r19115;
double r19141 = r19140 * r19115;
double r19142 = r19136 + r19141;
double r19143 = r19142 + r19133;
double r19144 = r19143 + r19124;
double r19145 = /* ERROR: no complex support in C */;
double r19146 = r19144 + r19145;
double r19147 = /* ERROR: no complex support in C */;
return r19147;
}
double f() {
double r19148 = -1.0;
double r19149 = 1.0;
double r19150 = /* ERROR: no complex support in C */;
double r19151 = r19150 * r19150;
double r19152 = r19151 * r19150;
double r19153 = r19152 * r19150;
double r19154 = r19153 * r19150;
double r19155 = r19154 * r19150;
double r19156 = 6.0;
double r19157 = 0.0;
double r19158 = /* ERROR: no complex support in C */;
double r19159 = r19158 * r19150;
double r19160 = r19159 * r19150;
double r19161 = r19160 * r19150;
double r19162 = r19161 * r19150;
double r19163 = r19162 * r19150;
double r19164 = r19155 + r19163;
double r19165 = 15.0;
double r19166 = /* ERROR: no complex support in C */;
double r19167 = r19166 * r19150;
double r19168 = r19167 * r19150;
double r19169 = r19168 * r19150;
double r19170 = r19169 * r19150;
double r19171 = r19164 + r19170;
double r19172 = 20.0;
double r19173 = /* ERROR: no complex support in C */;
double r19174 = r19173 * r19150;
double r19175 = r19174 * r19150;
double r19176 = r19175 * r19150;
double r19177 = r19171 + r19176;
double r19178 = r19177 + r19168;
double r19179 = r19178 + r19159;
double r19180 = /* ERROR: no complex support in C */;
double r19181 = r19179 + r19180;
double r19182 = /* ERROR: no complex support in C */;
return r19182;
}
Initial program 0
Final simplification0
herbie shell --seed 2020021 +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))))