\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 r45024 = -1.0;
double r45025 = 1.0;
double r45026 = /* ERROR: no complex support in C */;
double r45027 = r45026 * r45026;
double r45028 = r45027 * r45026;
double r45029 = r45028 * r45026;
double r45030 = r45029 * r45026;
double r45031 = r45030 * r45026;
double r45032 = 6.0;
double r45033 = 0.0;
double r45034 = /* ERROR: no complex support in C */;
double r45035 = r45034 * r45026;
double r45036 = r45035 * r45026;
double r45037 = r45036 * r45026;
double r45038 = r45037 * r45026;
double r45039 = r45038 * r45026;
double r45040 = r45031 + r45039;
double r45041 = 15.0;
double r45042 = /* ERROR: no complex support in C */;
double r45043 = r45042 * r45026;
double r45044 = r45043 * r45026;
double r45045 = r45044 * r45026;
double r45046 = r45045 * r45026;
double r45047 = r45040 + r45046;
double r45048 = 20.0;
double r45049 = /* ERROR: no complex support in C */;
double r45050 = r45049 * r45026;
double r45051 = r45050 * r45026;
double r45052 = r45051 * r45026;
double r45053 = r45047 + r45052;
double r45054 = r45053 + r45044;
double r45055 = r45054 + r45035;
double r45056 = /* ERROR: no complex support in C */;
double r45057 = r45055 + r45056;
double r45058 = /* ERROR: no complex support in C */;
return r45058;
}
double f() {
double r45059 = -1.0;
double r45060 = 1.0;
double r45061 = /* ERROR: no complex support in C */;
double r45062 = r45061 * r45061;
double r45063 = r45062 * r45061;
double r45064 = r45063 * r45061;
double r45065 = r45064 * r45061;
double r45066 = r45065 * r45061;
double r45067 = 6.0;
double r45068 = 0.0;
double r45069 = /* ERROR: no complex support in C */;
double r45070 = r45069 * r45061;
double r45071 = r45070 * r45061;
double r45072 = r45071 * r45061;
double r45073 = r45072 * r45061;
double r45074 = r45073 * r45061;
double r45075 = r45066 + r45074;
double r45076 = 15.0;
double r45077 = /* ERROR: no complex support in C */;
double r45078 = r45077 * r45061;
double r45079 = r45078 * r45061;
double r45080 = r45079 * r45061;
double r45081 = r45080 * r45061;
double r45082 = r45075 + r45081;
double r45083 = 20.0;
double r45084 = /* ERROR: no complex support in C */;
double r45085 = r45084 * r45061;
double r45086 = r45085 * r45061;
double r45087 = r45086 * r45061;
double r45088 = r45082 + r45087;
double r45089 = r45088 + r45079;
double r45090 = r45089 + r45070;
double r45091 = /* ERROR: no complex support in C */;
double r45092 = r45090 + r45091;
double r45093 = /* ERROR: no complex support in C */;
return r45093;
}
Initial program 0
Final simplification0
herbie shell --seed 2019298
(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))))