\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 r18077 = -1.0;
double r18078 = 1.0;
double r18079 = /* ERROR: no complex support in C */;
double r18080 = r18079 * r18079;
double r18081 = r18080 * r18079;
double r18082 = r18081 * r18079;
double r18083 = r18082 * r18079;
double r18084 = r18083 * r18079;
double r18085 = 6.0;
double r18086 = 0.0;
double r18087 = /* ERROR: no complex support in C */;
double r18088 = r18087 * r18079;
double r18089 = r18088 * r18079;
double r18090 = r18089 * r18079;
double r18091 = r18090 * r18079;
double r18092 = r18091 * r18079;
double r18093 = r18084 + r18092;
double r18094 = 15.0;
double r18095 = /* ERROR: no complex support in C */;
double r18096 = r18095 * r18079;
double r18097 = r18096 * r18079;
double r18098 = r18097 * r18079;
double r18099 = r18098 * r18079;
double r18100 = r18093 + r18099;
double r18101 = 20.0;
double r18102 = /* ERROR: no complex support in C */;
double r18103 = r18102 * r18079;
double r18104 = r18103 * r18079;
double r18105 = r18104 * r18079;
double r18106 = r18100 + r18105;
double r18107 = r18106 + r18097;
double r18108 = r18107 + r18088;
double r18109 = /* ERROR: no complex support in C */;
double r18110 = r18108 + r18109;
double r18111 = /* ERROR: no complex support in C */;
return r18111;
}
double f() {
double r18112 = -1.0;
double r18113 = 1.0;
double r18114 = /* ERROR: no complex support in C */;
double r18115 = r18114 * r18114;
double r18116 = r18115 * r18114;
double r18117 = r18116 * r18114;
double r18118 = r18117 * r18114;
double r18119 = r18118 * r18114;
double r18120 = 6.0;
double r18121 = 0.0;
double r18122 = /* ERROR: no complex support in C */;
double r18123 = r18122 * r18114;
double r18124 = r18123 * r18114;
double r18125 = r18124 * r18114;
double r18126 = r18125 * r18114;
double r18127 = r18126 * r18114;
double r18128 = r18119 + r18127;
double r18129 = 15.0;
double r18130 = /* ERROR: no complex support in C */;
double r18131 = r18130 * r18114;
double r18132 = r18131 * r18114;
double r18133 = r18132 * r18114;
double r18134 = r18133 * r18114;
double r18135 = r18128 + r18134;
double r18136 = 20.0;
double r18137 = /* ERROR: no complex support in C */;
double r18138 = r18137 * r18114;
double r18139 = r18138 * r18114;
double r18140 = r18139 * r18114;
double r18141 = r18135 + r18140;
double r18142 = r18141 + r18132;
double r18143 = r18142 + r18123;
double r18144 = /* ERROR: no complex support in C */;
double r18145 = r18143 + r18144;
double r18146 = /* ERROR: no complex support in C */;
return r18146;
}
Initial program 0
Final simplification0
herbie shell --seed 2020100 +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))))