\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 r19088 = -1.0;
double r19089 = 1.0;
double r19090 = /* ERROR: no complex support in C */;
double r19091 = r19090 * r19090;
double r19092 = r19091 * r19090;
double r19093 = r19092 * r19090;
double r19094 = r19093 * r19090;
double r19095 = r19094 * r19090;
double r19096 = 6.0;
double r19097 = 0.0;
double r19098 = /* ERROR: no complex support in C */;
double r19099 = r19098 * r19090;
double r19100 = r19099 * r19090;
double r19101 = r19100 * r19090;
double r19102 = r19101 * r19090;
double r19103 = r19102 * r19090;
double r19104 = r19095 + r19103;
double r19105 = 15.0;
double r19106 = /* ERROR: no complex support in C */;
double r19107 = r19106 * r19090;
double r19108 = r19107 * r19090;
double r19109 = r19108 * r19090;
double r19110 = r19109 * r19090;
double r19111 = r19104 + r19110;
double r19112 = 20.0;
double r19113 = /* ERROR: no complex support in C */;
double r19114 = r19113 * r19090;
double r19115 = r19114 * r19090;
double r19116 = r19115 * r19090;
double r19117 = r19111 + r19116;
double r19118 = r19117 + r19108;
double r19119 = r19118 + r19099;
double r19120 = /* ERROR: no complex support in C */;
double r19121 = r19119 + r19120;
double r19122 = /* ERROR: no complex support in C */;
return r19122;
}
double f() {
double r19123 = -1.0;
double r19124 = 1.0;
double r19125 = /* ERROR: no complex support in C */;
double r19126 = r19125 * r19125;
double r19127 = r19126 * r19125;
double r19128 = r19127 * r19125;
double r19129 = r19128 * r19125;
double r19130 = r19129 * r19125;
double r19131 = 6.0;
double r19132 = 0.0;
double r19133 = /* ERROR: no complex support in C */;
double r19134 = r19133 * r19125;
double r19135 = r19134 * r19125;
double r19136 = r19135 * r19125;
double r19137 = r19136 * r19125;
double r19138 = r19137 * r19125;
double r19139 = r19130 + r19138;
double r19140 = 15.0;
double r19141 = /* ERROR: no complex support in C */;
double r19142 = r19141 * r19125;
double r19143 = r19142 * r19125;
double r19144 = r19143 * r19125;
double r19145 = r19144 * r19125;
double r19146 = r19139 + r19145;
double r19147 = 20.0;
double r19148 = /* ERROR: no complex support in C */;
double r19149 = r19148 * r19125;
double r19150 = r19149 * r19125;
double r19151 = r19150 * r19125;
double r19152 = r19146 + r19151;
double r19153 = r19152 + r19143;
double r19154 = r19153 + r19134;
double r19155 = /* ERROR: no complex support in C */;
double r19156 = r19154 + r19155;
double r19157 = /* ERROR: no complex support in C */;
return r19157;
}
Initial program 0
Final simplification0
herbie shell --seed 2020002
(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))))