\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 r22064 = -1.0;
double r22065 = 1.0;
double r22066 = /* ERROR: no complex support in C */;
double r22067 = r22066 * r22066;
double r22068 = r22067 * r22066;
double r22069 = r22068 * r22066;
double r22070 = r22069 * r22066;
double r22071 = r22070 * r22066;
double r22072 = 6.0;
double r22073 = 0.0;
double r22074 = /* ERROR: no complex support in C */;
double r22075 = r22074 * r22066;
double r22076 = r22075 * r22066;
double r22077 = r22076 * r22066;
double r22078 = r22077 * r22066;
double r22079 = r22078 * r22066;
double r22080 = r22071 + r22079;
double r22081 = 15.0;
double r22082 = /* ERROR: no complex support in C */;
double r22083 = r22082 * r22066;
double r22084 = r22083 * r22066;
double r22085 = r22084 * r22066;
double r22086 = r22085 * r22066;
double r22087 = r22080 + r22086;
double r22088 = 20.0;
double r22089 = /* ERROR: no complex support in C */;
double r22090 = r22089 * r22066;
double r22091 = r22090 * r22066;
double r22092 = r22091 * r22066;
double r22093 = r22087 + r22092;
double r22094 = r22093 + r22084;
double r22095 = r22094 + r22075;
double r22096 = /* ERROR: no complex support in C */;
double r22097 = r22095 + r22096;
double r22098 = /* ERROR: no complex support in C */;
return r22098;
}
double f() {
double r22099 = -1.0;
double r22100 = 1.0;
double r22101 = /* ERROR: no complex support in C */;
double r22102 = r22101 * r22101;
double r22103 = r22102 * r22101;
double r22104 = r22103 * r22101;
double r22105 = r22104 * r22101;
double r22106 = r22105 * r22101;
double r22107 = 6.0;
double r22108 = 0.0;
double r22109 = /* ERROR: no complex support in C */;
double r22110 = r22109 * r22101;
double r22111 = r22110 * r22101;
double r22112 = r22111 * r22101;
double r22113 = r22112 * r22101;
double r22114 = r22113 * r22101;
double r22115 = r22106 + r22114;
double r22116 = 15.0;
double r22117 = /* ERROR: no complex support in C */;
double r22118 = r22117 * r22101;
double r22119 = r22118 * r22101;
double r22120 = r22119 * r22101;
double r22121 = r22120 * r22101;
double r22122 = r22115 + r22121;
double r22123 = 20.0;
double r22124 = /* ERROR: no complex support in C */;
double r22125 = r22124 * r22101;
double r22126 = r22125 * r22101;
double r22127 = r22126 * r22101;
double r22128 = r22122 + r22127;
double r22129 = r22128 + r22119;
double r22130 = r22129 + r22110;
double r22131 = /* ERROR: no complex support in C */;
double r22132 = r22130 + r22131;
double r22133 = /* ERROR: no complex support in C */;
return r22133;
}
Initial program 0
Final simplification0
herbie shell --seed 2020065
(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))))