\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 r10024 = -1.0;
double r10025 = 1.0;
double r10026 = /* ERROR: no complex support in C */;
double r10027 = r10026 * r10026;
double r10028 = r10027 * r10026;
double r10029 = r10028 * r10026;
double r10030 = r10029 * r10026;
double r10031 = r10030 * r10026;
double r10032 = 6.0;
double r10033 = 0.0;
double r10034 = /* ERROR: no complex support in C */;
double r10035 = r10034 * r10026;
double r10036 = r10035 * r10026;
double r10037 = r10036 * r10026;
double r10038 = r10037 * r10026;
double r10039 = r10038 * r10026;
double r10040 = r10031 + r10039;
double r10041 = 15.0;
double r10042 = /* ERROR: no complex support in C */;
double r10043 = r10042 * r10026;
double r10044 = r10043 * r10026;
double r10045 = r10044 * r10026;
double r10046 = r10045 * r10026;
double r10047 = r10040 + r10046;
double r10048 = 20.0;
double r10049 = /* ERROR: no complex support in C */;
double r10050 = r10049 * r10026;
double r10051 = r10050 * r10026;
double r10052 = r10051 * r10026;
double r10053 = r10047 + r10052;
double r10054 = r10053 + r10044;
double r10055 = r10054 + r10035;
double r10056 = /* ERROR: no complex support in C */;
double r10057 = r10055 + r10056;
double r10058 = /* ERROR: no complex support in C */;
return r10058;
}
double f() {
double r10059 = -1.0;
double r10060 = 1.0;
double r10061 = /* ERROR: no complex support in C */;
double r10062 = r10061 * r10061;
double r10063 = r10062 * r10061;
double r10064 = r10063 * r10061;
double r10065 = r10064 * r10061;
double r10066 = r10065 * r10061;
double r10067 = 6.0;
double r10068 = 0.0;
double r10069 = /* ERROR: no complex support in C */;
double r10070 = r10069 * r10061;
double r10071 = r10070 * r10061;
double r10072 = r10071 * r10061;
double r10073 = r10072 * r10061;
double r10074 = r10073 * r10061;
double r10075 = r10066 + r10074;
double r10076 = 15.0;
double r10077 = /* ERROR: no complex support in C */;
double r10078 = r10077 * r10061;
double r10079 = r10078 * r10061;
double r10080 = r10079 * r10061;
double r10081 = r10080 * r10061;
double r10082 = r10075 + r10081;
double r10083 = 20.0;
double r10084 = /* ERROR: no complex support in C */;
double r10085 = r10084 * r10061;
double r10086 = r10085 * r10061;
double r10087 = r10086 * r10061;
double r10088 = r10082 + r10087;
double r10089 = r10088 + r10079;
double r10090 = r10089 + r10070;
double r10091 = /* ERROR: no complex support in C */;
double r10092 = r10090 + r10091;
double r10093 = /* ERROR: no complex support in C */;
return r10093;
}
Initial program 0
Final simplification0
herbie shell --seed 2019315
(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))))