\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 r33079 = -1.0;
double r33080 = 1.0;
double r33081 = /* ERROR: no complex support in C */;
double r33082 = r33081 * r33081;
double r33083 = r33082 * r33081;
double r33084 = r33083 * r33081;
double r33085 = r33084 * r33081;
double r33086 = r33085 * r33081;
double r33087 = 6.0;
double r33088 = 0.0;
double r33089 = /* ERROR: no complex support in C */;
double r33090 = r33089 * r33081;
double r33091 = r33090 * r33081;
double r33092 = r33091 * r33081;
double r33093 = r33092 * r33081;
double r33094 = r33093 * r33081;
double r33095 = r33086 + r33094;
double r33096 = 15.0;
double r33097 = /* ERROR: no complex support in C */;
double r33098 = r33097 * r33081;
double r33099 = r33098 * r33081;
double r33100 = r33099 * r33081;
double r33101 = r33100 * r33081;
double r33102 = r33095 + r33101;
double r33103 = 20.0;
double r33104 = /* ERROR: no complex support in C */;
double r33105 = r33104 * r33081;
double r33106 = r33105 * r33081;
double r33107 = r33106 * r33081;
double r33108 = r33102 + r33107;
double r33109 = r33108 + r33099;
double r33110 = r33109 + r33090;
double r33111 = /* ERROR: no complex support in C */;
double r33112 = r33110 + r33111;
double r33113 = /* ERROR: no complex support in C */;
return r33113;
}
double f() {
double r33114 = -1.0;
double r33115 = 1.0;
double r33116 = /* ERROR: no complex support in C */;
double r33117 = r33116 * r33116;
double r33118 = r33117 * r33116;
double r33119 = r33118 * r33116;
double r33120 = r33119 * r33116;
double r33121 = r33120 * r33116;
double r33122 = 6.0;
double r33123 = 0.0;
double r33124 = /* ERROR: no complex support in C */;
double r33125 = r33124 * r33116;
double r33126 = r33125 * r33116;
double r33127 = r33126 * r33116;
double r33128 = r33127 * r33116;
double r33129 = r33128 * r33116;
double r33130 = r33121 + r33129;
double r33131 = 15.0;
double r33132 = /* ERROR: no complex support in C */;
double r33133 = r33132 * r33116;
double r33134 = r33133 * r33116;
double r33135 = r33134 * r33116;
double r33136 = r33135 * r33116;
double r33137 = r33130 + r33136;
double r33138 = 20.0;
double r33139 = /* ERROR: no complex support in C */;
double r33140 = r33139 * r33116;
double r33141 = r33140 * r33116;
double r33142 = r33141 * r33116;
double r33143 = r33137 + r33142;
double r33144 = r33143 + r33134;
double r33145 = r33144 + r33125;
double r33146 = /* ERROR: no complex support in C */;
double r33147 = r33145 + r33146;
double r33148 = /* ERROR: no complex support in C */;
return r33148;
}
Initial program 0
Final simplification0
herbie shell --seed 2019346 +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))))