\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(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(\left(-1 + 1 i\right) \cdot \left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(20 + 0.0 i\right)\right)\right) + \left(\left(\left(\left(-1 + 1 i\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(-1 + 1 i\right)\right) \cdot \left(\left(6 + 0.0 i\right) + \left(-1 + 1 i\right)\right)\right)\right)\right) + \left(1 + 0.0 i\right)\right) + \left(\left(\left(\left(15 + 0.0 i\right) \cdot \left(-1 + 1 i\right)\right) + \left(6 + 0.0 i\right)\right) \cdot \left(-1 + 1 i\right)\right)\right))
double f() {
double r26117 = -1.0;
double r26118 = 1.0;
double r26119 = /* ERROR: no complex support in C */;
double r26120 = r26119 * r26119;
double r26121 = r26120 * r26119;
double r26122 = r26121 * r26119;
double r26123 = r26122 * r26119;
double r26124 = r26123 * r26119;
double r26125 = 6.0;
double r26126 = 0.0;
double r26127 = /* ERROR: no complex support in C */;
double r26128 = r26127 * r26119;
double r26129 = r26128 * r26119;
double r26130 = r26129 * r26119;
double r26131 = r26130 * r26119;
double r26132 = r26131 * r26119;
double r26133 = r26124 + r26132;
double r26134 = 15.0;
double r26135 = /* ERROR: no complex support in C */;
double r26136 = r26135 * r26119;
double r26137 = r26136 * r26119;
double r26138 = r26137 * r26119;
double r26139 = r26138 * r26119;
double r26140 = r26133 + r26139;
double r26141 = 20.0;
double r26142 = /* ERROR: no complex support in C */;
double r26143 = r26142 * r26119;
double r26144 = r26143 * r26119;
double r26145 = r26144 * r26119;
double r26146 = r26140 + r26145;
double r26147 = r26146 + r26137;
double r26148 = r26147 + r26128;
double r26149 = /* ERROR: no complex support in C */;
double r26150 = r26148 + r26149;
double r26151 = /* ERROR: no complex support in C */;
return r26151;
}
double f() {
double r26152 = -1.0;
double r26153 = 1.0;
double r26154 = /* ERROR: no complex support in C */;
double r26155 = r26154 * r26154;
double r26156 = 15.0;
double r26157 = 0.0;
double r26158 = /* ERROR: no complex support in C */;
double r26159 = r26158 * r26154;
double r26160 = 20.0;
double r26161 = /* ERROR: no complex support in C */;
double r26162 = r26159 + r26161;
double r26163 = r26154 * r26162;
double r26164 = r26155 * r26154;
double r26165 = 6.0;
double r26166 = /* ERROR: no complex support in C */;
double r26167 = r26166 + r26154;
double r26168 = r26164 * r26167;
double r26169 = r26163 + r26168;
double r26170 = r26155 * r26169;
double r26171 = /* ERROR: no complex support in C */;
double r26172 = r26170 + r26171;
double r26173 = r26159 + r26166;
double r26174 = r26173 * r26154;
double r26175 = r26172 + r26174;
double r26176 = /* ERROR: no complex support in C */;
return r26176;
}
Initial program 0
Simplified0
Final simplification0
herbie shell --seed 2019323
(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))))