\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 r22176 = -1.0;
double r22177 = 1.0;
double r22178 = /* ERROR: no complex support in C */;
double r22179 = r22178 * r22178;
double r22180 = r22179 * r22178;
double r22181 = r22180 * r22178;
double r22182 = r22181 * r22178;
double r22183 = r22182 * r22178;
double r22184 = 6.0;
double r22185 = 0.0;
double r22186 = /* ERROR: no complex support in C */;
double r22187 = r22186 * r22178;
double r22188 = r22187 * r22178;
double r22189 = r22188 * r22178;
double r22190 = r22189 * r22178;
double r22191 = r22190 * r22178;
double r22192 = r22183 + r22191;
double r22193 = 15.0;
double r22194 = /* ERROR: no complex support in C */;
double r22195 = r22194 * r22178;
double r22196 = r22195 * r22178;
double r22197 = r22196 * r22178;
double r22198 = r22197 * r22178;
double r22199 = r22192 + r22198;
double r22200 = 20.0;
double r22201 = /* ERROR: no complex support in C */;
double r22202 = r22201 * r22178;
double r22203 = r22202 * r22178;
double r22204 = r22203 * r22178;
double r22205 = r22199 + r22204;
double r22206 = r22205 + r22196;
double r22207 = r22206 + r22187;
double r22208 = /* ERROR: no complex support in C */;
double r22209 = r22207 + r22208;
double r22210 = /* ERROR: no complex support in C */;
return r22210;
}
double f() {
double r22211 = -1.0;
double r22212 = 1.0;
double r22213 = /* ERROR: no complex support in C */;
double r22214 = r22213 * r22213;
double r22215 = r22214 * r22213;
double r22216 = r22215 * r22213;
double r22217 = r22216 * r22213;
double r22218 = r22217 * r22213;
double r22219 = 6.0;
double r22220 = 0.0;
double r22221 = /* ERROR: no complex support in C */;
double r22222 = r22221 * r22213;
double r22223 = r22222 * r22213;
double r22224 = r22223 * r22213;
double r22225 = r22224 * r22213;
double r22226 = r22225 * r22213;
double r22227 = r22218 + r22226;
double r22228 = 15.0;
double r22229 = /* ERROR: no complex support in C */;
double r22230 = r22229 * r22213;
double r22231 = r22230 * r22213;
double r22232 = r22231 * r22213;
double r22233 = r22232 * r22213;
double r22234 = r22227 + r22233;
double r22235 = 20.0;
double r22236 = /* ERROR: no complex support in C */;
double r22237 = r22236 * r22213;
double r22238 = r22237 * r22213;
double r22239 = r22238 * r22213;
double r22240 = r22234 + r22239;
double r22241 = r22240 + r22231;
double r22242 = r22241 + r22222;
double r22243 = /* ERROR: no complex support in C */;
double r22244 = r22242 + r22243;
double r22245 = /* ERROR: no complex support in C */;
return r22245;
}
Initial program 0
Final simplification0
herbie shell --seed 2020035 +o rules:numerics
(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))))