\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 r34053 = -1.0;
double r34054 = 1.0;
double r34055 = /* ERROR: no complex support in C */;
double r34056 = r34055 * r34055;
double r34057 = r34056 * r34055;
double r34058 = r34057 * r34055;
double r34059 = r34058 * r34055;
double r34060 = r34059 * r34055;
double r34061 = 6.0;
double r34062 = 0.0;
double r34063 = /* ERROR: no complex support in C */;
double r34064 = r34063 * r34055;
double r34065 = r34064 * r34055;
double r34066 = r34065 * r34055;
double r34067 = r34066 * r34055;
double r34068 = r34067 * r34055;
double r34069 = r34060 + r34068;
double r34070 = 15.0;
double r34071 = /* ERROR: no complex support in C */;
double r34072 = r34071 * r34055;
double r34073 = r34072 * r34055;
double r34074 = r34073 * r34055;
double r34075 = r34074 * r34055;
double r34076 = r34069 + r34075;
double r34077 = 20.0;
double r34078 = /* ERROR: no complex support in C */;
double r34079 = r34078 * r34055;
double r34080 = r34079 * r34055;
double r34081 = r34080 * r34055;
double r34082 = r34076 + r34081;
double r34083 = r34082 + r34073;
double r34084 = r34083 + r34064;
double r34085 = /* ERROR: no complex support in C */;
double r34086 = r34084 + r34085;
double r34087 = /* ERROR: no complex support in C */;
return r34087;
}
double f() {
double r34088 = -1.0;
double r34089 = 1.0;
double r34090 = /* ERROR: no complex support in C */;
double r34091 = r34090 * r34090;
double r34092 = r34091 * r34090;
double r34093 = r34092 * r34090;
double r34094 = r34093 * r34090;
double r34095 = r34094 * r34090;
double r34096 = 6.0;
double r34097 = 0.0;
double r34098 = /* ERROR: no complex support in C */;
double r34099 = r34098 * r34090;
double r34100 = r34099 * r34090;
double r34101 = r34100 * r34090;
double r34102 = r34101 * r34090;
double r34103 = r34102 * r34090;
double r34104 = r34095 + r34103;
double r34105 = 15.0;
double r34106 = /* ERROR: no complex support in C */;
double r34107 = r34106 * r34090;
double r34108 = r34107 * r34090;
double r34109 = r34108 * r34090;
double r34110 = r34109 * r34090;
double r34111 = r34104 + r34110;
double r34112 = 20.0;
double r34113 = /* ERROR: no complex support in C */;
double r34114 = r34113 * r34090;
double r34115 = r34114 * r34090;
double r34116 = r34115 * r34090;
double r34117 = r34111 + r34116;
double r34118 = r34117 + r34108;
double r34119 = r34118 + r34099;
double r34120 = /* ERROR: no complex support in C */;
double r34121 = r34119 + r34120;
double r34122 = /* ERROR: no complex support in C */;
return r34122;
}
Initial program 0
Final simplification0
herbie shell --seed 2019354
(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))))