\Re(\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))
\Re(\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 r146 = -1.0;
double r147 = 1.0;
double r148 = /* ERROR: no complex support in C */;
double r149 = r148 * r148;
double r150 = r149 * r148;
double r151 = r150 * r148;
double r152 = r151 * r148;
double r153 = r152 * r148;
double r154 = 6.0;
double r155 = 0.0;
double r156 = /* ERROR: no complex support in C */;
double r157 = r156 * r148;
double r158 = r157 * r148;
double r159 = r158 * r148;
double r160 = r159 * r148;
double r161 = r160 * r148;
double r162 = r153 + r161;
double r163 = 15.0;
double r164 = /* ERROR: no complex support in C */;
double r165 = r164 * r148;
double r166 = r165 * r148;
double r167 = r166 * r148;
double r168 = r167 * r148;
double r169 = r162 + r168;
double r170 = 20.0;
double r171 = /* ERROR: no complex support in C */;
double r172 = r171 * r148;
double r173 = r172 * r148;
double r174 = r173 * r148;
double r175 = r169 + r174;
double r176 = r175 + r166;
double r177 = r176 + r157;
double r178 = /* ERROR: no complex support in C */;
double r179 = r177 + r178;
double r180 = /* ERROR: no complex support in C */;
return r180;
}
double f() {
double r181 = -1.0;
double r182 = 1.0;
double r183 = /* ERROR: no complex support in C */;
double r184 = r183 * r183;
double r185 = r184 * r183;
double r186 = r185 * r183;
double r187 = r186 * r183;
double r188 = r187 * r183;
double r189 = 6.0;
double r190 = 0.0;
double r191 = /* ERROR: no complex support in C */;
double r192 = r191 * r183;
double r193 = r192 * r183;
double r194 = r193 * r183;
double r195 = r194 * r183;
double r196 = r195 * r183;
double r197 = r188 + r196;
double r198 = 15.0;
double r199 = /* ERROR: no complex support in C */;
double r200 = r199 * r183;
double r201 = r200 * r183;
double r202 = r201 * r183;
double r203 = r202 * r183;
double r204 = r197 + r203;
double r205 = 20.0;
double r206 = /* ERROR: no complex support in C */;
double r207 = r206 * r183;
double r208 = r207 * r183;
double r209 = r208 * r183;
double r210 = r204 + r209;
double r211 = r210 + r201;
double r212 = r211 + r192;
double r213 = /* ERROR: no complex support in C */;
double r214 = r212 + r213;
double r215 = /* ERROR: no complex support in C */;
return r215;
}
Initial program 0
Final simplification0
herbie shell --seed 2020025
(FPCore ()
:name "3.9.1 real part (p56)"
:precision binary64
(re (+ (+ (+ (+ (+ (+ (* (* (* (* (* (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))))